Duda en una macro...

Solo consultas sobre macros y código VBA Excel.

Reglas del Foro
1. Antes de hacer tu pregunta intenta con el buscador de este foro (muchas preguntas ya fueron respondidas antes!)
2. Si haces una nueva pregunta, es muy recomendable que adjuntes el ejemplo Excel para poder comprenderla mejor!
3. Realiza tu pregunta de forma clara, explicando bien cada paso de lo que haces y tendrás más probabilidad de respuesta!
Compartir en:
     

Duda en una macro...

Notapor acero » 26 May 2006 09:32

Estoy intentando hacer una macro en la que insertes un color en la hoja de "INICIO" y en otra hoja (pero que el nombre de esta sea variable dependiendo del año en el que estemos - por ejemplo este año que se inserte en la hoja "OF2006", el año que viene en la hoja "OF2007" y así­ sucesivamente)

Muchas gracias por vuestra ayuda.
No tiene los permisos requeridos para ver los archivos adjuntos a este mensaje.
* Te recomendamos estos productos Excel: Manual de Macros | Manual de Funciones | Nuevas Funciones | ddTraDa
acero
Miembro Frecuente
Miembro Frecuente
 
Registrado: 27 Sep 2005 09:27

Re: Duda en una macro...

Notapor ST » 26 May 2006 18:58

acero:
si solo lo vas a hacer una vez al año,cual es el interes de usar macros ya que solo invertirias menos de 30 segundos en hacerlo manualmente?

como dice KL a veces queremos matar moscas a cañonazos :twisted: (es broma)

prueba esto: :arrow:

Código: Seleccionar todo
Private Sub CommandButton1_Click()
Sheets(1).[a1].Interior.ColorIndex = Val(TextBox1)
Sheets("OF" & Year(Date)).[a1].Interior.ColorIndex = Val(TextBox1)
MsgBox "COLOR ASIGNADO"
End Sub
* Te recomendamos estos productos Excel: Manual de Macros | Manual de Funciones | Nuevas Funciones | ddTraDa
Avatar de Usuario
ST
Miembro Frecuente
Miembro Frecuente
 
Registrado: 06 Jun 2005 17:56
Ubicación: Acapulco

Re: Duda en una macro...

Notapor acero » 05 Jun 2006 03:38

Muchas gracias con esto:

Sheets("OF" & Year(Date)).Select

Ya hice lo que estaba buscando.
* Te recomendamos estos productos Excel: Manual de Macros | Manual de Funciones | Nuevas Funciones | ddTraDa
acero
Miembro Frecuente
Miembro Frecuente
 
Registrado: 27 Sep 2005 09:27


Compartir en:
     

  • Anuncio
Manual Excel avanzado

Volver a Macros

¿Quién está conectado?

Usuarios navegando por este Foro: Bing [Bot], dalave y 9 invitados