Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

67240 / 76807

←次へ　｜　前へ→


	【14126】ボダン入力で入力規則設定

aa3 - 04/5/21(金) 13:50 -


	引用なし

	パスワード

入力規則の設定で質問があります。

シートに適当なボタンを作って、そのボタンを押せば
入力規則を設定してくれるというものをしようとしたのですが、

------
' Ａ１を０～１０の入力規則にしているだけ

Private Sub CommandButton1_Click()

Range("A1").Validation.Add Type:=xlValidateWholeNumber, _
　　　　AlertStyle:=xlValidAlertStop, _
　　　　Operator:=xlBetween, Formula1:="0", Formula2:="10"

End Sub
------

ボタンを押すと

「実行時エラー'1004'
　アプリケーション定義またはオブジェクト定義のエラーです。」

と止まってしまいます。

変なのは、上のソースをマクロとして(Publicにして)動かすと
正常に動くのです。

いろいろ調べたのですが情報がありませんでした。
何してもダメなのでバグなのか…？と思い始めています。

スミマセンが教えていただけると助かります。
よろしくお願いします。

バージョン:Excel 2000 9.0.4402 SR-1

2 hits

▼

【14126】ボダン入力で入力規則設定 aa3 04/5/21(金) 13:50

≪