Hipervinculo

hola, MN !

... hacer ... automaticamente ... un hipervinculo a un valor de una celda.
... En la celda tengo ... "123" y quiero que tenga vinculo a http://informe/123.asp, por ejemplo [...]

una forma: selecciona las celdas de la columna y corre una macro +/- como la siguiente...
Sub Cambiar_a_Hipervinculos()
Dim Celda As Range
For Each Celda In Selection
ActiveSheet.Hyperlinks.Add Celda, "http://informe/" & Celda & ".asp"
Next
End Sub
=> el dato que tenga la celda quedara 'tal-cual' [pero el hipervinculo quedara 'realizado'] ;) <
si 'necesitas' un texto 'descriptivo' en la celda [p.e.]...
- pones el texto [que sera la descripcion] en el rango seleccionado y la 'variable/enlace' en la siguiente
- modifica la instruccion a:
ActiveSheet.Hyperlinks.Add Celda, "http://informe/" & Celda.Offset(, 1) & ".asp"

otra alternativa 'invirtiendo' los factores ['variable/enlace' en el rango seleccionado y descripcion en la siguiente]
Celda.Formula = "=Hyperlink("""http://informe/" & Celda & ".asp"",""" & Celda.Offset(, 1) & """)"

saludos,
hector.