Excelでハイパーリンクを解除するとき、
右クリックで、解除や削除はできるのですが、
もう、元から無効にしたいのですが。。。
どうしたら良いでしょうか?

このQ&Aに関連する最新のQ&A

A 回答 (2件)

私もこの件に関してはずいぶん悩みましたが


ちょっと大変みたいです。
[XL2000] 複数のハイパーリンクを無効にする方法
http://www.microsoft.com/japan/support/kb/articl …
[XL2000] ハイパーリンクを無効にする方法
http://www.microsoft.com/japan/support/kb/articl …

ということですので、これを実行して作成したシートを標準のテンプレートとして使用するほかないようで.....

私自身はもうここまで実行するのは面倒なので、入力してハイパーリンクが貼られた直後に [Ctrl]-[Z]すなわちUndoを一回だけ実行すると入力はそのままでハイパーリンク関数の実行を取り消す、ことを利用してハイパーリンクを解除しています。

参考URL:http://www.microsoft.com/japan/support/kb/articl …
    • good
    • 0
この回答へのお礼

そうですか。。。
元から無効にはできないのですね。。。
ちょっと面倒ですけど頑張ってやってみたいと思います。
ありがとうございます。

お礼日時:2001/04/09 16:56

>元から無効にはできないのですね。

。。
というか、このハイパーリンク機能について先の回答の参考URLを得るまでに色々調べた時にわかったのですが
ハイパーリンク機能はExcel本来の機能ではなく
Excel上で入力を監視して自動的に HyperLink 関数を実行する VBスクリプトが動いている、と解釈するのが適当なようです。

その為、ハイパーリンクが貼られた場合には Undo をしても1回目にはハイパーリンクが無効にされるだけで入力内容はそのままです。もう一度Undoをかけることによって入力自体が取り消されます。

つまり Excel上では一つの処理として入力~ハイパーリンクを行なっているのではなく 入力で一つの処理、ハイパーリンクで次の処理、という形式で処理していることになります。

そう考えると、MSのサイトの解決方法は「それしかないんだろうなぁ」と思いますねぇ。
    • good
    • 0
この回答へのお礼

なるほど。。
細かいところまでありがとうございました。
また何かあればここに出没します。。。
もっと勉強しなければいけませんね。

お礼日時:2001/04/10 09:11

このQ&Aに関連する人気のQ&A

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人が検索しているワード

このQ&Aと関連する良く見られている質問

Q右クリックで「ハイパーリンクの削除」のショートカットメニューを表示させたい

Excel2003です

教えてください

ハイパーリンクの削除について
「無効にするハイパーリンク をマウスの右ボタンでクリックし、ショートカット メニューの [ハイパーリンクの削除] をクリックします。 」とExcelのヘルプにあるのですが

私のExcelでは

右クリックしても[ハイパーリンクの削除]のショートカットメニューが表示されません。

右クリックで「ハイパーリンクの削除」を表示させる方法を教えて下さい。

Aベストアンサー

念のため確認ですが、ハイパーリンクをすでに設定してあるセルを選んで右クリックしてもハイパーリンクの削除が表示されないということですか?もし、そうでなければ表示されなくても当たり前です。

Qセルを右クリックしたときにハイパーリンクが表示されない

エクセル2003を使っていますが、任意のセルを右クリックしたときに「ハイパーリンク」のメニュー?が表示されません。(他の人のパソコンでは表示される)
「ハイパーリンク」のメニューを表示させるような設定があるのでしょうか?お教えください。

Aベストアンサー

自分も同じ問題でした。

「改ページプレビュー」で表示している事が原因です。
表示を「標準」にするとハイパーリンク表示がでます。

QExcelで一度無効にしたHPアドレスやメアドのハイパーリンクを再度有効にする方法は?

表題のとおりです。
エクセルにURLやメールアドレスを入力した際、自動的にハイパーリンクされたようで、カーソルをURLに合わせてクリックするとそのURLに飛ぶというのが嫌で解除していました。

しかし、今になってやはり、ハイパーリンクされていた方が便利だと思い、復活させたいのですがどうしていいかわかりません。

自分なりに、「ハイパーリンク→編集」から変更しようとしたのですが、PC内にあるファイルならリンク出来るのですが、URLやメアドを有効にする方法がわかりません。
私の見方が悪いのかもしれませんが、どなたかわかる方ご回答よろしくお願いいたします。

Aベストアンサー

リンクするアドレスを指定する際、一覧からでなくアドレスを直接入力すればいいと思います。表示文字列がアドレスと同じならアドレス欄に貼り付ければOKです。

QEXCELでハイパーリンクの解除を行うと書式設定が失われる

ハイパーリンクの解除をおこなうと、セルの書式設定が解除されてしまいます。
ハイパーリンクとして必要なところと、必要ないところ(単に記号的な使い方をしています)と分けているため、設定でハイパーリンクを無効にすると不便になってしまいます
何か対処法はありますでしょうか?

OSはMEでExcel2000にSR-1をあてています。

Aベストアンサー

回答がありませんね。

ハイパーリンクを設定したセルに対し、ハイパーリンク→ハイパーリンクの削除を行うと『セルの書式が解除されるのをどうにかしたい』ということで考えてみました。
ただ、『必要なところと、必要ないところ(単に記号的な使い方をしています)と分けているため』については、意味を理解できていません。見当違いの回答かもしれませんが、その場合はご容赦を。

通常方法では思いつきませんので、ハイパーリンクのみを解除するマクロを書いてみました。(Excel2000)

マクロでハイパーリンクを削除しても、セルの書式は初期化されてしまうみたいです。
『Style スタイル』でどうにかなるかと思いましたが、余り芳しくありませんでした。
また、セルの書式を配列に全部覚えておければ簡単ですが、コーディングが大変みたいでした。
コントロールのPropertiesコレクションのようなものがあれば楽ですが、Excelのセルに対してはないみたいです。
結局、セルの値または式を退避しておき、ハイパーリンクごと消去し、値または式を復元する事にしました。
アンダーラインについては、これがハイパーリンクのものか、意図的に引いたものか、または消してある場合もあるので、マクロを実行する時点のまま変更していません。

マクロ内部でエラー処理を行っていますが、これは結合セルがあると消去が普通にできないからです。
実際使ってみて、マクロをショートカットキーに登録しておけば便利かもしれません。

列全体、全シートを処理すると時間がかかります。ご注意を。(EscまたはCtrl+Breakで止まります)


ここから

Sub del_HyperLink()
  Dim rg As Range 'セル
  Dim rgVal 'マクロ操作前のセルの値
  Dim rgULine 'マクロ操作前のアンダーラインの招待

  On Error GoTo ErrorHandler 'エラー対応

  For Each rg In Selection
    rgULine = rg.Font.Underline 'アンダーライン
    'セルの内容が値か、または式か
    If Not rg.HasFormula Then
      rgVal = rg.Text
    Else
      rgVal = rg.Formula
    End If

    rg.ClearContents '消去
    rg.Font.Underline = rgULine 'アンダーラインを戻す
    rg = rgVal '値または式を戻す
  Next
  Exit Sub

ErrorHandler:
  '結合セルを操作しに行った時の対応
  If Err.Number = 1004 Then
    Resume Next
  End If
End Sub

回答がありませんね。

ハイパーリンクを設定したセルに対し、ハイパーリンク→ハイパーリンクの削除を行うと『セルの書式が解除されるのをどうにかしたい』ということで考えてみました。
ただ、『必要なところと、必要ないところ(単に記号的な使い方をしています)と分けているため』については、意味を理解できていません。見当違いの回答かもしれませんが、その場合はご容赦を。

通常方法では思いつきませんので、ハイパーリンクのみを解除するマクロを書いてみました。(Excel2000)

マクロでハイパーリ...続きを読む

Qエクセル VBA で行の右クリックメニューから行の挿入削除を無効にしたい

お世話になります。

右クリックメニューの行の挿入と削除を無効にしたいのですが、
セルを選択して、右クリックメニューの挿入・削除は

Private Sub Workbook_Open()
Dim mymenubar1 As CommandBar
Set mymenubar1 = Application.CommandBars("Cell")
mymenubar1.Controls("挿入(&I)").Enabled = False
End Sub

で無効にできたのですが、
行を選択→右クリックメニューの挿入削除の無効化の仕方がわかりません。
※セルに対してではなく、行に対して行いたいのです。

ご教授頂ければと幸いですのでよろしくお願いします。

Aベストアンサー

#1 の回答者です。読み落としましたので、書き加えました。
ただ、再度書きますが、Excel 2003以上には不要です。
また、これは、クラスインスタンスに設けることも多いです。
これは、右クリックメニュー(Cell)だけでなく、メニューの中も含めます。

サブルーチンを入れ替えてください。

Private Sub InsertEnabled(flg As Boolean)
With Application
 .CommandBars.FindControl(, 296).Enabled = flg
 .CommandBars.FindControl(, 293).Enabled = flg
 .CommandBars("Worksheet Menu Bar").FindControl(, 30003). _
        Controls("削除(&D)...").Enabled = flg
 .CommandBars("Row").FindControl(, 3183).Enabled = flg
 .CommandBars("Cell").FindControl(, 3181).Enabled = flg
End With
End Sub


本来は、2バイト文字を使いたくはないのですが、どうしてもできない部分があります。

#1 の回答者です。読み落としましたので、書き加えました。
ただ、再度書きますが、Excel 2003以上には不要です。
また、これは、クラスインスタンスに設けることも多いです。
これは、右クリックメニュー(Cell)だけでなく、メニューの中も含めます。

サブルーチンを入れ替えてください。

Private Sub InsertEnabled(flg As Boolean)
With Application
 .CommandBars.FindControl(, 296).Enabled = flg
 .CommandBars.FindControl(, 293).Enabled = flg
 .CommandBars("Worksheet Menu Bar").Fin...続きを読む


このカテゴリの人気Q&Aランキング

おすすめ情報