Cadipas spain

Creo que la macro tiene que estar en un modulo y que la ejecutes dentro de este lazo: For hoja = 1 To Sheets.Count Sheets(hoja).Range("a1") = 15 Next '--------- En este ejemplo al ejecutar la macro, en todas las hojas en la celda A1 pongo el número...

Vamos por partes, a la primera pregunta te falta decirle a las celdas donde traes la fecha mediante BuscarV que es una fecha, para ello selecciona esas celdas y en el menu de excel pincha en FORMATO - CELDAS y selecciona de la lista de la izquierda...

Para verlo mejor y poder dar una solución optima, sería mejor como tu indicar ver el fichero. Puedes enviarlo a cadipas. Spain ARROBA gmail.com en el asunto pon JOTABCN y trodoexpertos, para que yo sepa de donde viene el fichero y adjunta una pequeña...

Ahí te envío una macro para ver si te sirve: (te creara hojas nuevas de la 4 a la 12 con el nombre SectorX, si modificas los números o el nombre saldrá a tu gusto). Sub hojasnuevas() For x = 4 To 12 Sheets.Add ActiveSheet.Name = "Sector" & x...

La macro sería más o menos así (nota no hago formato condicional, si no que directamente le cambio de color según sea el valor de la columna B): Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column = 2 Then Select Case UCase(Target) '...

Yo suelo utilizar el siguiente formato, de esta forma me pone la palabra FEO en todas las hojas en la celda F1, es un ejemplo, tú lo adaptas a tus necesidades. For i = 1 To Sheets.Count Sheets(i).Range("f1") = "feo" Next i

Viendo tu pregunta la respuesta sencilla podría ser algo así: Yo quiero aumentar o disminuir el valor de la celda A1 y para ello, en el código de la hoja en cuestión pongo este código (teniendo ya creado el SpinButton1 en la hoja, cada vez que pulso...

La vedad es que he probado esta macro y funciona bien, para que lo veas la he modificado y hace la suma progresiva de la celda A1 y se utilizo como auxiliar la B2. Se ve de forma clara. Otra cosa, yo utilizo la versión 2003, puede que por ahí este el...

dentro de select case añade al final: Case Else MsgBox "Material no disponible" Saludos (recuerda si das por terminada la pregunta, cierra y valora)

Para poder ayudarte tendríamos que tener más pistas sobre como tienes organizado el fichero, etc... si quieres puedes aclarar más o enfiarme un fichero con ejemplo y de esa forma lo veo claro y la ayuda es mejor. Mi dirección es cadipas.spain arroba...