1
 Copie y pegue el siguiente código en el módulo de VBA: . 
 
 Sub SetValue () 
 
 Worksheets ( " Sheet1" ) Activar 
 < p> ActiveCell.Value = 35 
 
 End Sub 
 2 
 Sustitúyase el texto " Sheet1" a la celda a la que desea asignar un valor. Por ejemplo, si desea asignar un valor a la celda de la columna B , fila 24 , entonces te cambia el código de " Sheet1" a " B24 ". 
 3 
 Reemplazar el 35 con el valor que se desea asignar a la celda. Por ejemplo, puede que sea un número, como 25 , o una cadena de texto, como " Hola". 
 4 
 Llamar a la subrutina SetValue de su módulo escribiendo su nombre : 
 
 SetValue () 
 5 
 Press "F5 " para ejecutar el código y ver la celda en la que escribió en el cambio de código con el valor especificado. 
 
 
          
