Excel VBA質問箱 IV

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

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


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

46710 / 76735

←次へ　｜　前へ→


	【34992】Re:プルダウンリストで

Ned - 06/2/17(金) 18:30 -


	引用なし

	パスワード

こんにちは。多分そのままでもBookを保存すれば大丈夫だと思います。一般操作ですが、可変の名前定義を使うというのはどうなのでしょう？ Sub 可変の名前定義の例() '一般操作でできます。　　ActiveWorkbook.Names.Add Name:="サンプル", RefersToR1C1:= _ 　　　　"=OFFSET(Sheet1!R1C1,0,0,COUNTA(Sheet1!R1C1:R1000C1))" End Sub Sub リスト設定例() 'これも一般操作でできます。 '設定例です。毎回行う必要はありません。　　With Range("A1").Validation 　　　　　　.Delete 　　　　　　.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _ 　　　　　　xlBetween, Formula1:="=サンプル" 　　　　　　.IgnoreBlank = False 　　　　　　.InCellDropdown = True 　　　　　　.ShowInput = False 　　　　　　.ShowError = False 　　End With End Sub