Excelで複数の画像からハイパーリンクを抽出する方法は？

ワークシートに画像のリストがあり、各画像にハイパーリンクが含まれているとします。次に、次のスクリーンショットのように、これらの画像から次のセルへの実際のハイパーリンクアドレスを抽出します。 もちろん、ハイパーリンクアドレスをからコピーすることもできます ハイパーリンクを編集する ボックスをXNUMXつずつ作成しますが、複数のハイパーリンクを抽出する必要がある場合、これには時間がかかります。 この記事では、Excelでこのタスクをすばやく簡単に解決するためのいくつかの方法を紹介します。

VBAコードを使用して複数の画像からハイパーリンクを抽出する

VBAコードを使用して複数の画像からハイパーリンクを抽出する

次のVBAコードは、複数のハイパーリンクされた画像から実際のアドレスを一度に抽出するのに役立ちます。手順を追って実行してください。

1。 を押し続けます Alt + F11 Excelでキーを開いて アプリケーション向け Microsoft Visual Basic 窓。

2に設定します。 OK をクリックします。 インセット > モジュール、モジュールウィンドウに次のコードを貼り付けます。

VBAコード：複数のハイパーリンクされた画像から実際のアドレスを抽出します

Sub ExtractHyperlinkFromPicture()
'updateby Extendoffice
    Dim xSh As Shape
    Dim xScreen As Boolean
    xScreen = Application.ScreenUpdating
    Application.ScreenUpdating = False
    For Each xSh In ActiveSheet.Shapes
        If xSh.Type = msoPicture Then
            On Error Resume Next
            Range(xSh.TopLeftCell.Address).Offset(0, 3).Value = xSh.Hyperlink.Address
            On Error GoTo 0
        End If
    Next
    Application.ScreenUpdating = xScreen
End Sub

3。 次に、 F5 このコードを実行するためのキー。すべてのハイパーリンクアドレスが画像の横の対応するセルに抽出されています。スクリーンショットを参照してください。

注意：このコードは、現在のワークシートのすべての画像から実際のアドレスを抽出します。

Kutools AI で Excel の魔法を解き放つ

• スマートな実行: セル操作の実行、データの分析、グラフの作成など、すべて簡単なコマンドで実行できます。
• カスタム式: カスタマイズされた数式を生成してワークフローを効率化します。
• VBAコーディング: VBA コードを簡単に記述して実装します。
• 式の解釈: 複雑な数式を簡単に理解できます。
• テキスト翻訳: スプレッドシート内の言語の壁を打ち破ります。

AI を活用したツールで Excel の機能を強化します。 今すぐダウンロード これまでにない効率性を体験してください!