質問
excelのハイパーリンク削除する方法
- 投稿日時:2006/03/09 15:33
excelのハイパーリンク削除する方法を教えてください
一つずつだったら、右クリックで削除できますが、
大量にデーターがあるばあい、その操作ができません。
ファイルそのものをハイパーリンク設定できない方法が
良いのかな と思いました。
環境設定などの設定でも良いです
お願いします
回答 (3件)
- 最新から表示
- 回答順に表示
- ベストアンサーのみ表示
No.3
- 回答日時:2006/03/12 05:09
一度っきりの削除って言うんなら、
新規ブックを作成して [Alt]+[F11] で VBEditor を起動。
VBEditor の [挿入]-[標準モジュール] で標準モジュールを作成。
標準モジュールに下記コードを入力。
Sub ClearAllHLinks()
Dim sht As Worksheet
For Each sht In ActiveWorkbook.Worksheets
sht.Hyperlinks.Delete
Next sht
End Sub
ここまで書いたら Excel のウィンドウに戻って、ハイパーリンクが書き込まれちゃってるブックを開く。
(ハイパーリンクが書き込まれているブックが手前に開いていると思うので)
[Alt]+[F8} でマクロ実行のダイアログを表示。
[Book1!ClearAllHLinks](Book1 の部分はマクロを書いたブックの名前) を選択して [実行] をクリック。
これでハイパーリンクを一気にやっつけられます。
もし今回お困りのブックで恒久的にハイパーリンク問題を何とかしたいのであれば、そのブックを開いて [Alt]+[F11] で VBEditor を起動し、
[表示]-[プロジェクト エクスプローラ] を実行。
プロジェクトエクスプローラで
VBAProject (ブック名)
Microsoft Excel Objects
と開いていって ThisWorkbook をダブルクリック。
左上の方に「(General)」っていうコンボボックスがあるので、それを開いて「Workbook」を選択。
右上のコンボボックスが「Open」になっていると思うので「BeforeSave」を選択。
するとエディタ上に
Private Sub Workbook_BeforeSave(ByVal SaveAsUI AS Boolean, Cancel As Boolean)
End Sub
Private Sub Workbook_Open()
End Sub
というテンプレートが書かれます。
Private Sub Workbook_Open() の行から
その下の End Sub の行は削除。
この行から
Private Sub Workbook_BeforeSave(ByVal SaveAsUI AS Boolean, Cancel As Boolean)
End Sub
この行の間にコードを書きます。
完成系はこんな形
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Dim sht As Worksheet
For Each sht In ThisWorkbook.Worksheets
sht.Hyperlinks.Delete
Next sht
End Sub
これで、このブックを保存するたびにこのブックの全てのハイパーリンクが削除されます。
ただしこのブックを開くときに「このブックはマクロを含んでいます」のダイアログが表示されて、保存時にハイパーリンクを自動削除させたいのなら、このダイアログで [マクロを有効にする] をクリックする必要がありますけどね。
- 質問者のみ
- この回答にお礼をつける
No.2ベストアンサー20pt
- 回答日時:2006/03/09 15:49
書式が問題ないのでしたら、[編集]→[クリア]→[書式]でクリアすることが出来ます。
回りの書式と同じでしたら、[書式のコピー/貼り付け]でもいいかと。
あと、[ツール]→[保護]→[シートの保護]で、ハイパーリンクの挿入を禁止することも出来ます。ハイパーリンクの挿入以外を許可すればいいかなと。
- 質問者のみ
- この回答にお礼をつける
No.1ベストアンサー10pt
- 回答日時:2006/03/09 15:43
今あるExcelのハイパーリンクを解除する方法ですが、
セルの何もない所に予め数字の1を入力しましょう。
入力後、この数字を選択して、コピーします。
その後、ハイパーリンクが設定されている範囲を範囲指定し、右クリックで、形式を選択して貼り付けを選択し、乗算を選択します。これで、ハイパーリンクが解除されます。
設定で変更したいのであれば、メニューの[ツール]から[オートコレクトのオプション]を選択し、入力オートフォーマットタブにある、インターネットとネットワークのアドレスをハイパーリンクに変更するのチェックを外しましょう。
- 質問者のみ
- この回答にお礼をつける
このQ&Aを見た人はこんなQ&Aも見ています
- 4エクセル2007 パスワードの解除の仕方を教えてください。。
- 5Wordの、文章内にあるハイパーリンクを全て削除したい。
- 6了解と承知の違いって?
- 7EXCEL・複数条件がある場合のCOUNTIFの書き方
- 8エクセルで重複しているデータの抽出のしかたを教えてください。
- 9【Excel】数式をそのまま他のシートにコピーする方法
- 10EXCELでの重複データカウント方法について
- 11EXCELのオートシェイプを一括削除できないか?
- 12EXCEL(IF関数)でCELLの色を変える。
- 13エクセルで数式の結果が反映されない(自動計算になっているのに)
- 14EXCELの自動リンク箇所の確認と解除方法
- 15Excel 指定の文字列を含むとカウントするようにしたい場合は?
- 16Excelの外部リンク完全削除は?
- 17エクセルのリンク解除ができない場合の対処
- 18EXCELの日付データを文字列に変換したい
- 19「各位」は目上の方には失礼?
- 20VLOOKUP関数で複数の検索値を設定したいのですが
注目の記事
鬼は外!福は内〜!節分特集
春が来る季節の変わり目に豆を撒いて邪気を追い払い、無病息災を願う風習“節分”。落花生を撒いたり、掛け声も地方さまざま。節分をより楽しめる特集です。
このQ&Aを見た人がよく見るQ&A
このカテゴリで人気のQ&Aランキング
- 4フォルダのパスワード設定
- 5EXCEL VBAマクロ作成で、他のEXCEL...
- 6Excelのメニューバーが表示されない
- 7wmiprvse.exeが常にCPU50%を占めて...
- 8Windows8のセーフモード起動について
- 9ファイルを開くのが遅い。ただし、...
- 10ディレクトリ内に作成できる最大フ...
- 11拡張子「.iso」ファイルの展開方法...
- 12キーボードの設定が変わってしまい...
- 13サーバ共有フォルダ接続時のパスワ...
- 14windows7におけるタッチパッドのタ...
- 15windows2000でリモートデスクトップ...
- 16Windows7 ネットワーク接続が切断さ...
- 1764bit は32bit のソフトが使えない...
- 18FTPによる接続ができません
- 19WindowsXPに起動ログは存在しますか?
- 20キーボードが反応しない