Nombre de Hoja

01/04/2006 - 01:21 por lbenaventea | Informe spam
En la casilla A1 de la Hoja1 tengo un texto (supongamos, XXX) y quiero dar
este nombre a la Hoja2. Intenté con lo siguiente y no me resulta:
Sheets("Hoja1").Select
Range("A1").Select
Sub Test()
Dim Nombre As String
Nombre = ActiveSheet.Range("A1")
Sheets("Hoja2").Name = Nombre
End Sub
Gracias
 

Preguntas similares