- ベストアンサー
ハイパーリンクの一括削除
ＨＰをエクセルにコピーしたら ハイパーリンクもそのままコピーされてしまいます それを一括削除する方法はありませんか？ リンクの上にはＵＲＬではなく画像がのっています
- オフィス系ソフト
- 回答数5
- ありがとう数1
- みんなの回答 （5）
- 専門家の回答
質問者が選んだベストアンサー
その他の回答 (4)
- marbin
- ベストアンサー率27% (636/2290)
シェイプでしたね。 シートの場合の応用の範囲だとは思いますが。 Sub test2() Dim sp As Shape On Error Resume Next For Each sp In ActiveSheet.Shapes sp.Hyperlink.Delete Next End Sub
補足
？ すみません 全く意味がわかりません。 何をどうすればいいのでしょうか？
- marbin
- ベストアンサー率27% (636/2290)
なお、画像等が不要なら、一度テキストファイルへ コピーして、テキストファイルからもう一度コピー、 エクセルへ貼り付け、という方法もあります。 データ ↓ 外部データの取込み ↓ 新しいWEBクエリ というのも。
補足
画像が必要なのです ２で回答したような方法でコピーをしています
- marbin
- ベストアンサー率27% (636/2290)
ＵＲＬやメールアドレスを入力したら自動的に ハイパーリンクになるのを回避するには ツール ↓ オートコレクトのオプション ↓ 入力オートフォーマット ↓ 「インターネットとネットワークのアドレスをハイパーリンクに変更する」 のチェックを外す としますが、ネット上でコピーしたものを貼り付けた場合は↑を設定していても ハイパーリンクになってしまいますね。 VBAでの参考ＨＰです。 エクセルのVBA集 http://www12.plala.or.jp/nombo/vba.html ★ハイパーリンク編★ ●ハイパーリンクを解除するには？
補足
これも、アドレスのみですね。 質問を見てもらえますか？お願いします リンクの上にはＵＲＬではなく、画像です。 ＨＰでいえば、画像がありそれをクリックすると別のページがひらきます その画像を選択してコピーして、貼り付けをします ひとつずつ保存しても面倒なので、画像を文章コピーのように選択してコピーします それをエクセルに貼り付けしています そうすると、エクセルの上で画像をクリックするとＨＰが開いてしまいます
- marbin
- ベストアンサー率27% (636/2290)
いろんな方法がありますが、一例です。 作業用セルに 1 と入力しコピー ↓ ハイパーリンクを解除したいセルを選択 ↓ 右クリック ↓ 形式を選択して貼り付け ↓ 乗算にチェック ↓ ＯＫ
補足
セルというか、画像なので、セルは関係ありません これはＵＲＬが記載されていて、そのリンク削除のときだけではないでしょうか・・・・
お礼
ようやくできました！！！ もう、感動です。 ＶＢＡって言葉初めて見ましたがこんなこともできるのですね 少し勉強してみます。 長々とおつきあいくださり、ありがとうございました。