Red de conocimiento informático - Problemas con los teléfonos móviles - [Solución maestra] En VBA, marque los datos duplicados en la columna C en rojo y aparecerá un cuadro de diálogo. El color de otras celdas no cambiará, ¡gracias! !

[Solución maestra] En VBA, marque los datos duplicados en la columna C en rojo y aparecerá un cuadro de diálogo. El color de otras celdas no cambiará, ¡gracias! !

Sub?a()

Dim?i?As?Long,?iRow?As?Long

Dim?strColorCell?As?String

iRow?=?Range("C60000").End(xlUp).Row

For?i?=?3?To?iRow

If?WorksheetFunction. CountIf(Rango("C:C"),?Rango("C"?amp;?i))?gt;?1?Entonces

Rango("C"?amp;?i). Interior.Color?=?RGB(255,?255,?0)

strColorCell?=?Range("C"?amp;?i).Dirección?amp;?Chr(10)?amp ;?strColorCell

Fin?If

Siguiente

MsgBox?strColorCell

Fin?Sub

Alt F11 Abra la ventana de edición, inserte el módulo, copie y pegue el código y ejecute F5.

Descripción del código: Verifique la columna C. Si hay duplicados, las celdas se colorearán de amarillo y finalmente se mostrarán todas las direcciones de las celdas.

上篇: ¿Qué es la luna en la esquina superior derecha del teléfono vivo? 下篇: Cómo comprobar la cuenta móvil de vivo

Artículos populares