いつもお世話になります。
OSはwin11,エクセルはOffice365です・
下記に参考のコードがあります。
このコードではハイパーリンクは削除はされます。
がしかしテキストは残ります。
このような内容を下記のコードに追加しましたが
うまくいきません。
Range("M1:M17").Select
Selection.Clear
Range("A1").Select
ご指導を仰ぎたいのはハイパーリンクとテキストの両方が削除されるようにしたいです。
参考
Sub リンク削除()
Dim ws As Worksheet
For Each ws In Worksheets
ws.Hyperlinks.Delete
Next
End Sub
No.2ベストアンサー
- 回答日時:
ハイパーリンクの場所は決まっていない
ということだったのかな。
Sub リンク削除()
Dim ws As Worksheet
Dim hp As Hyperlink
For Each ws In Worksheets
For Each hp In ws.Hyperlinks
hp.Parent.Clear
Next
Next
End Sub
No.1
- 回答日時:
Sub リンク削除()
Dim ws As Worksheet
For Each ws In Worksheets
ws.Hyperlinks.Delete
ws.Range("M1:M17").Clear
Next
End Sub
とか。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) vbaで列幅について 1 2022/11/15 08:31
- Excel(エクセル) vba シート名の一覧を2列に分けるには 5 2023/04/24 08:56
- Excel(エクセル) vba 転記するときの最終行について 2 2022/09/03 09:31
- Visual Basic(VBA) 【VBAエラー】Nextに対するForがありません 対策について 5 2022/11/21 21:26
- Visual Basic(VBA) シート削除のマクロで「deleteメソッドは失敗しました」となります。助けてください! Sub 不要 6 2022/09/08 16:41
- Visual Basic(VBA) ExcelVBAに関する質問 3 2023/02/17 10:47
- Visual Basic(VBA) 今日の日付が過ぎたらその行を削除したい 1 2023/04/01 20:06
- Excel(エクセル) vba アクティブシートのA1セルの値を基準に複数のシートコピー&シート名を 6 2023/04/12 18:36
- Excel(エクセル) vba userformで漢字を全角カタカナに 2 2022/07/24 15:38
- Excel(エクセル) エクセルシート中の全角英数字を半角に変換したい 4 2022/07/07 13:14
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBA:Openステートメントで開い...
-
教えて!gooにはどのカテゴリが...
-
職場の人と仕事中に喧嘩して LI...
-
日テレニュースHP、記事削除は...
-
同じ質問
-
指定した文字があった場合、そ...
-
エクセルVBAで行削除時にエラー...
-
バッチファイルを使用したsql@p...
-
喧嘩をしてLINE削除され、 また...
-
アクセスにおいて間違って削除...
-
エクセルで下の空白行を削除したい
-
インスタグラムのギャラリーの...
-
エクセルで住所の混在する「丁...
-
Facebookメッセンジャーの不具合
-
(Access)複数条件の重複デー...
-
もう関わりたくない人がいたらL...
-
Facebookに自分が四つもアップ...
-
Excel 数式を入れているため、...
-
メーリングリストから特定の人...
-
動的に作成したコントロールの...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
もはや喧嘩売ってるのか私(笑...
-
回答がついてる普通の質問まで...
-
指定した文字があった場合、そ...
-
VBA:Openステートメントで開い...
-
AI削除には数多のキーワード設...
-
インスタグラムのギャラリーの...
-
バッチファイルを使用したsql@p...
-
Yahooフリマってどれくらい時間...
-
Facebookメッセンジャーの不具合
-
削除の対象について
-
エクセルで住所の混在する「丁...
-
ビジネスパートナーから送られ...
-
女友達にLINEしたら、既読スル...
-
もう関わりたくない人がいたらL...
-
喧嘩をしてLINE削除され、 また...
-
猫にグラグラの熱湯かける動画...
-
すべてやりきった、大満足を意...
-
インスタアカウント、前の携帯...
-
Facebookに自分が四つもアップ...
-
Facebookで間違ってスートリー...
おすすめ情報
ありがとうございます。
折角ご指導をいただいたのですが、
ハイパーリンクは解除
テキストは未解除
です。
再度ご指導いただけませんか。