excel-2007 - para - hipervinculo en excel a una celda especifica

¿Cómo convierto una columna de URL de texto en hipervínculos activos en Excel? (21)

Aquí hay una manera que encontré. Estoy en una Mac con Excel 2011. Si la columna B tenía los valores de texto que desea que sean hipervínculos, coloque esta fórmula en la celda C1 (o D1 o lo que sea, siempre que sea una columna libre): =HYPERLINK(B1,B1) Esto insertará un hipervínculo con la ubicación como el texto del enlace y el "nombre descriptivo" como el texto del enlace. Si tiene otra columna que tiene un nombre descriptivo para cada enlace, también puede usarlo. Luego, puede ocultar la columna de texto si no desea verla.

Si tiene una lista de ID de algo, y las URL son todas http://website.com/folder/ID , como:

podría usar algo como =HYPERLINK("http://website.com/folder/"&A1,A1) y no necesitaría la lista de direcciones URL. Esa fue mi situación y funcionó muy bien.

Según esta publicación: http://excelhints.com/2007/06/12/hyperlink-formula-in-excel/ este método también funcionará en Excel 2007.

Tengo una columna en Excel, donde tengo todos los valores de URL del sitio web. Mi pregunta es que quiero convertir los valores de url en enlaces activos. Hay alrededor de 200 entradas en esa columna con diferentes URL en todas las celdas. ¿Hay alguna manera de crear hipervínculos activos a todas las celdas sin escribir una macro?

Bien, aquí hay una solución hokey, pero simplemente no puedo averiguar cómo hacer que Excel evalúe una columna de URL como hipervínculos en masa.

Cree una fórmula, ="=hyperlink(""" & A1 & """)"
Arrastre hacia abajo
Copiar nueva columna de fórmula
Pegar valores especiales, solo sobre la columna original
Resalte la columna, haga clic en Ctrl - H (para reemplazar), busque y reemplace = con = (de alguna manera obliga a la reevaluación de las celdas).
Las celdas ahora se pueden hacer clic como hipervínculos. Si desea el estilo azul / subrayado, simplemente resalte todas las celdas y elija el estilo Hipervínculo.

El estilo del hipervínculo por sí solo no se convertirá en enlaces en los que se puede hacer clic, y el diálogo "Insertar hipervínculo" no parece utilizar el texto como la dirección de un grupo de celdas en masa. Aparte de eso, F2 y Enter a través de todas las celdas lo harían, pero eso es tedioso para muchas celdas.

Coloque las URL en una tabla HTML, cargue la página HTML en un navegador, copie el contenido de esa página y péguela en Excel. En este punto, las URL se conservan como enlaces activos.

La solución se propuso en http://answers.microsoft.com/en-us/mac/forum/macoffice2008-macexcel/how-to-copy-and-paste-to-mac-excel-2008-a-list-of/c5fa2890-acf5-461d-adb5-32480855e11e por (Jim Gordon Mac MVP) [ http://answers.microsoft.com/en-us/profile/75a2b744-a259-49bb-8eb1-7db61dae9e78]

Encontré que funcionó.

Tuve estas URLs:

https://twitter.com/keeseter/status/578350771235872768/photo/1 https://instagram.com/p/ys5ASPCDEV/ https://igcdn-photos-g-a.akamaihd.net/hphotos-ak-xfa1/t51.2885-15/10881854_329617847240910_1814142151_n.jpg https://twitter.com/ranadotson/status/539485028712189952/photo/1 https://instagram.com/p/0OgdvyxMhW/ https://instagram.com/p/1nynTiiLSb/

Los puse en un archivo HTML (links.html) como este:

<table> <tr><td><a href="https://twitter.com/keeseter/status/578350771235872768/photo/1">https://twitter.com/keeseter/status/578350771235872768/photo/1</a></td></tr> <tr><td><a href="https://instagram.com/p/ys5ASPCDEV/">https://instagram.com/p/ys5ASPCDEV/</a></td></tr> <tr><td><a href="https://igcdn-photos-g-a.akamaihd.net/hphotos-ak-xfa1/t51.2885-15/10881854_329617847240910_1814142151_n.jpg">https://igcdn-photos-g-a.akamaihd.net/hphotos-ak-xfa1/t51.2885-15/10881854_329617847240910_1814142151_n.jpg</a></td></tr> <tr><td><a href="https://twitter.com/ranadotson/status/539485028712189952/photo/1">https://twitter.com/ranadotson/status/539485028712189952/photo/1</a></td></tr> <tr><td><a href="https://instagram.com/p/0OgdvyxMhW/">https://instagram.com/p/0OgdvyxMhW/</a></td></tr> </table>

Luego cargué el archivo links.html en mi navegador, lo copié, pegué en Excel y los enlaces estaban activos.

Con Excel 2007 en Windows, encontré estos pasos más simples;

Seleccionar celdas con las URL no activas
Dupdo
Pegar como hipervínculo

Crea la macro como aquí:

En el menú Herramientas en Microsoft Excel, seleccione Macro y luego haga clic en Editor de Visual Basic. En el menú Insertar, haga clic en Módulo. Copie y pegue este código en la ventana de código del módulo. Se nombrará automáticamente a sí mismo HyperAdd.

Sub HyperAdd() ''Converts each text hyperlink selected into a working hyperlink For Each xCell In Selection ActiveSheet.Hyperlinks.Add Anchor:=xCell, Address:=xCell.Formula Next xCell End Sub

Cuando haya terminado de pegar su macro, haga clic en Cerrar y volver a Microsoft Excel en el menú Archivo.

Luego seleccione las celdas requeridas y haga clic en macro y haga clic en ejecutar.

NOTA ¡NO seleccione toda la columna! Seleccione SOLAMENTE las celdas que desea cambiar a enlaces en los que se pueda hacer clic, de lo contrario, terminará en un bucle interminable y tendrá que reiniciar Excel. ¡Hecho!

Descubrí que ninguno de los métodos aquí funcionaba si el hipervínculo no incluía http: // ya que se vinculaban a ubicaciones locales.

También quería hacer el guión a prueba de errores, ya que los usuarios no podrían mantenerlo por sí mismos y yo no estaría disponible.

Solo se ejecutará en celdas de un rango seleccionado si contienen un punto y no espacios. Sólo se ejecutará para hasta 10.000 células.

Sub HyperAdd() Dim CellsWithSpaces As String ''Converts each text hyperlink selected into a working hyperlink Application.ScreenUpdating = False Dim NotPresent As Integer NotPresent = 0 For Each xCell In Selection xCell.Formula = Trim(xCell.Formula) If xCell.Formula = "" Or InStr(xCell.Formula, ".") = NotPresent Then ''Do nothing if the cell is blank or contains no dots Else If InStr(xCell.Formula, " ") <> 0 Then CellsWithSpaces = CellsWithSpaces & ", " & Replace(xCell.Address, "$", "") GoTo Nextxcell End If If InStr(xCell.Formula, "http") <> 0 Then Hyperstring = Trim(xCell.Formula) Else Hyperstring = "http://" & Trim(xCell.Formula) End If ActiveSheet.Hyperlinks.Add Anchor:=xCell, Address:=Hyperstring End If i = i + 1 If i = 10000 Then Exit Sub Nextxcell: Next xCell If Not CellsWithSpaces = "" Then MsgBox ("Please remove spaces from the following cells:" & CellsWithSpaces) End If Application.ScreenUpdating = True End Sub

Este método funciona para mí usando la función de hipervínculo:

=HYPERLINK("http://"&B10,B10)

Donde B10 es la celda que contiene la versión de texto de la URL (en este ejemplo).

Gracias Cassiopeia por el código. Cambié su código para trabajar con direcciones locales e hice pequeños cambios a sus condiciones. He eliminado las siguientes condiciones:

Cambiar http:/ a file:///
Eliminado todo tipo de condiciones de espacios en blanco.
Se cambió la condición del rango de 10k celdas a 100k

Sub HyperAddForLocalLinks() Dim CellsWithSpaces As String ''Converts each text hyperlink selected into a working hyperlink Application.ScreenUpdating = False Dim NotPresent As Integer NotPresent = 0 For Each xCell In Selection xCell.Formula = Trim(xCell.Formula) If InStr(xCell.Formula, "file:///") <> 0 Then Hyperstring = Trim(xCell.Formula) Else Hyperstring = "file:///" & Trim(xCell.Formula) End If ActiveSheet.Hyperlinks.Add Anchor:=xCell, Address:=Hyperstring i = i + 1 If i = 100000 Then Exit Sub Nextxcell: Next xCell Application.ScreenUpdating = True End Sub

Hay una manera muy simple de hacer esto. Cree un hipervínculo y, a continuación, utilice Format Painter para copiar el formato. Se creará un hipervínculo para cada elemento.

La forma más sencilla en Excel 2010: seleccione la columna con el texto de la URL, luego seleccione Estilo de hipervínculo en la pestaña Inicio. Todas las URL en la columna ahora son hipervínculos.

También al hacer doble clic en cada celda al final del texto de la URL y agregar un espacio en blanco o simplemente ingresar, también se generará un hipervínculo. Similar a la forma en que tiene que crear enlaces URL en los correos electrónicos de MS Outlook.

La manera más fácil aquí

Resalte toda la columna
haga clic en '''' insertar ''''
haga clic en '''' Hipervínculo ''''
haga clic en '''' lugar en este documento ''''
haga clic en Aceptar
eso es todo

Manera bastante fácil para listas bastante cortas:

Haga doble clic en la casilla donde está la URL.
Entrar

Tienes tu enlace;)

Me sorprendió que Excel no hiciera esto automáticamente, así que aquí está mi solución, espero que sea útil para otros.

Copia toda la columna al portapapeles.
Abre esto en tu Chrome o Firefox

data:text/html,<button onclick="document.write(document.body.querySelector(''textarea'').value.split(''/n'').map(x => ''<a href=/''' + x + ''/'>'' + x + ''</a>'').join(''<br>''))">Linkify</button><br><textarea></textarea>

Pega la columna en la página que acabas de abrir en el navegador y presiona "Vincular"
Copie el resultado de la pestaña a la columna en Excel

En lugar del paso dos, puede usar la página siguiente, primero, haga clic en "Ejecutar fragmento de código" y luego pegue la columna en ella.

<button onclick="document.write(document.body.querySelector(''textarea'').value.split(''/n'').map(x => ''<a href=/''' + x + ''/'>'' + x + ''</a>'').join(''<br>''))">Linkify</button><br><textarea></textarea>

Para cualquiera que llegue aquí con Excel 2016, simplemente puede resaltar la columna y luego hacer clic en la pestaña Hyperlink ubicada en la cinta de Home en el cuadro Styles .

Edición: Desafortunadamente, esto solo actualiza el estilo de celda, no la función.

Para mí, simplemente copié la columna completa que tiene las URL en formato de texto en otra aplicación (por ejemplo, Evernote), y cuando se pegaron allí, se convirtieron en enlaces, y luego las copié de nuevo en Excel.

Lo único aquí es que necesita asegurarse de que los datos que copia vuelven a alinearse con el resto de las columnas.

Prueba esto:

= HYPERLINK ("mailto:" & A1, A1)

Reemplace A1 con su texto de celda de dirección de correo electrónico.

Puede insertar la fórmula =HYPERLINK(<your_cell>,<your_cell>) en la celda adyacente y arrastrarla hasta el final. Esto le dará una columna con todos los enlaces. Ahora, puede seleccionar su columna original haciendo clic en el encabezado, haga clic con el botón derecho y seleccione Hide .

Si agregar una columna adicional con los hipervínculos no es una opción, si tiene instalado notepad ++, puede:

Copia la columna de direcciones a Notepad ++
Manteniendo presionado ALT - MAYÚS , extendió el cursor desde la esquina superior izquierda hasta la esquina inferior derecha y escriba =hyperlink(" . Esto agrega =hyperlink(" al principio de cada entrada).
Abra el menú "Reemplazar" ( Ctrl - H ), active expresiones regulares ( ALT - G ) y reemplace $ (final de línea) con "/) . Esto agrega una comilla cerrada y un paréntesis cerrado (que debe ser evitado con / cuando las expresiones regulares están activadas) al final de cada línea.
Vuelve a pegar los datos en Excel. En la práctica, solo copie los datos y seleccione la primera celda de la columna donde desea que terminen los datos.

Si copia el contenido del texto en una nueva columna y utiliza:

=HYPERLINK("http://"&B10,B10)

en su columna original. Luego usa $ para la columna para que se vea así:

=HYPERLINK("http://"&$B10,$B10)

Esa es la única forma en que funcionó para mí en Excel 2010 en Windows 7. Puede copiar la fórmula.

Si no desea crear una macro y siempre que no le importe una columna adicional, simplemente cree una nueva columna junto a su columna de URL.

En el nuevo tipo de columna en la fórmula =HYPERLINK(A1) (reemplazando A1 con cualquier celda que le interese). Luego copia la fórmula del resto de las 200 entradas.

NOTA: esta solución no funciona si la celda A1 contiene una cadena de más de 255 caracteres. Se traduce en un #VALUE! error

Tenía una lista de números que se insertan en las URL. Quiero un enlace activo. Por ejemplo, tengo la Columna A con números de pregunta (es decir, 2595692, 135171) y quiero convertir estos números de pregunta en enlaces activos y mostrar solo los números de pregunta.

Así que construí un hipervínculo de solo texto que apunta a la Columna A y lo copié para todos mis números de preguntas:

= "= HYPERLINK (" & "" "http" "&" ":" "" & "" & "&" & "" // .com/questions/"&A1&""""&"""&A1& ")"

Luego copio y pegue el valor de esta columna de texto con hipervínculos a otra columna.

Terminas con una columna de texto que se parece a lo siguiente:

= HYPERLINK ("http" & ":" & "// .com/questions/2595692",2595692)

Luego seleccioné estos elementos pegados y ejecuté la macro F2Entry que sigue:

Sub F2Enter() Dim cell As Range Application.Calculation = xlCalculationManual For Each cell In Selection cell.Activate cell = Trim(cell) Next cell Application.Calculation = xlCalculationAutomatic EndSub

Luego borré la columna de entrada de texto y la columna A.

Terminé con una sola columna de números de preguntas enlazadas en caliente:

2595692

135171

etc.

Aclamaciones