Juntar 2 columnas

[Tusa22]

Hola. Disculpen las molestias, quería hacer una consulta y creo que la mejor manera de solucionarlo es con una macro pero no se la manera exacta.

Resulta que yo en la columna A tengo una lista de...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Adrian]

Hola, sopongamos que tenemos en A1 www.todoexcel
en la celda B2 colocamos =HIPERVINCULO(A1&".com";A1&".com")
y copiamos hacia abajo.

O

Puedes probar con la siguiente macro

 

[Adrian]

Sub PonerPuntoCom()
Dim Celda As Range
For Each Celda In Range("A1:A" & Range("A" & Rows.Count).End(xlUp).Row)
Celda = Celda & ".com"
Next
End Sub

 

[Tusa22]

Sub PonerPuntoCom()
Dim Celda As Range
For Each Celda In Range("A1:A" & Range("A" & Rows.Count).End(xlUp).Row)
Celda = Celda & ".com"
Next
End Sub

Mil Gracias Adrian!