ഉള്ളടക്കം

സ്റ്റാൻഡേർഡ് മൈക്രോസോഫ്റ്റ് എക്സൽ ടൂളുകളിൽ, ഡ്യൂപ്ലിക്കേറ്റുകൾ വർണ്ണത്തിൽ ഹൈലൈറ്റ് ചെയ്യാൻ നിരവധി മാർഗങ്ങളുണ്ട്. സോപാധിക ഫോർമാറ്റിംഗ് ആണ് ഏറ്റവും എളുപ്പവും വേഗതയേറിയതുമായ മാർഗം. ഇത് ചെയ്യുന്നതിന്, സെല്ലുകളുടെ ഒരു ശ്രേണി തിരഞ്ഞെടുത്ത് ടാബിൽ തിരഞ്ഞെടുക്കുക വീട് — സോപാധിക ഫോർമാറ്റിംഗ് — സെൽ തിരഞ്ഞെടുക്കൽ നിയമങ്ങൾ — ഡ്യൂപ്ലിക്കേറ്റ് മൂല്യങ്ങൾ (ഹോം - സോപാധിക ഫോർമാറ്റിംഗ് - ഹൈലൈറ്റ് സെല്ലുകളുടെ നിയമങ്ങൾ - ഡ്യൂപ്ലിക്കേറ്റ് മൂല്യങ്ങൾ):

ഡ്യൂപ്ലിക്കേറ്റുകളുടെ ഇരട്ട പ്രകാശം

എന്നിരുന്നാലും, ഈ സാഹചര്യത്തിൽ, എല്ലാ സെല്ലുകളുടെയും പൂരിപ്പിക്കൽ നിറം ഒന്നുതന്നെയായിരിക്കും, അതായത്, മൂലകത്തിന് ശ്രേണിയിൽ മറ്റെവിടെയെങ്കിലും തനിപ്പകർപ്പുകൾ ഉണ്ടെന്ന് ഇത് സൂചിപ്പിക്കുന്നു, പക്ഷേ അവ കണ്ടെത്താൻ സഹായിക്കുന്നതിന് ഒന്നും ചെയ്യുന്നില്ല. ഓരോ ജോഡിയും (അല്ലെങ്കിൽ അതിലധികമോ) ആവർത്തിച്ചുള്ള തനിപ്പകർപ്പുകൾ അതിന്റേതായ നിറത്തിൽ നിറയ്ക്കുന്ന ഒരു ചെറിയ മാക്രോ ഉപയോഗിച്ച് നിങ്ങൾക്ക് സാഹചര്യം പരിഹരിക്കാനാകും:

ഡ്യൂപ്ലിക്കേറ്റുകളുടെ ഇരട്ട പ്രകാശം

വളരെ വ്യക്തമാണ്, അല്ലേ? തീർച്ചയായും, ധാരാളം ആവർത്തിച്ചുള്ള സെല്ലുകൾ ഉള്ളതിനാൽ, ഷേഡുകൾ തമ്മിൽ വേർതിരിച്ചറിയാൻ പ്രയാസമാണ്, എന്നാൽ താരതമ്യേന ചെറിയ എണ്ണം തനിപ്പകർപ്പുകൾ ഉപയോഗിച്ച്, ഈ രീതി തികച്ചും പ്രവർത്തിക്കും.

ഈ മാക്രോ ഉപയോഗിക്കുന്നതിന്, കീബോർഡ് കുറുക്കുവഴി അമർത്തുക Alt + F11 അല്ലെങ്കിൽ ബട്ടൺ വിഷ്വൽ ബേസിക് ടാബ് ഡവലപ്പർ, മെനുവിലൂടെ ഒരു പുതിയ ശൂന്യമായ മൊഡ്യൂൾ ചേർക്കുക തിരുകുക - മൊഡ്യൂൾ ഈ മാക്രോയുടെ കോഡ് അവിടെ പകർത്തുക:

സബ് ഡ്യൂപ്ലിക്കേറ്റ്സ് കളറിംഗ്() ഡിം ഡ്യൂപ്പുകൾ() 'ഡ്യൂപ്ലിക്കേറ്റുകൾ സംഭരിക്കുന്നതിന് ഒരു അറേ പ്രഖ്യാപിക്കുക ReDim Dupes(1 to Selection.Cells.Count, 1 to 2) Selection.Interior.ColorIndex = -4142 'ഓരോ സെല്ലിനും i = 3 ആണെങ്കിൽ പൂരിപ്പിക്കൽ നീക്കം ചെയ്യുക WorksheetFunction.CountIf(Selection, cell.Value) > 1 എങ്കിൽ k = LBound(Dupes) To UBound(Dupes) 'സെൽ ഇതിനകം ഡ്യൂപ്ലിക്കേറ്റുകളുടെ നിരയിലാണെങ്കിൽ, If Dupes(k, 1) = cell പൂരിപ്പിക്കുക. പിന്നെ സെൽ.ഇന്റീരിയർ. ColorIndex = Dupes(k, 2) അടുത്ത k 'സെല്ലിൽ ഡ്യൂപ്ലിക്കേറ്റ് അടങ്ങിയിട്ടുണ്ടെങ്കിലും ഇതുവരെ അറേയിൽ ഇല്ലെങ്കിൽ, അത് അറേയിൽ ചേർത്ത് പൂരിപ്പിക്കുക If cell.Interior.ColorIndex = -4142 പിന്നെ cell.Interior.ColorIndex = i ഡ്യൂപ്പുകൾ(i, 1 ) = സെൽ. മൂല്യം ഡ്യൂപ്പുകൾ(i, 2) = ii = i + 1 അവസാനം ആണെങ്കിൽ അവസാനിച്ചാൽ അടുത്ത സെൽ എൻഡ് സബ്  

ഇപ്പോൾ നിങ്ങൾക്ക് ഷീറ്റിലെ ഡാറ്റയുള്ള ഏത് ശ്രേണിയും തിരഞ്ഞെടുത്ത് കീബോർഡ് കുറുക്കുവഴി ഉപയോഗിച്ച് ഞങ്ങളുടെ മാക്രോ പ്രവർത്തിപ്പിക്കാം Alt + F8 അല്ലെങ്കിൽ ബട്ടൺ വഴി മാക്രോകൾ (മാക്രോസ്) ടാബ് ഡെവലപ്പർ (ഡെവലപ്പർ).

  • ഡ്യൂപ്ലിക്കേറ്റുകൾ നിറത്തിൽ ഹൈലൈറ്റ് ചെയ്യുക
  • എന്താണ് മാക്രോകൾ, വിഷ്വൽ ബേസിക്കിൽ മാക്രോ കോഡ് എവിടെ ചേർക്കണം, അവ എങ്ങനെ പ്രവർത്തിപ്പിക്കണം
  • സെല്ലുകളുടെ ഒരു നിശ്ചിത ശ്രേണിയിലെ അദ്വിതീയ മൂല്യങ്ങളുടെ എണ്ണം എങ്ങനെ കണക്കാക്കാം

നിങ്ങളുടെ അഭിപ്രായങ്ങൾ രേഖപ്പെടുത്തുക