Índice

Solución 6.3 Modificar las propiedades de un objeto

1. Renombrar una hoja de un libro

Sub RenombrarHojaCalculo()  
 Dim wksHoja As Worksheet  
 Set wksHoja = Workbooks("Introduccion Programacion Objetos.xlsm ") _  
  .Worksheets(2)  
  wksHoja.Name = "Prueba"  
End Sub

2. Asignar un nuevo valor a una celda

Sub CambiarValor()  
 Dim wksHoja As Worksheet  
 Dim rngRango As Range  
 Set wksHoja = Workbooks("Introduccion Programacion Objetos.xlsm ") _  
 .Worksheets("Inicio")   ...