Excel VBA質問箱 IV

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

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


67167 / 76734 ←次へ | 前へ→

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

引用なし
パスワード
   入力規則の設定で質問があります。

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

------
' A1を0〜10の入力規則にしているだけ

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 質問
【14128】Re:ボダン入力で入力規則設定 IROC 04/5/21(金) 13:53 回答
【14129】Re:ボダン入力で入力規則設定 Asaki 04/5/21(金) 14:01 回答
【14130】Re:ボダン入力で入力規則設定 aa3 04/5/21(金) 14:10 お礼

67167 / 76734 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free