caranbis

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.

Lo quieres es hacer un virus.

No se puede

Realmente no veo la forma y no existe fórmula para hacerlo directamente en las celdas, tiene que recurrir a vb.