URLの列をハイパーリンクに変換して、ユーザーがセル内のURLをクリックしてブラウザで開くようにするにはどうすればよいですか?
100個のURLを貼り付け、それぞれが独自のセルに入りました。セルをダブルクリックしてそのままにすると、Excelがテキストを青に変え、リンクを作成します。 100回ダブルクリックしたくないが、すべてのセルをリンクにフォーマットしたい。
ハイパーリンクを行うためのExcelの関数は=Hyperlink("http://www.techonthenet.com","Tech on the Net")
です。ここで"http://www.techonthenet.com"
はインターネットアドレスであり、"Tech on the Net"
は、Excelセルに表示されるタイトルです。
したがって、URLをExcelファイルに書き込むときは、この関数を各URLで囲みます。動的な名前を付けたくない場合は、常に名前としてURLを使用することもできます。
プログラムで値を挿入していない場合、この site はHYPERLINKワークシート関数の使用について言及しています。さらに良いリファレンスは this ですが、これはExcelにマクロを追加する方法を説明し、マクロのコードを提供します。したがって、このマクロを追加した後、URLの列を選択してマクロを実行すると、列全体がハイパーリンクに変換されます。
ここから: RLをExcelのクリック可能なリンクに変換
Public Sub Convert_To_Hyperlinks()
Dim Cell As Range
For Each Cell In Intersect(Selection, ActiveSheet.UsedRange)
If Cell <> "" Then
ActiveSheet.Hyperlinks.Add Cell, Cell.Value
End If
Next
End Sub
マクロを作成する
- Excelドキュメントを開く
- Alt + F11キーを押して、マクロエディターを開きます。
- [ツール]メニューで、[表示]を左クリックして[プロジェクトエクスプローラ]を選択します。
- 「モジュール」というフォルダを探して右クリックし、「挿入」を選択してから「モジュール」を選択します。
- 選択したプロジェクトモジュールにコードを貼り付けます。
- Alt + F11キーを押してExcelブックに戻る(またはWindowsタスクバーのアイコンをクリックする)。
マクロを実行する
- マクロを実行するには、クリック可能なハイパーリンクに変換するクリックできないテキストリンクを選択します。
- Alt + F8キーを押してマクロセレクターウィンドウを開き、作成したマクロをクリックします。
- あなたのリンクはすべてクリック可能になりました!時間とデータ入力の疲労を軽減します:)
ExcelにURLをライブリンクとして扱うように指示するオプション設定がないとは信じがたいです。結局のところ、Outlookはこれを自動的に行います。しかし、再び-これはマイクロソフト製品です、ため息。
Excelにリンクの列があります。列を選択して、自分宛てのメールに貼り付けました。メールを受け取ったとき(Excel列はまだ選択されています)、ライブリンクを列に貼り付けました。できた!
または、メールを下書きとして保存し、保存した下書きをもう一度開くこともできます。実際にメールを送受信する必要はありません。
以下は1つの数式でクリック可能なリンクを作成します
=CONCAT("<",HYPERLINK(M28,M28),">")
式を上書きして<>
をクリーンアップする場合:
数式を値とともにコピーして貼り付けます。
使用する Ctrl+H<
および>
を個別に何も置き換えません。
これを行う簡単な方法は、ExcelファイルをHTMLページとして保存することです。次に、HTMLページをExcelで再度開くと、リンクがクリック可能になります。
[〜#〜]更新[〜#〜]
これが機能しない場合があります。しかし、これは常に機能するようです。選択した列のURLが置かれている場所を右クリックします。次に、ハイパーリンクをクリックし、[このドキュメントに配置]をクリックします。これは常に機能しているようです。
簡単な操作手順については、 rlテキストをExcelでクリック可能なハイパーリンクに変換する方法 を参照してください。
Excelで、クリック可能なハイパーリンクに変換する列をクリックします。
最初のオプションに従います:URLテキストをVBAコードでクリック可能なハイパーリンクに変換します
手順を実行し、押した後 F5、Microsoft Visual Basicアプリケーションを閉じて、Excelファイルに戻ります。これでURLをクリックできるようになります!
キーラの答えはあなたを指しています here これは本質的にあなたにこれを与え、良い方向でした。要求に応じて大規模な選択を行うことができ、すべてを変換します。
Sub addHypers()
For Each cell In Intersect(Selection, ActiveSheet.UsedRange)
If cell <> "" Then
ActiveSheet.Hyperlinks.Add cell, "http://" + cell.Value
End If
Next cell
End Sub
Sub removeHypers()
Intersect(Selection, ActiveSheet.UsedRange).Hyperlinks.Delete
End Sub
Excelの新しいバージョン(2018以降)では、ホームメニューバーの[スタイル]ドロップダウンを開き、スタイルとして[ハイパーリンク]を選択します。これにより、選択した範囲のクリック可能なハイパーリンクとしてテキストハイパーリンクがフォーマットされます。