ਸਮੱਗਰੀ

ਮਿਆਰੀ ਮਾਈਕਰੋਸਾਫਟ ਐਕਸਲ ਟੂਲਸ ਵਿੱਚ, ਰੰਗ ਦੇ ਨਾਲ ਡੁਪਲੀਕੇਟ ਨੂੰ ਹਾਈਲਾਈਟ ਕਰਨ ਦੇ ਬਹੁਤ ਸਾਰੇ ਵੱਖ-ਵੱਖ ਤਰੀਕੇ ਹਨ। ਸਭ ਤੋਂ ਆਸਾਨ ਅਤੇ ਤੇਜ਼ ਤਰੀਕਾ ਕੰਡੀਸ਼ਨਲ ਫਾਰਮੈਟਿੰਗ ਨਾਲ ਹੈ। ਅਜਿਹਾ ਕਰਨ ਲਈ, ਸਿਰਫ਼ ਸੈੱਲਾਂ ਦੀ ਇੱਕ ਸੀਮਾ ਚੁਣੋ ਅਤੇ ਟੈਬ 'ਤੇ ਚੁਣੋ ਘਰ — ਸ਼ਰਤੀਆ ਫਾਰਮੈਟਿੰਗ — ਸੈੱਲ ਚੋਣ ਨਿਯਮ — ਡੁਪਲੀਕੇਟ ਮੁੱਲ (ਘਰ — ਸ਼ਰਤੀਆ ਫਾਰਮੈਟਿੰਗ — ਹਾਈਲਾਈਟ ਸੈੱਲ ਨਿਯਮ — ਡੁਪਲੀਕੇਟ ਮੁੱਲ):

ਡੁਪਲੀਕੇਟ ਦਾ ਦੋਹਰਾ ਪ੍ਰਕਾਸ਼

ਹਾਲਾਂਕਿ, ਇਸ ਸਥਿਤੀ ਵਿੱਚ, ਸਾਰੇ ਸੈੱਲਾਂ ਦਾ ਭਰਨ ਦਾ ਰੰਗ ਇੱਕੋ ਜਿਹਾ ਹੋਵੇਗਾ, ਭਾਵ ਇਹ ਸਿਰਫ਼ ਸੰਕੇਤ ਦਿੰਦਾ ਹੈ ਕਿ ਤੱਤ ਨੇ ਰੇਂਜ ਵਿੱਚ ਕਿਤੇ ਹੋਰ ਡੁਪਲੀਕੇਟ ਕੀਤਾ ਹੈ, ਪਰ ਉਹਨਾਂ ਨੂੰ ਲੱਭਣ ਵਿੱਚ ਮਦਦ ਕਰਨ ਲਈ ਕੁਝ ਨਹੀਂ ਕਰਦਾ। ਤੁਸੀਂ ਇੱਕ ਛੋਟੇ ਮੈਕਰੋ ਨਾਲ ਸਥਿਤੀ ਨੂੰ ਠੀਕ ਕਰ ਸਕਦੇ ਹੋ ਜੋ ਦੁਹਰਾਉਣ ਵਾਲੇ ਡੁਪਲੀਕੇਟਾਂ ਦੇ ਹਰੇਕ ਜੋੜੇ (ਜਾਂ ਵੱਧ) ਨੂੰ ਇਸਦੇ ਆਪਣੇ ਰੰਗ ਨਾਲ ਭਰ ਦੇਵੇਗਾ:

ਡੁਪਲੀਕੇਟ ਦਾ ਦੋਹਰਾ ਪ੍ਰਕਾਸ਼

ਇੰਨਾ ਸਾਫ਼, ਠੀਕ ਹੈ? ਬੇਸ਼ੱਕ, ਦੁਹਰਾਉਣ ਵਾਲੇ ਸੈੱਲਾਂ ਦੀ ਇੱਕ ਵੱਡੀ ਗਿਣਤੀ ਦੇ ਨਾਲ, ਸ਼ੇਡਾਂ ਵਿੱਚ ਫਰਕ ਕਰਨਾ ਮੁਸ਼ਕਲ ਹੋਵੇਗਾ, ਪਰ ਡੁਪਲੀਕੇਟ ਦੀ ਇੱਕ ਮੁਕਾਬਲਤਨ ਛੋਟੀ ਗਿਣਤੀ ਦੇ ਨਾਲ, ਇਹ ਵਿਧੀ ਪੂਰੀ ਤਰ੍ਹਾਂ ਕੰਮ ਕਰੇਗੀ.

ਇਸ ਮੈਕਰੋ ਦੀ ਵਰਤੋਂ ਕਰਨ ਲਈ, ਕੀਬੋਰਡ ਸ਼ਾਰਟਕੱਟ ਦਬਾਓ Alt + F11 ਜਾਂ ਬਟਨ ਵਿਜ਼ੂਅਲ ਬੇਸਿਕ ਟੈਬ ਡਿਵੈਲਪਰ, ਮੀਨੂ ਰਾਹੀਂ ਇੱਕ ਨਵਾਂ ਖਾਲੀ ਮੋਡੀਊਲ ਪਾਓ ਸੰਮਿਲਿਤ ਕਰੋ - ਮੋਡੀਊਲ ਅਤੇ ਉੱਥੇ ਇਸ ਮੈਕਰੋ ਦੇ ਕੋਡ ਦੀ ਨਕਲ ਕਰੋ:

Sub DuplicatesColoring() Dim Dupes() 'ਡੁਪਲੀਕੇਟਸ ਨੂੰ ਸਟੋਰ ਕਰਨ ਲਈ ਇੱਕ ਐਰੇ ਘੋਸ਼ਿਤ ਕਰੋ ReDim Dupes(1 To Selection.Cells.Count, 1 to 2) Selection.Interior.ColorIndex = -4142 'ਫਿਲ ਨੂੰ ਹਟਾਓ ਜੇਕਰ i = 3 ਹਰੇਕ ਸੈੱਲ ਵਿੱਚ ਚੋਣ ਜੇਕਰ WorksheetFunction.CountIf(ਚੋਣ, cell.Value) > 1 ਫਿਰ k = LBound(Dupes) ਤੋਂ UBound(Dupes) ' ਲਈ ਜੇਕਰ ਸੈੱਲ ਪਹਿਲਾਂ ਹੀ ਡੁਪਲੀਕੇਟ ਦੀ ਐਰੇ ਵਿੱਚ ਹੈ, ਤਾਂ ਭਰੋ If Dupes(k, 1) = ਸੈੱਲ ਫਿਰ cell.Interior. ColorIndex = Dupes(k, 2) Next k' ਜੇਕਰ ਸੈੱਲ ਵਿੱਚ ਡੁਪਲੀਕੇਟ ਹੈ, ਪਰ ਅਜੇ ਐਰੇ ਵਿੱਚ ਨਹੀਂ ਹੈ, ਤਾਂ ਇਸਨੂੰ ਐਰੇ ਵਿੱਚ ਸ਼ਾਮਲ ਕਰੋ ਅਤੇ ਇਸਨੂੰ ਭਰੋ ਜੇਕਰ cell.Interior.ColorIndex = -4142 ਫਿਰ cell.Interior.ColorIndex = i Dupes(i, 1 ) = cell. Value Dupes(i, 2) = ii = i + 1 End If End ਜੇਕਰ ਅਗਲਾ ਸੈੱਲ ਅੰਤ ਸਬ  

ਹੁਣ ਤੁਸੀਂ ਸ਼ੀਟ 'ਤੇ ਡੇਟਾ ਦੇ ਨਾਲ ਕੋਈ ਵੀ ਰੇਂਜ ਚੁਣ ਸਕਦੇ ਹੋ ਅਤੇ ਕੀਬੋਰਡ ਸ਼ਾਰਟਕੱਟ ਦੀ ਵਰਤੋਂ ਕਰਕੇ ਸਾਡੇ ਮੈਕਰੋ ਨੂੰ ਚਲਾ ਸਕਦੇ ਹੋ Alt + F8 ਜਾਂ ਬਟਨ ਰਾਹੀਂ ਮੈਕਰੋ (ਮੈਕਰੋ) ਟੈਬ ਡਿਵੈਲਪਰ (ਡਿਵੈਲਪਰ).

  • ਰੰਗ ਦੇ ਨਾਲ ਡੁਪਲੀਕੇਟ ਨੂੰ ਉਜਾਗਰ ਕਰੋ
  • ਮੈਕਰੋ ਕੀ ਹਨ, ਵਿਜ਼ੂਅਲ ਬੇਸਿਕ ਵਿੱਚ ਮੈਕਰੋ ਕੋਡ ਕਿੱਥੇ ਪਾਉਣਾ ਹੈ, ਉਹਨਾਂ ਨੂੰ ਕਿਵੇਂ ਚਲਾਉਣਾ ਹੈ
  • ਸੈੱਲਾਂ ਦੀ ਦਿੱਤੀ ਗਈ ਰੇਂਜ ਵਿੱਚ ਵਿਲੱਖਣ ਮੁੱਲਾਂ ਦੀ ਗਿਣਤੀ ਕਿਵੇਂ ਗਿਣਨੀ ਹੈ

ਕੋਈ ਜਵਾਬ ਛੱਡਣਾ