Excel VBA質問箱 IV

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

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


6353 / 13644 ツリー ←次へ | 前へ→

【45695】名前一括削除 とんちん 07/1/11(木) 13:57 質問[未読]
【45697】Re:名前一括削除 りん 07/1/11(木) 15:10 発言[未読]

【45695】名前一括削除
質問  とんちん  - 07/1/11(木) 13:57 -

引用なし
パスワード
   下記のようなマクロでアクティブブック内の定義された名前を
全て削除しました。
けれど、削除できない名前が多さんあり困っています。
何か、書き方がおかしいのでしょうか?

<記述>
Sub 名前削除()
 Dim objName As Name
 For Each objName In ActiveWorkbook.Names
 objName.Delete
 Next objName
End Sub

<削除できない名前の範囲>
=#REF!$A$1:$B$37
='\\Katayama\f\MSOFFICE\EXCEL\商品\[明細.XLS]A!$A$1:$B$37
など、エラーやリンクを含むもの

【45697】Re:名前一括削除
発言  りん E-MAIL  - 07/1/11(木) 15:10 -

引用なし
パスワード
   とんちん さん、こんにちわ。

><削除できない名前の範囲>
>=#REF!$A$1:$B$37
>='\\Katayama\f\MSOFFICE\EXCEL\商品\[明細.XLS]A!$A$1:$B$37
どっちも削除できているみたいでした。 XL2000 & Win2000です

> For Each objName In Application.ActiveWorkbook.Names
               ↑一応これを試してみてください。

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