caranbis

Ultima celda con datos: =SI(65536-CONTAR.BLANCO(B:B)>0,INDICE(A:B,65536-CONTAR.BLANCO(B:B),1),"") primera celda sin datos (osea la celda inmediatamente inferior a la ultima llena??):...

fecha inicial en A5, fecha final, en B5, dia buscado en C5 (Domingo = 1 Lunes = 2 Martes = 3 Miercoles = 4 Jueves = 5 Viernes = 6 Sabado = 7) total dias en D5, formula:...

Seleccionas las casillas, la fila, o la columna donde quieres introducir los datos, escribes lo que quieres, y luego das "ctrl + enter"

Problema 1 se resuelve con: Sub Auto_Open() Sheets("INSTRUCCIONES").ScrollArea = "A1:B60" End Sub Macro que se ejecuta cuando se abre el libro. Problema 2 se resuelve con: Agrega una columna, la "c" C1= MES(B1) Y autorellenas Para extraer el mes de...

Dim comentario As String comentario = Range("A1") 'asignar comentario a celda determinada. Estando la celda activa Selection. ClearComments ActiveCell. AddComment ActiveCell.Comment.Visible = True ActiveCell.Comment.Text Text:=comentario

No necesitas crear formatos condicionales. Simplemente dale el color a la celda. Porque: Sub colorcelda() Select Case Worksheets("hoja1").Cells(2, 2) Case "CDR": Worksheets("hoja1").Cells(2, 2).Interior.ColorIndex = 3 Case "CRR":...

Insertar en la celda b2 la fórmula: =CONTAR.SI(A:A,A2) Autorellenar hasta b470 Ordenar de manera descendente por columna b. aquellos mayores a uno son los repetidos. Si la columna a tiene un orden especifico no lógico, entonces coloca un consecutivo...

'Primero copias los datos y hora que deseas pegar: sheets("hojadondeingresas la hora de entrada").select Range(selecccionarrango a copiar).select selection.copy 'lo segundo es mirar cual es la celda de la "hoja2"(donde estas pasando los datos) 'que...

sub mimacro () Application.OnTime Now + TimeValue("00:00:07"), "mimacro" 'esto son 7 segundos end sub sub mifecha() dim asdasd as date asdasd = 15/12/2005 if Date = asdasd then .......

La respuesta esta ahí mismo. Usa las mismas condiciones que pones para darle color a las celdas, para contar los valores.