ಪರಿವಿಡಿ
ಎಕ್ಸೆಲ್‌ನಲ್ಲಿನ ಪ್ರಮುಖ ಚಟುವಟಿಕೆಗಳಲ್ಲಿ ಒಂದು ಕೊಟ್ಟಿರುವ ಡೇಟಾ ಸೆಟ್‌ನಿಂದ ನಕಲುಗಳನ್ನು ತೆಗೆದುಹಾಕುವುದು . VBA ಅನ್ನು ಮಾತ್ರ ಬಳಸಿಕೊಂಡು Excel ನಲ್ಲಿ ನಕಲುಗಳನ್ನು ತೆಗೆದುಹಾಕುವುದು ಹೇಗೆ ಎಂದು ಇಂದು ನಾನು ತೋರಿಸುತ್ತೇನೆ.
ಪ್ರಾಕ್ಟೀಸ್ ವರ್ಕ್‌ಬುಕ್ ಅನ್ನು ಡೌನ್‌ಲೋಡ್ ಮಾಡಿ
VBA.xlsm ಜೊತೆಗೆ Excel ನಲ್ಲಿ ನಕಲುಗಳನ್ನು ತೆಗೆದುಹಾಕಿ
3 ನಕಲುಗಳನ್ನು ತೆಗೆದುಹಾಕಲು ಎಕ್ಸೆಲ್‌ನಲ್ಲಿ VBA ಬಳಸಲು 3 ತ್ವರಿತ ವಿಧಾನಗಳು
ಇಲ್ಲಿ ನಾವು ಹೆಸರುಗಳು, ID ಗಳು,<ಡೇಟಾ ಸೆಟ್ ಅನ್ನು ಪಡೆದುಕೊಂಡಿದ್ದೇವೆ ಸನ್‌ಫ್ಲವರ್ ಕಿಂಡರ್‌ಗಾರ್ಟನ್ ಎಂಬ ಶಾಲೆಯ ಕೆಲವು ವಿದ್ಯಾರ್ಥಿಗಳ ಪರೀಕ್ಷೆಯಲ್ಲಿ 2> ಅಂಕಗಳು, ಮತ್ತು ಗ್ರೇಡ್‌ಗಳು , ಕೆಲವು ಹೆಸರುಗಳನ್ನು ತಪ್ಪಾಗಿ ಪುನರಾವರ್ತಿಸಲಾಗಿದೆ ಎಂದು ನೀವು ಕಂಡುಕೊಳ್ಳುತ್ತೀರಿ.
ಇಂದು ನಮ್ಮ ಉದ್ದೇಶ ಎಕ್ಸೆಲ್ VBA ಬಳಸಿಕೊಂಡು ನಕಲಿ ಮೌಲ್ಯಗಳನ್ನು ತೆಗೆದುಹಾಕುವುದು.
1. ಸ್ಥಿರ ಸೆಲ್ ಶ್ರೇಣಿಯಿಂದ ನಕಲುಗಳನ್ನು ತೆಗೆದುಹಾಕಲು VBA ಬಳಸಿ
ಮೊದಲನೆಯದಾಗಿ, VBA ನಲ್ಲಿ ಸ್ಥಿರ ಸೆಲ್ ಶ್ರೇಣಿಯನ್ನು ಬಳಸಿಕೊಂಡು ನಕಲು ಹೆಸರುಗಳನ್ನು ತೆಗೆದುಹಾಕಲು ನಾವು ಪ್ರಯತ್ನಿಸುತ್ತೇವೆ ಕೋಡ್.
ಇಲ್ಲಿ, ನಮ್ಮ ಡೇಟಾ ಸೆಟ್ ವರ್ಕ್‌ಬುಕ್‌ನಲ್ಲಿರುವ B3:E15 ಶ್ರೇಣಿಯಾಗಿದೆ ( ಕಾಲಮ್ ಹೆಡರ್‌ಗಳು ಸೇರಿದಂತೆ).
ನಾವು ಬಳಸುತ್ತೇವೆ ಇಲ್ಲಿ ಕೋಡ್‌ನಲ್ಲಿ ಈ ಸ್ಥಿರ ಸೆಲ್ ಶ್ರೇಣಿ.
ಹಂತ 1:
➤ ಹೊಸ VBA ವಿಂಡೋವನ್ನು ತೆರೆಯಿರಿ ಮತ್ತು ಹೊಸ ಮಾಡ್ಯೂಲ್ ಅನ್ನು ಸೇರಿಸಿ (ಇಲ್ಲಿ ಕ್ಲಿಕ್ ಮಾಡಿ Excel ನಲ್ಲಿ ಹೊಸ VBA ಮಾಡ್ಯೂಲ್ ಅನ್ನು ಹೇಗೆ ತೆರೆಯುವುದು ಮತ್ತು ಸೇರಿಸುವುದು ಎಂಬುದನ್ನು ನೋಡಲು).
➤ ಈ ಕೋಡ್ ಅನ್ನು ಮಾಡ್ಯೂಲ್‌ನಲ್ಲಿ ಸೇರಿಸಿ:
ಕೋಡ್:
4205
➤ ಇದು Remove_Duplicates ಎಂಬ ಮ್ಯಾಕ್ರೋವನ್ನು ಉತ್ಪಾದಿಸುತ್ತದೆ. A3:E14 ಎಂಬುದು ನನ್ನ ಡೇಟಾ ಸೆಟ್‌ನ ಶ್ರೇಣಿಯಾಗಿದೆ ಮತ್ತು ಕಾಲಮ್ 1 ಅನ್ನು ಆಧರಿಸಿ ನಾನು ನಕಲು ಸಾಲುಗಳನ್ನು ತೆಗೆದುಹಾಕಲು ಬಯಸುತ್ತೇನೆ. ನೀವುನಿಮ್ಮದೊಂದು ಬಳಸಿ ಮ್ಯಾಕ್ರೋ ರನ್ ಮಾಡಲು).
➤ ಇದು ಕಾಲಮ್ 1 ರಲ್ಲಿ ನಕಲುಗಳನ್ನು ಹೊಂದಿರುವ ಸಾಲುಗಳನ್ನು ತೆಗೆದುಹಾಕುತ್ತದೆ ( ವಿದ್ಯಾರ್ಥಿ ಹೆಸರು).
ಇನ್ನಷ್ಟು ಓದಿ: ಎಕ್ಸೆಲ್ ನಲ್ಲಿ ನಕಲುಗಳನ್ನು ಅಳಿಸುವುದು ಹೇಗೆ ಆದರೆ ಒಂದನ್ನು ಇಟ್ಟುಕೊಳ್ಳುವುದು ಹೇಗೆ (7 ವಿಧಾನಗಳು)
2. ಆಯ್ಕೆಮಾಡಿದ ಸೆಲ್ ಶ್ರೇಣಿಯಿಂದ ನಕಲುಗಳನ್ನು ತೆಗೆದುಹಾಕಲು VBA ಕೋಡ್‌ಗಳನ್ನು ಸೇರಿಸಿ
ಈಗ ನಾವು ವರ್ಕ್‌ಶೀಟ್‌ನಲ್ಲಿ ಯಾವುದೇ ಆಯ್ಕೆಮಾಡಿದ ಸೆಲ್ ಶ್ರೇಣಿಯಿಂದ ನಕಲುಗಳನ್ನು ತೆಗೆದುಹಾಕಬಹುದಾದ ಮ್ಯಾಕ್ರೋವನ್ನು ನಿರ್ಮಿಸಲು ಪ್ರಯತ್ನಿಸುತ್ತೇವೆ.
ಹಂತ 1:
➤ ಹೊಸ VBA ವಿಂಡೋವನ್ನು ಮತ್ತೆ ತೆರೆಯಿರಿ ಮತ್ತು ಇನ್ನೊಂದು ಹೊಸ ಮಾಡ್ಯೂಲ್ ಅನ್ನು ಸೇರಿಸಿ.
➤ ಈ ಕೋಡ್ ಅನ್ನು ಮಾಡ್ಯೂಲ್‌ನಲ್ಲಿ ಸೇರಿಸಿ:
ಕೋಡ್:
1635
➤ ಇದು Remove_Duplicates ಎಂಬ ಮ್ಯಾಕ್ರೋವನ್ನು ಉತ್ಪಾದಿಸುತ್ತದೆ. ಕಾಲಮ್ 1 ಅನ್ನು ಆಧರಿಸಿ ನಾನು ನಕಲಿ ಸಾಲುಗಳನ್ನು ತೆಗೆದುಹಾಕಲು ಬಯಸುತ್ತೇನೆ. ನೀವು ನಿಮ್ಮದನ್ನು ಬಳಸುತ್ತೀರಿ.
ಹಂತ 2:
➤ ನಿಮ್ಮ ವರ್ಕ್‌ಶೀಟ್‌ಗೆ ಹಿಂತಿರುಗಿ.
➤ ಆಯ್ಕೆಮಾಡಿ ನಿಮ್ಮ ಡೇಟಾವನ್ನು ಹೊಂದಿಸಿ ಮತ್ತು ಈ ಮ್ಯಾಕ್ರೋ ಅನ್ನು ರನ್ ಮಾಡಿ.
➤ ಇದು ಮೇಲೆ ಮಾಡಿದಂತೆಯೇ ಕಾರ್ಯಗತಗೊಳಿಸುತ್ತದೆ. ಕಾಲಮ್ 1 ರಲ್ಲಿ ನಕಲುಗಳಿರುವ ಸಾಲುಗಳನ್ನು ತೆಗೆದುಹಾಕಿ ( ವಿದ್ಯಾರ್ಥಿ ಹೆಸರು).
ಹೆಚ್ಚು ಓದಿ: ನಕಲು ತೆಗೆದುಹಾಕುವುದು ಹೇಗೆ ಎಕ್ಸೆಲ್‌ನಲ್ಲಿನ ಸಾಲುಗಳು (3 ಮಾರ್ಗಗಳು)
ಇದೇ ವಾಚನಗೋಷ್ಠಿಗಳು
- ಎಕ್ಸೆಲ್‌ನಲ್ಲಿನ ಕಾಲಮ್‌ನಿಂದ ನಕಲುಗಳನ್ನು ತೆಗೆದುಹಾಕುವುದು ಹೇಗೆ (3 ವಿಧಾನಗಳು) >>>>>>>>>>>>>>>>>>>>>>> 2>
- ತೆಗೆದುಹಾಕಿಎಕ್ಸೆಲ್‌ನಲ್ಲಿ 1 ನೇ ಸಂಭವಿಸುವಿಕೆಯನ್ನು ಹೊರತುಪಡಿಸಿ ನಕಲು ಸಾಲುಗಳು (7 ಮಾರ್ಗಗಳು)
- ಎಕ್ಸೆಲ್‌ನಲ್ಲಿ ಎರಡೂ ನಕಲುಗಳನ್ನು ತೆಗೆದುಹಾಕುವುದು ಹೇಗೆ (5 ಸುಲಭ ಮಾರ್ಗಗಳು)
3. ಬಹು ಕಾಲಮ್‌ಗಳಿಂದ ನಕಲುಗಳನ್ನು ತೆಗೆದುಹಾಕಲು VBA ಮ್ಯಾಕ್ರೋ ಅನ್ನು ಎಂಬೆಡ್ ಮಾಡಿ
ಇಲ್ಲಿಯವರೆಗೆ ನಾವು ಕಾಲಮ್ 1 ರಲ್ಲಿ ನಕಲುಗಳನ್ನು ಹೊಂದಿರುವ ಸಾಲುಗಳನ್ನು ತೆಗೆದುಹಾಕಿದ್ದೇವೆ ( ವಿದ್ಯಾರ್ಥಿ ಹೆಸರು ).
ಆದರೆ ವಾಸ್ತವವಾಗಿ, ಇಬ್ಬರು ವಿದ್ಯಾರ್ಥಿಗಳ ಹೆಸರುಗಳು ಒಂದೇ ಆಗಿರಬಹುದು, ಎರಡು ಹೆಸರುಗಳು ಒಂದೇ ಆಗಿದ್ದರೆ ಅದು ಯಾವಾಗಲೂ ತಪ್ಪಾಗಿ ಸೇರಿಸಲ್ಪಟ್ಟಿದೆ ಎಂದು ಅರ್ಥವಲ್ಲ.
ಆದರೆ ಇಬ್ಬರು ವಿದ್ಯಾರ್ಥಿಗಳ ID ಗಳು ಒಂದೇ ಆಗಿದ್ದರೆ, ನಂತರ ಅವರು ಅದೇ ವಿದ್ಯಾರ್ಥಿಗಳು. ನಂತರ ಸಾಲನ್ನು ತೆಗೆದುಹಾಕಬೇಕು.
ಈ ಬಾರಿ ನಾವು ಮ್ಯಾಕ್ರೋವನ್ನು ಅಭಿವೃದ್ಧಿಪಡಿಸುತ್ತೇವೆ ಅದು ಎರಡು ಸಾಲುಗಳ ಹೆಸರು ಮತ್ತು ID ಎರಡೂ ಒಂದೇ ಆಗಿದ್ದರೆ ಸಾಲನ್ನು ತೆಗೆದುಹಾಕುತ್ತದೆ.
ಹಂತ 1 :
➤ ಹೊಸ VBA ವಿಂಡೋವನ್ನು ಮತ್ತೊಮ್ಮೆ ತೆರೆಯಿರಿ ಮತ್ತು ಇನ್ನೊಂದು ಹೊಸ ಮಾಡ್ಯೂಲ್ ಅನ್ನು ಸೇರಿಸಿ.
➤ ಈ ಕೋಡ್ ಅನ್ನು ಮಾಡ್ಯೂಲ್‌ನಲ್ಲಿ ಸೇರಿಸಿ:
ಕೋಡ್:
5548
➤ ಇದು Remove_Duplicates ಎಂಬ ಮ್ಯಾಕ್ರೋವನ್ನು ಉತ್ಪಾದಿಸುತ್ತದೆ. ಕಾಲಮ್ 1 ಮತ್ತು 2 (ಹೆಸರು ಮತ್ತು ID) ಅನ್ನು ಆಧರಿಸಿ ನಾನು ನಕಲಿ ಸಾಲುಗಳನ್ನು ತೆಗೆದುಹಾಕಲು ಬಯಸುತ್ತೇನೆ. ನೀವು ನಿಮ್ಮದನ್ನು ಬಳಸುತ್ತೀರಿ.
ಹಂತ 2:
➤ ನಿಮ್ಮ ವರ್ಕ್‌ಶೀಟ್‌ಗೆ ಹಿಂತಿರುಗಿ.
➤ ಆಯ್ಕೆಮಾಡಿ ನಿಮ್ಮ ಡೇಟಾವನ್ನು ಹೊಂದಿಸಿ ಮತ್ತು ಈ ಮ್ಯಾಕ್ರೋ ರನ್ ಮಾಡಿ.
➤ ಈ ಬಾರಿ ಅದು ಹೆಸರು ಮತ್ತು ವಿದ್ಯಾರ್ಥಿ ಐಡಿ ಎರಡೂ ಒಂದೇ ಆಗಿದ್ದರೆ ಮಾತ್ರ ಸಾಲುಗಳನ್ನು ತೆಗೆದುಹಾಕುತ್ತದೆ.
ಗಮನಿಸಿ: ಇಲ್ಲಿ ಅದು ಜೆನ್ನಿಫರ್ ಮಾರ್ಲೊ ಅವರನ್ನು ತೆಗೆದುಹಾಕಿಲ್ಲ ಏಕೆಂದರೆ ಇಬ್ಬರು ವಿದ್ಯಾರ್ಥಿಗಳ ID ಗಳು ವಿಭಿನ್ನವಾಗಿವೆ, ಅಂದರೆ ಅವರು ಇಬ್ಬರು ವಿಭಿನ್ನ ವಿದ್ಯಾರ್ಥಿಗಳು.
ಹೆಚ್ಚು ಓದಿ: ಎಕ್ಸೆಲ್ VBA: ಬಹು ಕಾಲಮ್‌ಗಳನ್ನು ಹೋಲಿಸುವ ನಕಲುಗಳನ್ನು ತೆಗೆದುಹಾಕಿ (3 ಉದಾಹರಣೆಗಳು)
ತೀರ್ಮಾನ
ಈ ವಿಧಾನಗಳನ್ನು ಬಳಸಿಕೊಂಡು, ನೀವು ನಕಲುಗಳನ್ನು ತೆಗೆದುಹಾಕಬಹುದು VBA ಬಳಸಿಕೊಂಡು ಎಕ್ಸೆಲ್‌ನಲ್ಲಿ ಡೇಟಾ ಹೊಂದಿಸಲಾಗಿದೆ. ನಿಮಗೆ ಯಾವುದೇ ಸಮಸ್ಯೆಗಳಿವೆಯೇ? ನಮ್ಮನ್ನು ಕೇಳಲು ಹಿಂಜರಿಯಬೇಡಿ.
