¿Divide una sola columna de Excel en dos columnas separadas, dividiendo los valores? - excel, excel-2010

¿Cómo divido una sola columna de Excel cuyos valores se definen como tales:

= HYPERLINK ("http://whatever.com", "Título del sitio web")

en dos columnas separadas, una con el título ("Título del sitio web") y otra con la URL ("http://whatever.com")

¿nadie?

(Esto es para Excel 2010)

Respuestas

Esto funcionaría si estás dispuesto a usar VBA.

Option Explicit

Sub SplitHyperLinkFormula()
Dim r As Range
For Each r In Selection
If InStr(1, r.Formula, "=hyperlink", vbTextCompare) = 1 Then
r.Offset(0, 1).Value = GetHyperlink(r.Formula) "Split URL
r.Offset(0, 2).Value = r.Value                 "Split Title
End If
Next r
End Sub

Function GetHyperlink(s As String)
"Requires =HYPERLINK formula, assumes hyperlink has no commas.
s = Left(s, InStr(s, ",") - 2)
GetHyperlink = Right(s, Len(s) - 12)
End Function

Simplemente resalte lo que necesite dividir y ejecute SplitHyperLinkFormula. Pondrá los dos valores que deseabas en las dos celdas a la derecha de tu celda.

Advertencia: si por alguna razón su hipervínculo tiene una coma, esto solo devolverá la porción de la URL antes de la coma.

Aquí hay una alternativa que no usa VBA.

1. Seleccione el rango, use Buscar Reemplazar para cambiar = signos a otra cosa (como #). Esto reemplaza la fórmula con una cadena como

   "#HYPERLINK (" http://whatever.com "," Título del sitio web ")"

2. Use Texto a columnas, usando "(comillas dobles) como delimitador, y descarte todas las columnas excepto la URL y el Título del sitio web.