La Web del Programador: Comunidad de Programadores
 
    Pregunta:  58921 - RENOMBRAR OBJETOS DE EXCEL CON VBA
Autor:  Donald Payno
Hola a todos, tengo una duda, trabajo mucho con objetos, y no he encontrado la manera de manipular sus nombres para ahorrar codigo y simplificar las cosas, de hecho no se si sea posible lo que quiero hacer, pero ya que he visto que ustedes son muy buenos en esto solicito su consejo, de ante mano gracias...

este es el codigo que intento correr trae unos comentarios para ayudar a mi explicacion,

Sub a()
W = 1
For W = 1 To 5 'ESTE ES EL INDICE DE LA HOJA _
EL CUAL ES EL QUE QUIERO QUE CAMBIE CON EL BUCLE _
CAMBIAR DE OBJETO, ESTE EJEMPLO ES SUPONIENDO
QUE EL _
LIBRO DE EXCEL TUVIERA 5 HOJAS
i = "hoja" & W
i.Cells(1, 1).Value = "Hola" 'AL LLEGAR AQUI, DICE QUE SE _
REQUIERE _
UN OBJETO Y MANDA ERROR
Next W
End Sub

  Respuesta:  ruben
la instruccion seria

Sub nombre()
mihoja = "Pepe"
Sheets.Add.Name = mihoja 'Creo la hoja por si no existe
Sheets(mihoja).Cells(1, 1).Value = "Hola"
End Sub