Macro para poner hipervinculo buscando un archivo con el nombre de una celda

Necesito un macro que busque un hipervinculo en una carpeta especifica que seria C:\Users\EWA\Desktop\SISTEMA EN PROCESO MACROS\REGISTRO DE FACTURAS\" y el nombre del archivo para el hipervinculo estaría situado en una celda especifica D1000 

Y por ultimo que el hipervinculo se situé en la celda G1000.

:)

1 respuesta

Respuesta
1

Puedes explicar lo que necesitas con un ejemplo, utiliza imágenes para explicar tu ejemplo.

Espero puedas entender lo ue necesito, gracias.

Te anexo la macro

Sub InsertarHipervinculo()
'Por.Dante Amor
    direccion = "C:\Users\EWA\Desktop\SISTEMA EN PROCESO MACROS\REGISTRO DE FACTURAS\"
    archivo = [D1000] & ".pdf"
    texto = "Factura: " & archivo
    '
    ActiveSheet.Hyperlinks.Add _
        Anchor:=[G1000], _
        Address:=direccion & archivo, _
        TextToDisplay:=texto
End Sub

Saludos.Dante Amor

Recuerda valorar la respuesta.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Función buscarv sobre el resultado de una celda

Trato de obtener resultado sobre la función de buscarv la cual detallo esta :=SI.ERROR(BUSCARV(B666;COMPRAS!$M$3:$O$325;3;FALSO);""). Lo busco sobre una celda que tiene la siguiente formula: =SI(D666="Apertura ";"";IZQUIERDA($G$666;10)). El resultado...
2 respuestas

Una macro no se ejecuta desde otra macro, pero sí si la ejecuto manualmente, ¿Por qué?

En una hoja tengo un botón que ejecuta el siguiente código: Sub preguntar_scroll() Dim respuesta respuesta = MsgBox("¿Quieres extender la pantalla actual?", vbYesNo + vbQuestion, "Extender pantalla") If respuesta = vbYes Then Sheets("visor").Activate...
1 respuesta

Mover contenido de una celda hacia arriba y abajo

Mover el contenido de una celda de una tabla con un botón hacia arriba y hacia abajo. En una hoja de excel. Y poder colocarlo donde uno desee.
1 respuesta

Valor de una celda de Excel

Tengo tres hojas de calculo, una seria el real otra el presupuesto y otra que seria a que tendría que poner el dato mi pregunta es como podría hacer sil a de real tiene valor cogiera ese valor, en caso de no existir ese dato cogiera de la tabla de...
1 respuesta

Crear Macro, con condiciones y editar celda

¿Cómo crear una macro que Busque en toda la hoja, (bucle con condiciones), introduciendo texto y se pueda editar celda?
1 respuesta

Trabajar con una ventana duplicada en excel

Tengo una macro mediante la cual me duplica la ventana activa de excel para mostrarla en un segundo monitor: Sub bot_extenderpantalla_Click() 'creamos una nueva ventana de excel con la hoja activa (visor) Sheets("visor").Activate...
1 respuesta

Extraer datos de celdas descontinuas de una hoja de excel.

Extraer datos de celdas descontinuas de una hoja de excel y enviarlos a otra hoja donde hay una tabla donde se van a ir agregando los datos por cada día en la parte de abajo. Ejemplo datos de: HOJA1 J11, H12, E18, O19,020, O21, O22, F23, J23...
1 respuesta

Al agregar columnas en una hoja de Excel, se desconfiguraron unas fórmulas.

Tengo un archivo de Excel con 4 hojas en una tengo RENTAS y en la segunda NOTAS en donde al ponerle el número de pedido me jala la información de la hoja RENTAS. Pero tengo la necesidad de agregar más columnas con más productos, y al agregar esas...
2 respuestas

Agregue un tercer combobox de búsqueda y dar problema

Sigo aprendiendo a través de su ayuda. Resulta que sigo con mi data y en un formulario utilizo dos combobox para filtrar registros por Año y por Mes, gracias a la ayuda de Don Eduardo y Julián que me orientaron a la perfección funcionan a la pinta ya...
2 respuestas

Uso de filtros avanzados y listbox en userfotm

Tengo una tabla, con nombre, productos y mes, ¿Cómo filtrar por mes y aparezca en un listbox de un userform?
3 respuestas