Excel2000でデータフォームを自動的に表示させたいのですが・・・。

初歩的な質問ですみません。

データ入力ミスを防ぐ為、Excelに付属されているデータフォームを使って
ある表にデータを入力しようと思うのですが、フォームを表示する操作
（範囲選択をする⇒メニューの[データ]－[フォーム]コマンドを選択する）
をマクロに登録して自動化しようとすると、"エラー１００４　リストまたは
結合セルを含む範囲に対してこのコマンドは使用できません”というエラー
メッセージが表示されてしまい、マクロを実行することができません。

マクロではなく、通常に操作するとフォームを表示することができます。
尚、データ範囲のどこにも結合されているセルはなく1行目は見出しを
入力しています。

マクロの自動記録で登録したのですがコードは
　　　　Range("A4:O31").Select
　　　　ActiveSheet.ShowDataForm　　　　と記録されています。

私よりさらにExcelに不慣れな人が作業する為、ボタン1つでフォームが
表示できるようにしたいのですが・・・。
何か注意する点はあるのでしょうか？　教えてください。

No.3 ベストアンサー 回答者： imogasi 回答日時： 2003/03/14 20:40

Sub test01()

Worksheets("sheet1").Range("a2:c2").Select
ActiveSheet.ShowDataForm
End Sub
でどうですか。
第１行目か、第１行がスペースで第２行目に、項目見出しにあたる、例えば住所・氏名・年齢などをＡ，Ｂ，Ｃ列以下に入れておけば、上記でＯＫと思います。警告メッセージが出ますが。
見出しにあたる文字列が無いとエラーになるようです。
表見だしも邪魔になるようです。１行目を住所録にして、Ｒａｎｇｅ（”ａ２：Ｃ２”）。Ｓｅｌｅｃｔにしても、実行するとエラーになるようです。エクセルのデータベースの仮定は他の例でも、表見だし無しで、一番上の行に、項目見だしをおくのが仮定のようです。
第２行目に１つデータを前もって入れておく必要はないようです。

この回答へのお礼

ご指摘どおり、項目見出しを1行目だけにしたらできました！！
見出しの上に大見出しがあったり、タイトルがあったので
エラーになってしまうのですね。
とても勉強になりました。
ご丁寧な回答ありがとうございました。
今後も何かありましたらよろしくお願いします。

お礼日時：2003/03/17 09:27

No.2 回答者： eipu 回答日時： 2003/03/14 12:47

2行目に1件データをあらかじめ登録しておけば

大丈夫だと思います。

この回答へのお礼

ご指摘どおり、1件データを登録しましたがまだエラーメッセージが
出て来てしまいます。
もう少しで原因が分かりそうですので、もうしばらく頑張ってみます。
早速のご回答ありがとうございました。

お礼日時：2003/03/17 09:23

No.1 回答者： todo36 回答日時： 2003/03/14 11:24

こちらで検索してみては？

http://search.microsoft.com/default.asp?siteid=j …

検索キー：Excel 実行エラー 1004

この回答へのお礼

教えて頂いたアドレスで検索してみましたが、残念ながらフォームのことは
載っていませんでした。
でも、このページ今後困った時の参考とさせて頂きます。
早速のご回答ありがとうございました。

お礼日時：2003/03/17 09:21