Excel VBA質問箱 IV

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

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


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

32727 / 76734

←次へ　｜　前へ→


	【49241】Re:再度試してみました

yuu1 - 07/5/28(月) 16:55 -


	引用なし

	パスワード

こんにちは。

>これは、挿入→名前→定義のリストに出てこなくなるのでしょうか？
>
>>マクロでは以下。
>>　ActiveWorkbook.Names.Add(Name:="lmn", RefersTo:="=Sheet3!$L$3:$N$3").Visible = False

はい。挿入→名前→定義のリストに出てきません。

>このコードは標準モジュールに
>
>Sub 名前隠し()
>ActiveWorkbook.Names.Add(Name:="lmn", RefersTo:="=Sheet3!$L$3:$N$3").Visible = False
>
>End Sub
>
>のように書けば良いのでしょうか？

標準モジュールとは限らず、それなりに書けばどのモジュールでもいいと思います。
このコードは名前"lmn"を作成して非表示にしています。
どうも、ThisWorkbookに対する処理みたいなので、
そうであれば、 ActiveWorkbook→ThisWorkbookに差し替えたほうがいいですね。

すでに名前が作成してあるのであれば
ThisWorkbook.Names("lmn").Visible = False
と、なります。

15 hits

▼

【49202】独自関数作成 ユニフ 07/5/27(日) 16:08