Excel VBA質問箱 IV

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

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


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

74415 / 76738

←次へ　｜　前へ→


	【6791】Re:追加したシートのオブジェクト名について

ばば - 03/8/4(月) 10:51 -


	引用なし

	パスワード

Jakaさん　ありがとうございます。

>Workbooks(ActiveWorkbook.Name).VBProject.VBComponents(ActiveSheet.CodeName).Name = "Sheet10"

この方法だと、オブジェクト名が変更されませんでした。
プロジェクトエクスプローラで見ると、変更されているように見えますが、プロパティウィンドウで確認すると、オブジェクト名は変更されていませんでした。

>http://www2.moug.net/app/bbs/message.php?cat=exvba&id=20030730-000013
こちらで紹介されている方法でオブジェクト名の変更ができました。
Sub test()
　Dim a As Worksheet
　Set a = Worksheets(1)
　a.[_CodeName] = "hogehoge"
End Sub

ありがとうございました。

0 hits

▼

【6605】追加したシートのオブジェクト名について はるか 03/7/14(月) 16:49