Cómo crear hipervínculos en Excel VBA

Usted es el experto en Excel en su oficina. Cuando los compañeros de trabajo necesitan ayuda con la clasificación o agrupación , vienen a ti . Cuando no pueden tener en sus tablas dinámicas para trabajar , vienen a ti . Y cuando se necesita un poco de la automatización en Excel , vienen a ti . Hoy en día, es necesario agregar un hipervínculo a una celda, por lo que su solución automatizada se golpee sus calcetines. Este artículo le dirá qué tan rápido y fácil que es para impresionar a sus compañeros de trabajo con hipervínculos. Instrucciones
1

Identificar la célula que tiene un hipervínculo y seleccione la celda en el código VBA.
2

Utilice el método Add de la colección de hipervínculos para agregar un hipervínculo a la célula . La sentencia siguiente añade el texto " Hola , mundo " a la celda seleccionada , hiper - vincular este texto a la página principal de Google

ActiveSheet.Hyperlinks.Add anclaje: . = Selección, Dirección: = _

" http://www.google.com " , TextToDisplay : = " Hola , mundo "
3

Modificar la declaración del paso 2 para que utilice el texto de la celda y hipervínculo que usted necesita. Si la celda ya contiene el texto que desea utilizar, a continuación, establecer

TextToDisplay : . = Selection.Text

Esto evitará que el código VBA sobrescriba el texto en cada celda

4

Guardar la secuencia de comandos VBA y pruébelo . Asegúrese de que la pila esté correctamente hiperenlace y contiene el texto correcto .