Excel VBA質問箱 IV

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

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


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

74986 / 76732

←次へ　｜　前へ→


	【6196】セルの入力規制について

Jun - 03/6/19(木) 10:30 -


	引用なし

	パスワード

初めてExcelVBAを使用します。
セルの入力規制について教えてください。
シート全体に保護を掛け、1行目のみセルをロックしています。
この状態で、
Private Sub Worksheet_Change(ByVal Target As Range)
With Range("e:e").Validation
　　.Delete
　　.Add Type:=xlValidateWholeNumber, _
　　　　AlertStyle:=xlValidAlertInformation, _
　　　　Formula1:="5", Formula2:="10"
　　　　.ErrorTitle = "整数値"
　　.ErrorMessage = "入力できるのは、5 から 10 までの値です。"
　　Cells(ActiveCell.Row - 1, ActiveCell.Column).Select
End With
End Sub
のように入力規制を行おうとすると
「アプリケーション定義またはオブジェクト定義のエラーです」
とのエラーが発生します。
このような制御は無理なのでしょうか？

0 hits

▼

【6196】セルの入力規制について Jun 03/6/19(木) 10:30

≪