Programación General > Visual Basic 6.0 e inferiores

 Re: Excel con VB

(1/1)

acanalis:
Necesito saber como puedo renombrar las hojas de los libros del excel desde vb y también como puedo cambiar de hojas ya que solo puedo escribir en la primera y no tengo ni idea como pasar a la siguiente.

Gracias:question:

Brroz:
Fíjate en las líneas siguientes:

Dim objApp  As Object ' Aplicación
Set objApp = GetObject(, "Excel.Application")
Dim objWb As Object ' WorkBook
Set objWb = objApp.WorkBooks(1)

'Aquí viene la parte que más te interesa

Dim objSh As Object ' WorkSheet

' Para añadir una hoja y ponerle un nombre:
Set objSh = objWb.Worksheets.Add()
objSh.Name = "Mi nueva hoja"

'Para obtener la referencia a la última hoja, saber cómo se llama y cambiarle el nombre
Set objSh = objWb.Sheets(objWb.Worksheets.Count)
MsgBox objSh.Name
objSh.Name = "Nuevo nombre"

'Para obtener la referencia a la primera hoja
Set objSh = objWb.Sheets(1)

'Para obtener la referencia a una hoja por su nombre
Set objSh = objWb.Sheets("Hoja x")

A partir de aquí, ya sabes como va el resto...

Suerte.

Navegación

[0] Índice de Mensajes