Como obtenho um hiperlink de imagem em texto? [fechadas]

Tenho imagens com hiperlinks (copiados da internet). Preciso converter os hiperlinks ocultos em URL em outra linha.

Como faço isso?

Você não nos deu muitas informações sobre COMO deseja fazer isso, então aqui está a maneira funcional básica de fazê-lo.

1. Clique com o botão direito na imagem, selecione Edit Hyperlink
2. Marque URLa Addresscaixa

3. Pressione Ctrl+ cpara copiá-lo
4. Feche a janela
5. Selecione a célula que você deseja colar o hiperlink
6. Pressione Ctrl+ vpara colar

Podem ser realizadas formas mais automatizadas de fazer isso, mas requer conhecimento de recursos avançados no Excel para usar o VBA. Não sabemos qual é o seu nível de experiência e você não explicou o que tentou ou fez por conta própria.

Para automatizar isso usando o VBA, adicione o código abaixo ao explorador do VBA em Sheet1.

Você pode acessar a janela do VBA pressionando Alt+ F11.

Código:

Sub GetImangeHyperlinks()

Dim shp As Shape
Dim sTemp As String

For Each shp In ActiveSheet.Shapes
    sTemp = ""
    On Error Resume Next 'go to next shape if no hyperlink
    sTemp = shp.Hyperlink.Address
    On Error GoTo 0
    If sTemp <> "" Then
        'activate the cell the image is in    
        shp.TopLeftCell.Activate
        'paste down one row and back one column
        ActiveCell.Offset(1, -1).Value = sTemp 
    End If
Next

End Sub

Para executar o código, coloque o cursor pela palavra Sub, no início do código, e pressione F5. Ele deve ser executado rapidamente e os resultados devem ser assim.