ಪರಿವಿಡಿ
ನಮ್ಮ ಎಕ್ಸೆಲ್ ವರ್ಕ್ಬುಕ್ನಲ್ಲಿ ನಾವು ದೊಡ್ಡ ಡೇಟಾಸೆಟ್ ಹೊಂದಿರುವಾಗ, ನಾವು ಪಡೆಯಲು ಬಯಸುವ ನಿರ್ದಿಷ್ಟ ಫಲಿತಾಂಶಗಳನ್ನು ಹೊರತೆಗೆಯಲು ಸಾಲುಗಳ ಮೂಲಕ ಲೂಪ್ ಮಾಡಿದರೆ ಕೆಲವೊಮ್ಮೆ ಅನುಕೂಲಕರವಾಗಿರುತ್ತದೆ. ಎಕ್ಸೆಲ್ನಲ್ಲಿ ಯಾವುದೇ ಕಾರ್ಯಾಚರಣೆಯನ್ನು ನಡೆಸಲು VBA ಅನ್ನು ಕಾರ್ಯಗತಗೊಳಿಸುವುದು ಅತ್ಯಂತ ಪರಿಣಾಮಕಾರಿ, ತ್ವರಿತ ಮತ್ತು ಸುರಕ್ಷಿತ ವಿಧಾನವಾಗಿದೆ. ಈ ಲೇಖನದಲ್ಲಿ, VBA ಮ್ಯಾಕ್ರೋ ನೊಂದಿಗೆ Excel ನಲ್ಲಿ ಟೇಬಲ್ನ ಸಾಲುಗಳ ಮೂಲಕ ಲೂಪ್ ಮಾಡುವುದು ಹೇಗೆ ಎಂಬುದರ ಕುರಿತು 11 ವಿಭಿನ್ನ ವಿಧಾನಗಳನ್ನು ನಾವು ನಿಮಗೆ ತೋರಿಸುತ್ತೇವೆ.
ವರ್ಕ್ಬುಕ್ ಡೌನ್ಲೋಡ್ ಮಾಡಿ
ನೀವು ಇಲ್ಲಿಂದ ಉಚಿತ ಅಭ್ಯಾಸ ಎಕ್ಸೆಲ್ ವರ್ಕ್ಬುಕ್ ಅನ್ನು ಡೌನ್ಲೋಡ್ ಮಾಡಬಹುದು.
VBA.xlsm ನೊಂದಿಗೆ ಟೇಬಲ್ನ ಸಾಲುಗಳ ಮೂಲಕ ಲೂಪ್ ಮಾಡಿ
ಎಕ್ಸೆಲ್ನಲ್ಲಿನ ಟೇಬಲ್ನ ಸಾಲುಗಳ ಮೂಲಕ ಲೂಪ್ ಮಾಡಲು VBA ಜೊತೆಗಿನ 11 ವಿಧಾನಗಳು
ಈ ವಿಭಾಗವನ್ನು ಅನುಸರಿಸಿ, 11 ವಿಭಿನ್ನ ವಿಧಾನಗಳೊಂದಿಗೆ ಟೇಬಲ್ನ ಸಾಲುಗಳ ಮೂಲಕ ಲೂಪ್ ಮಾಡುವುದು ಹೇಗೆ ಎಂದು ನೀವು ಕಲಿಯುವಿರಿ, ಉದಾಹರಣೆಗೆ ಖಾಲಿ ಕೋಶದವರೆಗೆ ಸಾಲುಗಳ ಮೂಲಕ ಲೂಪ್ ಮಾಡಿ, ನಿರ್ದಿಷ್ಟ ಮೌಲ್ಯವನ್ನು ಕಂಡುಹಿಡಿಯುವವರೆಗೆ ಸಾಲುಗಳ ಮೂಲಕ ಲೂಪ್ ಮಾಡಿ, ಸಾಲುಗಳ ಮೂಲಕ ಲೂಪ್ ಮಾಡಿ ಮತ್ತು ಎಕ್ಸೆಲ್ನಲ್ಲಿ VBA ಮ್ಯಾಕ್ರೋ ಜೊತೆಗೆ ನಿರ್ದಿಷ್ಟ ಸೆಲ್ ಅನ್ನು ಬಣ್ಣ ಮಾಡಿ.
<8
ಮೇಲಿನ ಉದಾಹರಣೆ ಡೇಟಾಸೆಟ್ ಆಗಿದೆ, ಈ ಲೇಖನವು ವಿಧಾನಗಳನ್ನು ವಿವರಿಸಲು ಅನುಸರಿಸುತ್ತದೆ.
1. ನಿಮ್ಮ ಎಕ್ಸೆಲ್ ವರ್ಕ್ಶೀಟ್ನಲ್ಲಿ ಟೇಬಲ್ನ ಪ್ರತಿ ಸಾಲಿನಲ್ಲಿನ ಪ್ರತಿ ಕೋಶದ ಮೂಲಕ ಲೂಪ್ ಮಾಡಲು ನೀವು ಬಯಸಿದರೆ
ಸೆಲ್ ರೆಫರೆನ್ಸ್ ಸಂಖ್ಯೆಯ ಮೂಲಕ ಟೇಬಲ್ನ ಪ್ರತಿ ಸಾಲಿನಲ್ಲಿ ಪ್ರತಿ ಕೋಶದ ಮೂಲಕ ಲೂಪ್ ಮಾಡಲು VBA ಅನ್ನು ಎಂಬೆಡ್ ಮಾಡಿ ಮತ್ತು ಸೆಲ್ ಉಲ್ಲೇಖ ಸಂಖ್ಯೆಯನ್ನು ರಿಟರ್ನ್ ಮೌಲ್ಯವಾಗಿ ಪಡೆಯಿರಿ , ನಂತರ ಕೆಳಗೆ ಚರ್ಚಿಸಲಾದ ಹಂತಗಳನ್ನು ಅನುಸರಿಸಿ.
ಹಂತಗಳು:
- ಆರಂಭದಲ್ಲಿ , ನಿಮ್ಮ ಕೀಬೋರ್ಡ್ನಲ್ಲಿ Alt + F11 ಒತ್ತಿರಿ ಅಥವಾ ಹೋಗಿವೇರಿಯೇಬಲ್.
2603
1 ರಿಂದ 15 ರವರೆಗಿನ ಸಾಲುಗಳ ಮೂಲಕ ಲೂಪ್ ಮಾಡಲು ಈ ಕೋಡ್ ತುಣುಕು ಇಲ್ಲಿದೆ. ಇದು ನಿರ್ದಿಷ್ಟ ಪದ " ಎಡ್ಜ್ " ಅನ್ನು ಕಂಡುಕೊಂಡರೆ, ಅದು ಪದವನ್ನು ಹೊಂದಿರುವ ಕೋಶವನ್ನು ಬಣ್ಣಿಸುತ್ತದೆ. ಪದವನ್ನು ಹುಡುಕುವಲ್ಲಿ 1 ರಿಂದ 15 ಸಾಲುಗಳ ಮೂಲಕ ಎಲ್ಲಾ ಡೇಟಾವನ್ನು ಸ್ಕ್ಯಾನ್ ಮಾಡುವವರೆಗೆ ಇದು ಇದನ್ನು ಮುಂದುವರಿಸುತ್ತದೆ.
ಇನ್ನಷ್ಟು ಓದಿ: VLOOKUP ಟೇಬಲ್ ಅರೇ ಅನ್ನು ಹೇಗೆ ಬಳಸುವುದು Excel ನಲ್ಲಿ ಸೆಲ್ ಮೌಲ್ಯ
ಇದೇ ರೀತಿಯ ವಾಚನಗೋಷ್ಠಿಗಳು
- TABLE ಫಂಕ್ಷನ್ ಎಕ್ಸೆಲ್ ನಲ್ಲಿ ಇದೆಯೇ?
- ಎಕ್ಸೆಲ್ನಲ್ಲಿ ಪಟ್ಟಿಗೆ ಟೇಬಲ್ ಅನ್ನು ಹೇಗೆ ಪರಿವರ್ತಿಸುವುದು (3 ತ್ವರಿತ ಮಾರ್ಗಗಳು)
- ಎಕ್ಸೆಲ್ನಲ್ಲಿ ಶ್ರೇಣಿಯನ್ನು ಟೇಬಲ್ಗೆ ಪರಿವರ್ತಿಸಿ (5 ಸುಲಭ ವಿಧಾನಗಳು)
- ಎಕ್ಸೆಲ್ ಟೇಬಲ್ನಲ್ಲಿ ಫಾರ್ಮುಲಾವನ್ನು ಪರಿಣಾಮಕಾರಿಯಾಗಿ ಬಳಸಿ (4 ಉದಾಹರಣೆಗಳೊಂದಿಗೆ)
- ಎಕ್ಸೆಲ್ ಟೇಬಲ್ ಹೆಸರು: ನೀವು ತಿಳಿದುಕೊಳ್ಳಬೇಕಾದದ್ದು
7. ಪ್ರತಿ ಸಾಲಿನ ಮೂಲಕ ಲೂಪ್ ಮಾಡಲು VBA ಅನ್ನು ಅಳವಡಿಸಿ ಮತ್ತು ಎಕ್ಸೆಲ್ನಲ್ಲಿ ಪ್ರತಿ ಬೆಸ ಸಾಲಿಗೆ ಬಣ್ಣ ಹಾಕಿ
ಹಿಂದಿನ ವಿಭಾಗದಿಂದ, ನಿರ್ದಿಷ್ಟ ಮೌಲ್ಯವನ್ನು ಹೊಂದಿರುವ ಸೆಲ್ ಅನ್ನು ಹೇಗೆ ಬಣ್ಣ ಮಾಡುವುದು ಎಂದು ನಾವು ಕಲಿತಿದ್ದೇವೆ. ಈ ವಿಭಾಗದಲ್ಲಿ, ಎಕ್ಸೆಲ್ನಲ್ಲಿ ವಿಬಿಎ ಮ್ಯಾಕ್ರೋದೊಂದಿಗೆ ಟೇಬಲ್ನ ಪ್ರತಿ ಸಾಲಿನ ಮೂಲಕ ಲೂಪ್ ಮಾಡುವುದು ಮತ್ತು ಪ್ರತಿ ಬೆಸ ಸಾಲಿಗೆ ಬಣ್ಣ ಮಾಡುವುದು ಹೇಗೆ ಎಂದು ನಾವು ಕಲಿಯುತ್ತೇವೆ.
ಪ್ರಕ್ರಿಯೆಯನ್ನು ಕಾರ್ಯಗತಗೊಳಿಸಲು ಹಂತಗಳು ಕೆಳಗೆ ವಿವರಿಸಲಾಗಿದೆ.
ಹಂತಗಳು:
- ಮೊದಲು ತೋರಿಸಿರುವಂತೆ, ಡೆವಲಪರ್ ನಿಂದ ವಿಷುಯಲ್ ಬೇಸಿಕ್ ಎಡಿಟರ್ ತೆರೆಯಿರಿ ಟ್ಯಾಬ್ ಮತ್ತು ಕೋಡ್ ವಿಂಡೋದಲ್ಲಿ ಸೇರಿಸಿ ಮಾಡ್ಯೂಲ್ .
- ನಂತರ, ನಕಲು ಕೆಳಗಿನ ಕೋಡ್ ಮತ್ತು ಅಂಟಿಸಿ ಕೋಡ್ ವಿಂಡೋ.
9696
ನಿಮ್ಮ ಕೋಡ್ ಈಗ ಚಾಲನೆಗೆ ಸಿದ್ಧವಾಗಿದೆ.
- ಈಗ, ರನ್ ಮ್ಯಾಕ್ರೋ ಮತ್ತು ಔಟ್ಪುಟ್ ನೋಡಲು ಕೆಳಗಿನ ಚಿತ್ರವನ್ನು ನೋಡಿ 2> ವರ್ಕ್ಶೀಟ್ನ ಕೋಷ್ಟಕದಲ್ಲಿ ವಾಸಿಸುವ ಎಲ್ಲಾ ಸಾಲುಗಳ ಮೂಲಕ ಲೂಪ್ ಮಾಡಿದ ನಂತರ.
VBA ಕೋಡ್ ವಿವರಣೆ
For Each iData In Range("1:15") If iData.Value = "Edge" Then MsgBox "Edge is found at " & iData.Address End If Next iData
ವೇರಿಯಬಲ್ ಅನ್ನು ವಿವರಿಸಿ.
7160
ನಾವು ಕೆಲಸ ಮಾಡುವ ಶ್ರೇಣಿಯನ್ನು ವಿವರಿಸಿ.
5956
ಕೋಡ್ನ ಈ ಭಾಗವು ಪ್ರಸ್ತುತ ಸಾಲಿನ ಮುಂದಿನ ಸಾಲಿನಿಂದ ಪ್ರಾರಂಭವಾಗುವ ಎಲ್ಲಾ ಸಾಲುಗಳ ಮೂಲಕ ಪುನರಾವರ್ತನೆಯನ್ನು ಸೂಚಿಸುತ್ತದೆ, B4 . ಸಾಲು ಸಂಖ್ಯೆಗಳನ್ನು 2 ರಿಂದ ಭಾಗಿಸುವ ಮೋಡ್ ಪೂರ್ಣಾಂಕ ಪ್ರಕಾರದಲ್ಲಿ ಸಂಗ್ರಹಿಸಲಾದ ಹಿಂತಿರುಗಿದ ಸಾಲು ಸಂಖ್ಯೆಗೆ ಸಮನಾಗಿದ್ದರೆ, ಈ ಕೋಡ್ ಕೋಡ್ನಲ್ಲಿ ಒದಗಿಸಲಾದ ಬಣ್ಣ ಸೂಚ್ಯಂಕದೊಂದಿಗೆ ಲೆಕ್ಕಾಚಾರದಿಂದ ಹೊರತೆಗೆಯಲಾದ ಎಲ್ಲಾ ಸಾಲುಗಳನ್ನು ಬಣ್ಣಿಸುತ್ತದೆ. ಇದು ಶ್ರೇಣಿಯ ಅಂತ್ಯವನ್ನು ತಲುಪುವವರೆಗೆ ಎಲ್ಲಾ ಸಾಲುಗಳ ಮೂಲಕ ಚಲಿಸುತ್ತಲೇ ಇರುತ್ತದೆ.
8. ಸಾಲುಗಳ ಮೂಲಕ ಲೂಪ್ ಮಾಡಲು VBA ಅನ್ನು ಅಳವಡಿಸಿ ಮತ್ತು ಎಕ್ಸೆಲ್ನಲ್ಲಿ ಪ್ರತಿ ಸಮ ಸಾಲುಗಳನ್ನು ಬಣ್ಣ ಮಾಡಿ
ಹಿಂದಿನ ವಿಭಾಗದಲ್ಲಿ, ಟೇಬಲ್ನ ಪ್ರತಿ ಬೆಸ ಸಾಲನ್ನು ಹೇಗೆ ಬಣ್ಣ ಮಾಡುವುದು ಎಂದು ನಾವು ಕಲಿತಿದ್ದೇವೆ. ಈ ವಿಭಾಗದಲ್ಲಿ, ನಾವು ಎಕ್ಸೆಲ್ನಲ್ಲಿ VBA ಮ್ಯಾಕ್ರೋದೊಂದಿಗೆ ಟೇಬಲ್ನ ಪ್ರತಿ ಸಾಲಿನ ಮೂಲಕ ಲೂಪ್ ಮಾಡುವುದು ಮತ್ತು ಪ್ರತಿ ಸಮ ಸಾಲಿಗೆ ಬಣ್ಣ ಮಾಡುವುದು ಹೇಗೆ ಎಂದು ಕಲಿಯುತ್ತೇವೆ.
ಪ್ರಕ್ರಿಯೆಯನ್ನು ಕಾರ್ಯಗತಗೊಳಿಸುವ ಹಂತಗಳನ್ನು ಕೆಳಗೆ ಚರ್ಚಿಸಲಾಗಿದೆ.
ಹಂತಗಳು:
- ಮೊದಲನೆಯದಾಗಿ, ಡೆವಲಪರ್ ಟ್ಯಾಬ್ನಿಂದ ವಿಷುಯಲ್ ಬೇಸಿಕ್ ಎಡಿಟರ್ ಅನ್ನು ತೆರೆಯಿರಿ ಮತ್ತು ಸೇರಿಸಿ<2 ಕೋಡ್ ವಿಂಡೋದಲ್ಲಿ ಮಾಡ್ಯೂಲ್ 14>
For i = 2 To UBound(iValue, 1) iResult = "" For J = 1 To UBound(iValue, 2) iResult = IIf(iResult = "", iValue(i, J), iResult & " " & iValue(i, J)) Next J MsgBox iResult Next i
ನಿಮ್ಮ ಕೋಡ್ ಈಗ ಸಿದ್ಧವಾಗಿದೆರನ್ ಮಾಡಿ.
- ಮುಂದೆ, ರನ್ ಮ್ಯಾಕ್ರೋ ಮತ್ತು ಫಲಿತಾಂಶವನ್ನು ನೋಡಲು ಕೆಳಗಿನ ಚಿತ್ರವನ್ನು ನೋಡಿ.
ಎಲ್ಲಾ ಸಮ-ಸಂಖ್ಯೆಯ ಸಾಲುಗಳು ಬಣ್ಣವನ್ನು ಹೊಂದಿರುತ್ತವೆ.
VBA ಕೋಡ್ ವಿವರಣೆ
4518
ವೇರಿಯಬಲ್ ಅನ್ನು ವಿವರಿಸಿ.
1815
ನಾವು ಕೆಲಸ ಮಾಡುವ ಶ್ರೇಣಿಯನ್ನು ವಿವರಿಸಿ.
7609
ಈ ಕೋಡ್ ತುಣುಕು ನಂತರ ಪುನರಾವರ್ತಿಸಲು ಪ್ರಾರಂಭಿಸುತ್ತದೆ ಪ್ರಸ್ತುತ ಸಾಲಿನಿಂದ ಮೂರು ಸಾಲುಗಳು, B4 . ಇದು ಮೊದಲು ಅದನ್ನು ಬಣ್ಣಿಸುತ್ತದೆ ನಂತರ ಸಾಲು ಎಣಿಕೆಯನ್ನು 2 ರಿಂದ ಹೆಚ್ಚಿಸುತ್ತದೆ ಮತ್ತು ಡೇಟಾಸೆಟ್ನ ಕೊನೆಯ ಸಾಲನ್ನು ತಲುಪುವವರೆಗೆ ಅದನ್ನು ಬಣ್ಣ ಮಾಡುತ್ತದೆ.
9. ಎಕ್ಸೆಲ್ನಲ್ಲಿ ಖಾಲಿ ಕೋಶದವರೆಗೆ ಸಾಲುಗಳ ಮೂಲಕ ಪುನರಾವರ್ತನೆ ಮಾಡಲು ಮ್ಯಾಕ್ರೋ ಅನ್ನು ಅನ್ವಯಿಸಿ
ನಿಮ್ಮ ಕೋಡ್ ಕೆಲಸ ಮಾಡಲು ಬಯಸಿದರೆ ಅದು ಟೇಬಲ್ನ ಎಲ್ಲಾ ಸಾಲುಗಳ ಮೂಲಕ ಲೂಪ್ ಆಗುತ್ತದೆ ಮತ್ತು ಅದು ಖಾಲಿ ಸೆಲ್ ಅನ್ನು ತಲುಪಿದಾಗ ನಿಲ್ಲುತ್ತದೆ , ನಂತರ ಈ ವಿಭಾಗವು ನಿಮಗಾಗಿ ಆಗಿದೆ. ಎಕ್ಸೆಲ್ VBA ನಲ್ಲಿ FOR Loop ಮತ್ತು Do-Until Loop ಮೂಲಕ ನೀವು ಆ ಕಾರ್ಯವನ್ನು ಕಾರ್ಯಗತಗೊಳಿಸಬಹುದು.
9.1. FOR ಲೂಪ್ನೊಂದಿಗೆ
VBA Excel ನಲ್ಲಿ FOR Loop
ನೊಂದಿಗೆ ಖಾಲಿ ಕೋಶದವರೆಗೆ ಟೇಬಲ್ನಲ್ಲಿ ಸಾಲುಗಳ ಮೂಲಕ ಲೂಪ್ ಮಾಡುವ ಹಂತಗಳನ್ನು ಕೆಳಗೆ ನೀಡಲಾಗಿದೆ.ಹಂತಗಳು:
- ಮೊದಲಿಗೆ, ಡೆವಲಪರ್ ಟ್ಯಾಬ್ನಿಂದ ವಿಷುಯಲ್ ಬೇಸಿಕ್ ಎಡಿಟರ್ ಅನ್ನು ತೆರೆಯಿರಿ ಮತ್ತು ಸೇರಿಸಿ ಒಂದು ಮಾಡ್ಯೂಲ್ ಕೋಡ್ ವಿಂಡೋದಲ್ಲಿ 14>
3679
ನಿಮ್ಮ ಕೋಡ್ ಇದೀಗ ರನ್ ಆಗಲು ಸಿದ್ಧವಾಗಿದೆ.
- ನಂತರ, ರನ್ ಮ್ಯಾಕ್ರೋ ಮತ್ತು ಫಲಿತಾಂಶವನ್ನು ಕೆಳಗಿನ gif ನಲ್ಲಿ ತೋರಿಸಲಾಗಿದೆ.
ಮ್ಯಾಕ್ರೋವನ್ನು ಚಲಾಯಿಸಿದ ನಂತರ, ಅದು ಎಲ್ಲಾ ಸಾಲುಗಳ ಮೂಲಕ ಲೂಪ್ ಮಾಡಲು ಪ್ರಾರಂಭಿಸಿತು. ಮತ್ತು ಒಮ್ಮೆ ಅದು ಖಾಲಿ ಸೆಲ್, ಸೆಲ್ B8 ಅನ್ನು ತಲುಪಿದಾಗ, ಅದು ಪುನರಾವರ್ತನೆಯನ್ನು ನಿಲ್ಲಿಸಿತು .
VBA ಕೋಡ್ ವಿವರಣೆ 3>
1531
ವೇರಿಯಬಲ್ ಅನ್ನು ವಿವರಿಸಿ.
9879
ಸ್ಕ್ರೀನ್ ಅಪ್ಡೇಟ್ ಮಾಡುವ ಈವೆಂಟ್ ಅನ್ನು ಆಫ್ ಮಾಡಿ.
6121
Cell B4 ರಿಂದ ಪ್ರಾರಂಭವಾಗುವ ಎಲ್ಲಾ ಸಾಲುಗಳನ್ನು ಕೊನೆಯವರೆಗೆ ಸಂಗ್ರಹಿಸಿ.
3344
ಸೆಲ್ B4 ಆಯ್ಕೆಮಾಡಿ.
1615
ಈ ಕೋಡ್ ತುಣುಕು ಎಲ್ಲಾ ಸಾಲುಗಳ ಮೂಲಕ ಲೂಪ್ ಮಾಡಲು ಪ್ರಾರಂಭಿಸುತ್ತದೆ. ಅದು ಒಂದು ಸಾಲಿನಲ್ಲಿ ಖಾಲಿ ಸೆಲ್ ಅನ್ನು ಕಂಡುಕೊಂಡಾಗ ಅದನ್ನು ಆಯ್ಕೆ ಮಾಡುತ್ತದೆ ಮತ್ತು ಅದು ಅಂತ್ಯವನ್ನು ತಲುಪುವವರೆಗೆ ಸಾಲುಗಳನ್ನು ಸ್ಕ್ಯಾನ್ ಮಾಡುವುದನ್ನು ಮುಂದುವರಿಸುತ್ತದೆ.
6518
ಪರದೆಯ ಅಪ್ಡೇಟ್ ಮಾಡುವ ಈವೆಂಟ್ ಅನ್ನು ಆನ್ ಮಾಡಿ.
9.2. ಡು-ಅನ್ಟಿಲ್ ಲೂಪ್ನೊಂದಿಗೆ
ವಿಬಿಎ ನಲ್ಲಿ ಡು-ಅನ್ಟಿಲ್ ಲೂಪ್ನೊಂದಿಗೆ ಖಾಲಿ ಕೋಶದವರೆಗೆ
- ಮೊದಲನೆಯದಾಗಿ, ಡೆವಲಪರ್ ಟ್ಯಾಬ್ನಿಂದ ವಿಷುಯಲ್ ಬೇಸಿಕ್ ಎಡಿಟರ್ ಅನ್ನು ತೆರೆಯಿರಿ ಮತ್ತು ಸೇರಿಸಿ a ಕೋಡ್ ವಿಂಡೋದಲ್ಲಿ ಮಾಡ್ಯೂಲ್ .
- ನಂತರ, ಕೆಳಗಿನ ಕೋಡ್ ಅನ್ನು ನಕಲಿಸಿ ಮತ್ತು ಅಂಟಿಸಿ ಕೋಡ್ ವಿಂಡೋಗೆ.
3193
ನಿಮ್ಮ ಕೋಡ್ ಈಗ ರನ್ ಆಗಲು ಸಿದ್ಧವಾಗಿದೆ.
- ನಂತರ, ರನ್ ಮ್ಯಾಕ್ರೋ. ಫಲಿತಾಂಶವನ್ನು ಕೆಳಗಿನ gif ನಲ್ಲಿ ತೋರಿಸಲಾಗಿದೆ.
ಮ್ಯಾಕ್ರೋ ರನ್ ಮಾಡಿದ ನಂತರ, ಅದು ಎಲ್ಲಾ ಸಾಲುಗಳ ಮೂಲಕ ಕೋಷ್ಟಕದಲ್ಲಿ ಲೂಪ್ ಮಾಡಲು ಪ್ರಾರಂಭಿಸಿತು ಮತ್ತು ಒಮ್ಮೆ ಅದು ಖಾಲಿ ಸೆಲ್, ಸೆಲ್ B8 ಅನ್ನು ತಲುಪಿತು, ಅದು ಪುನರಾವರ್ತನೆಯನ್ನು ನಿಲ್ಲಿಸಿತು .
VBA ಕೋಡ್ವಿವರಣೆ
5738
ನಾವು ಕೆಲಸ ಮಾಡುವ ಸೆಲ್ ಅನ್ನು ಆಯ್ಕೆಮಾಡಿ.
5292
ಖಾಲಿ ಸೆಲ್ ಕಂಡುಬರುವವರೆಗೆ ಲೂಪ್ ಮಾಡುವುದನ್ನು ಪ್ರಾರಂಭಿಸುತ್ತದೆ ಮತ್ತು ಮುಂದುವರಿಯುತ್ತದೆ.
4641
ಖಾಲಿ ಸೆಲ್ ಇದ್ದಾಗ ಸಾಲಾಗಿ ಕಂಡುಬಂದ ನಂತರ ಅದನ್ನು ಆಯ್ಕೆಮಾಡಿ ಮತ್ತು ಪುನರಾವರ್ತನೆಯನ್ನು ನಿಲ್ಲಿಸಿ.
10. ಎಕ್ಸೆಲ್ನಲ್ಲಿ ಬಹು ಖಾಲಿ ಸೆಲ್ಗಳವರೆಗೆ ಸಾಲುಗಳ ಮೂಲಕ ಪುನರಾವರ್ತನೆ ಮಾಡಲು VBA ಮ್ಯಾಕ್ರೋ
ಹಿಂದಿನ ವಿಭಾಗದಲ್ಲಿ, ಖಾಲಿ ಸೆಲ್ ಕಂಡುಬಂದಾಗ ಲೂಪ್ ಅನ್ನು ಹೇಗೆ ನಿಲ್ಲಿಸುವುದು ಎಂದು ನೀವು ಕಲಿತಿದ್ದೀರಿ. ಆದರೆ ಕೇವಲ ಒಂದರ ಬದಲಿಗೆ ಬಹು ಖಾಲಿ ಕೋಶಗಳು ಕಂಡುಬರುವವರೆಗೆ ಪುನರಾವರ್ತನೆಯನ್ನು ನಿಲ್ಲಿಸಲು ನೀವು ಬಯಸದಿದ್ದರೆ ಏನು ಮಾಡಬೇಕು.
ಹಲವು ಖಾಲಿ ಕೋಶಗಳವರೆಗೆ ಸಾಲುಗಳ ಮೂಲಕ ಲೂಪ್ ಮಾಡುವ ಹಂತಗಳು ಟೇಬಲ್ನಲ್ಲಿ ಕಂಡುಬರುತ್ತವೆ ಜೊತೆಗೆ VBA Excel ಅನ್ನು ಕೆಳಗೆ ತೋರಿಸಲಾಗಿದೆ.
ಹಂತಗಳು:
- ಮೊದಲನೆಯದಾಗಿ, Visual Basic Editor ಅನ್ನು ತೆರೆಯಿರಿ ಕೋಡ್ ವಿಂಡೋದಲ್ಲಿ ಡೆವಲಪರ್ ಟ್ಯಾಬ್ ಮತ್ತು ಸೇರಿಸಿ ಮಾಡ್ಯೂಲ್ .
- ನಂತರ, ನಕಲಿಸಿ ಕೆಳಗಿನ ಕೋಡ್ ಮತ್ತು ಅಂಟಿಸಿ ಕೋಡ್ ವಿಂಡೋಗೆ.
8462
ನಿಮ್ಮ ಕೋಡ್ ಈಗ ಚಾಲನೆಗೆ ಸಿದ್ಧವಾಗಿದೆ.
- ಈಗ, ಮ್ಯಾಕ್ರೋವನ್ನು ರನ್ ಮಾಡಿ ಮತ್ತು ಔಟ್ಪುಟ್ಗಾಗಿ ಕೆಳಗಿನ gif ಅನ್ನು ನೋಡಿ.
ಮ್ಯಾಕ್ರೋ ರನ್ ಮಾಡಿದ ನಂತರ, ಅದು ನಲ್ಲಿ ನಿಲ್ಲಲಿಲ್ಲ ಮೊದಲ ಖಾಲಿ ಕೋಶ, ಕೋಶ B8 . ಸೆಲ್ B16 ನಲ್ಲಿ ಎರಡು ಸತತ ಖಾಲಿ ಕೋಶಗಳು ಕಂಡುಬಂದಾಗ ಅದು ನಿಂತಿತು.
VBA ಕೋಡ್ ವಿವರಣೆ
3022
ಸೆಲ್ ಆಯ್ಕೆಮಾಡಿ ಇದರಿಂದ ನಾವು ಕೆಲಸ ಮಾಡುತ್ತೇವೆ.
9209
ಎರಡು ಸತತ ಖಾಲಿ ಕೋಶಗಳು ಕಂಡುಬರುವವರೆಗೆ ಲೂಪ್ ಮಾಡುವುದನ್ನು ಪ್ರಾರಂಭಿಸುತ್ತದೆ ಮತ್ತು ಮುಂದುವರಿಯುತ್ತದೆ.
3943
ಎರಡು ಸತತ ಖಾಲಿ ಕೋಶಗಳು ಕಂಡುಬಂದಾಗ, ನಂತರಅದನ್ನು ಆಯ್ಕೆಮಾಡಿ ಮತ್ತು ಪುನರಾವರ್ತನೆಯನ್ನು ನಿಲ್ಲಿಸಿ.
11. ಎಕ್ಸೆಲ್ನಲ್ಲಿ ಖಾಲಿಯಾಗುವವರೆಗೆ ಎಲ್ಲಾ ಕಾಲಮ್ಗಳನ್ನು ಜೋಡಿಸುವ ಮೂಲಕ ಸಾಲುಗಳ ಮೂಲಕ ಲೂಪ್ ಮಾಡಲು VBA ಅನ್ನು ಎಂಬೆಡ್ ಮಾಡಿ
ಈ ವಿಭಾಗವು ಟೇಬಲ್ನಲ್ಲಿರುವ ಎಲ್ಲಾ ಸಾಲುಗಳ ಮೂಲಕ ಲೂಪ್ ಮಾಡುವುದು ಮತ್ತು ಖಾಲಿ ಕೋಶದವರೆಗೆ ಎಲ್ಲಾ ಕಾಲಮ್ಗಳನ್ನು ಹೇಗೆ ಜೋಡಿಸುವುದು ಎಂಬುದನ್ನು ತೋರಿಸುತ್ತದೆ VBA Excel ನೊಂದಿಗೆ ಕಂಡುಬರುತ್ತದೆ.
ಎಕ್ಸೆಲ್ನಲ್ಲಿ VBA ಮ್ಯಾಕ್ರೋ ಮೂಲಕ ಅದನ್ನು ಹೇಗೆ ಮಾಡಬೇಕೆಂದು ಕಲಿಯೋಣ.
ಹಂತಗಳು:
- ಮೊದಲಿಗೆ, ಡೆವಲಪರ್ ಟ್ಯಾಬ್ನಿಂದ ವಿಷುಯಲ್ ಬೇಸಿಕ್ ಎಡಿಟರ್ ತೆರೆಯಿರಿ ಮತ್ತು ಸೇರಿಸಿ ಮಾಡ್ಯೂಲ್ ಕೋಡ್ ವಿಂಡೋದಲ್ಲಿ.
- ನಂತರ, ನಕಲಿಸಿ ಕೆಳಗಿನ ಕೋಡ್ ಮತ್ತು ಅಂಟಿಸಿ ಕೋಡ್ ವಿಂಡೋಗೆ.
3345
ನಿಮ್ಮ ಕೋಡ್ ಈಗ ಚಾಲನೆಗೆ ಸಿದ್ಧವಾಗಿದೆ.
- ನಂತರ, ಮ್ಯಾಕ್ರೋ ರನ್ ಮಾಡಿ ಮತ್ತು ಫಲಿತಾಂಶಕ್ಕಾಗಿ ಕೆಳಗಿನ gif ಅನ್ನು ನೋಡಿ.
ಮೇಲಿನ gif ನಿಂದ ನೀವು ನೋಡುವಂತೆ, ಪ್ರತಿಯೊಂದರಲ್ಲೂ ಇರುವ ಎಲ್ಲಾ ಕಾಲಮ್ಗಳ ಸಂಯೋಜಿತ ಮೌಲ್ಯವನ್ನು ನಿಮಗೆ ತೋರಿಸುವ ಪಾಪ್-ಅಪ್ MsgBox ಇದೆ ನಿಮ್ಮ ಎಕ್ಸೆಲ್ ವರ್ಕ್ಶೀಟ್ನ ಕೋಷ್ಟಕದಿಂದ ಸಾಲು . ಆದರೆ ಅದು ಒಮ್ಮೆ ಖಾಲಿ ಕೋಶವನ್ನು ತಲುಪಿದಾಗ ಅದು ನಿಂತುಹೋಯಿತು .
VBA ಕೋಡ್ ವಿವರಣೆ
3750
ವೇರಿಯೇಬಲ್ಗಳನ್ನು ವಿವರಿಸಿ.
4908
ನಾವು ಕೆಲಸ ಮಾಡುವ ಹಾಳೆಯ ಹೆಸರನ್ನು ಹೊಂದಿಸಿ (“ ConcatenatingAllColUntilBlank ” ಎಂಬುದು ವರ್ಕ್ಬುಕ್ನಲ್ಲಿರುವ ಶೀಟ್ ಹೆಸರು).
9124
ನಾವು ಕೆಲಸ ಮಾಡುವ ಶ್ರೇಣಿಯನ್ನು ವಿವರಿಸಿ.
2157
ಈ ಕೋಡ್ ತುಣುಕು ರಚನೆಯೊಂದಿಗೆ ಲೂಪ್ ಅನ್ನು ಪ್ರಾರಂಭಿಸುತ್ತದೆ. ಇದು ರಚನೆಯ ದೊಡ್ಡ ಸಬ್ಸ್ಕ್ರಿಪ್ಟ್ ಮತ್ತು ಕೆಳಗಿನ ಬೌಂಡ್ ಅನ್ನು ಹಿಂದಿರುಗಿಸುವವರೆಗೆ ಲೂಪ್ ಮಾಡುವುದನ್ನು ಮುಂದುವರಿಸುತ್ತದೆಮೊದಲ ಆಯಾಮ. ನಂತರ ಅದು ಎರಡನೇ ಆಯಾಮದ ಕೆಳಗಿನ ಬೌಂಡ್ ಅನ್ನು ಹೊರತೆಗೆಯುವ ಪುನರಾವರ್ತನೆಗೆ ಪ್ರವೇಶಿಸುತ್ತದೆ. ಅದರ ನಂತರ, ಇದು iResult ವೇರಿಯೇಬಲ್ನಲ್ಲಿ ಎಲ್ಲಾ ಹೊರತೆಗೆಯಲಾದ ಮೌಲ್ಯಗಳನ್ನು ಅವುಗಳನ್ನು ಸಂಯೋಜಿಸುವ ಮೂಲಕ ಮತ್ತು ಫಲಿತಾಂಶವನ್ನು MsgBox ನಲ್ಲಿ ಎಸೆಯುವ ಮೂಲಕ ಹಾದುಹೋಗುತ್ತದೆ. ಅದು ಖಾಲಿ ಕೋಶವನ್ನು ಕಂಡುಕೊಳ್ಳುವವರೆಗೆ ಅದನ್ನು ಮುಂದುವರಿಸುತ್ತದೆ.
ತೀರ್ಮಾನ
ಮುಕ್ತಾಯಕ್ಕೆ, ಈ ಲೇಖನವು ನಿಮಗೆ ಸಾಲುಗಳ ಮೂಲಕ ಲೂಪ್ ಮಾಡುವುದು ಹೇಗೆ ಎಂಬುದರ ಕುರಿತು 11 ಪರಿಣಾಮಕಾರಿ ವಿಧಾನಗಳನ್ನು ತೋರಿಸಿದೆ ಎಕ್ಸೆಲ್ನಲ್ಲಿ VBA ಮ್ಯಾಕ್ರೋ ನೊಂದಿಗೆ ಟೇಬಲ್ನ . ಈ ಲೇಖನವು ನಿಮಗೆ ತುಂಬಾ ಪ್ರಯೋಜನಕಾರಿಯಾಗಿದೆ ಎಂದು ನಾನು ಭಾವಿಸುತ್ತೇನೆ. ವಿಷಯಕ್ಕೆ ಸಂಬಂಧಿಸಿದಂತೆ ಯಾವುದೇ ಪ್ರಶ್ನೆಗಳನ್ನು ಕೇಳಲು ಹಿಂಜರಿಯಬೇಡಿ.
ಟ್ಯಾಬ್ಗೆ ಡೆವಲಪರ್ -> ವಿಷುಯಲ್ ಬೇಸಿಕ್ ಅನ್ನು ತೆರೆಯಲು ವಿಷುಯಲ್ ಬೇಸಿಕ್ ಎಡಿಟರ್ .
- ಮುಂದೆ, ಪಾಪ್-ಅಪ್ ಕೋಡ್ ವಿಂಡೋದಲ್ಲಿ, ಮೆನು ಬಾರ್, ಕ್ಲಿಕ್ ಮಾಡಿ ಸೇರಿಸಿ -> ಮಾಡ್ಯೂಲ್ .
- ನಂತರ, ನಕಲಿಸಿ ಕೆಳಗಿನ ಕೋಡ್ ಮತ್ತು ಅದನ್ನು ಕೋಡ್ಗೆ ಅಂಟಿಸಿ window.
4231
ನಿಮ್ಮ ಕೋಡ್ ಈಗ ಚಾಲನೆಗೆ ಸಿದ್ಧವಾಗಿದೆ.
- ಈಗ, ನಿಮ್ಮ ಮೇಲೆ F5 ಒತ್ತಿ ಕೀಬೋರ್ಡ್ ಅಥವಾ ಮೆನು ಬಾರ್ನಿಂದ ರನ್ -> ಉಪ/ಬಳಕೆದಾರ ಫಾರ್ಮ್ ಅನ್ನು ರನ್ ಮಾಡಿ. ಮ್ಯಾಕ್ರೋವನ್ನು ಚಲಾಯಿಸಲು ನೀವು ಉಪ-ಮೆನು ಬಾರ್ನಲ್ಲಿ ಸಣ್ಣ ಪ್ಲೇ ಐಕಾನ್ ಅನ್ನು ಕ್ಲಿಕ್ ಮಾಡಬಹುದು.
- ಅಥವಾ ಗೆ ದೃಷ್ಟಿಗೋಚರವಾಗಿ ವೀಕ್ಷಿಸಲು ಮತ್ತು ಡೇಟಾಸೆಟ್ ಮತ್ತು ಫಲಿತಾಂಶವನ್ನು ಹೋಲಿಕೆ ಮಾಡಿ, ನೀವು ಕೋಡ್ ಅನ್ನು ಉಳಿಸಬಹುದು ಮತ್ತು ಆಸಕ್ತಿಯ ವರ್ಕ್ಶೀಟ್ಗೆ ಹಿಂತಿರುಗಿ .
- ಅಲ್ಲಿಂದ, ನೀವು <1 ಅನ್ನು ಕ್ಲಿಕ್ ಮಾಡಬಹುದು. ಡೆವಲಪರ್ ಟ್ಯಾಬ್ನಿಂದ>ಮ್ಯಾಕ್ರೋಗಳು , ಮ್ಯಾಕ್ರೋ ಹೆಸರನ್ನು ಆಯ್ಕೆಮಾಡಿ, ತದನಂತರ ರನ್ ಕ್ಲಿಕ್ ಮಾಡಿ.
ಯಶಸ್ವಿ ಕೋಡ್ ಎಕ್ಸಿಕ್ಯೂಶನ್ ನಂತರ, ಫಲಿತಾಂಶವನ್ನು ನೋಡಲು ಮೇಲಿನ gif ಅನ್ನು ನೋಡಿ. ಒಂದು ಪಾಪ್-ಅಪ್ MsgBox ನಿಮ್ಮ ಎಕ್ಸೆಲ್ ಶೀಟ್ನಲ್ಲಿರುವ ಟೇಬಲ್ನಿಂದ ಪ್ರತಿ ಸಾಲಿನಿಂದ ಪ್ರತಿ ಸೆಲ್ನ ಸೆಲ್ ಉಲ್ಲೇಖ ಸಂಖ್ಯೆಯನ್ನು ತೋರಿಸುತ್ತದೆ.
0> VBA ಕೋಡ್ ವಿವರಣೆ9642
ಕೋಷ್ಟಕದಲ್ಲಿ ಕೊನೆಯ ಸಾಲಿನ ಸಂಖ್ಯೆಯನ್ನು ಪಡೆಯಲು ಕಾಲಮ್ B.
9918
ನಮ್ಮ ಡೇಟಾ ಪ್ರಾರಂಭವಾಗುವ ಸಾಲು ಸಂಖ್ಯೆ 4 ಅನ್ನು ಹೊಂದಿಸಿ.
6390
ಮೊದಲ ಸಾಲಿನಿಂದ ಲೂಪ್ ಮಾಡಲು.
6480
ನಮ್ಮ ಡೇಟಾ ಪ್ರಾರಂಭವಾಗುವ ಕಾಲಮ್ ಸಂಖ್ಯೆ 2 ಅನ್ನು ಹೊಂದಿಸಿ.
2808
ಕೊನೆಯದನ್ನು ಪಡೆಯಲು ಸಾಲುಗಳ ಮೂಲಕ ಲೂಪ್ ಮಾಡಲು ಪ್ರಾರಂಭಿಸಿಕೊನೆಯ ಸಾಲಿನವರೆಗೆ ಪ್ರಸ್ತುತ ಸಾಲನ್ನು ಮೌಲ್ಯಮಾಪನ ಮಾಡುವ ಮೂಲಕ ಕಾಲಮ್ ಸಂಖ್ಯೆ.
2975
ಮೊದಲ ಸಾಲಿನಿಂದ ಕೊನೆಯ ಸಾಲಿನವರೆಗೆ ಕಾಲಮ್ ಅನ್ನು ಲೂಪ್ ಮಾಡುವುದನ್ನು ಹೆಚ್ಚಿಸಿ.
4046
ಈ ಕೋಡ್ ತುಣುಕು ಪ್ರಕ್ರಿಯೆಗೊಳಿಸಲು ಕಾರ್ಯನಿರ್ವಹಿಸುತ್ತದೆ, ಪ್ರತಿಯೊಂದರ ನಂತರವೂ ಹೆಚ್ಚಳ ಪುನರಾವರ್ತನೆ ಮತ್ತು ಕೋಡ್ನ ಫಲಿತಾಂಶವನ್ನು ಪ್ರದರ್ಶಿಸಿ.
ಇನ್ನಷ್ಟು ಓದಿ: ಎಕ್ಸೆಲ್ ಟೇಬಲ್ನಲ್ಲಿ ಸ್ವಯಂಚಾಲಿತವಾಗಿ ಹೊಸ ಸಾಲನ್ನು ಹೇಗೆ ಸೇರಿಸುವುದು
2 . ಮೌಲ್ಯದ ಪ್ರಕಾರ ಪ್ರತಿ ಸಾಲಿನಲ್ಲಿ ಪ್ರತಿ ಕೋಶದ ಮೂಲಕ ಲೂಪ್ ಮಾಡಲು VBA ಅನ್ನು ಕಾರ್ಯಗತಗೊಳಿಸಿ
ನೀವು ಕೋಷ್ಟಕದ ಪ್ರತಿ ಸಾಲಿನಲ್ಲಿ ಪ್ರತಿ ಕೋಶದ ಮೂಲಕ ಲೂಪ್ ಮಾಡಲು ಬಯಸಿದರೆ ಮತ್ತು ಸೆಲ್ಗಳಲ್ಲಿ ವಾಸಿಸುವ ಮೌಲ್ಯವನ್ನು ಹಿಂತಿರುಗಿಸುವ ಮೌಲ್ಯವಾಗಿ ಎಸೆಯಿರಿ , ನಂತರ ಈ ವಿಭಾಗವು VBA Excel ನೊಂದಿಗೆ ಅದನ್ನು ಹೇಗೆ ಮಾಡಬೇಕೆಂದು ಲೆಕ್ಕಾಚಾರ ಮಾಡಲು ಸಹಾಯ ಮಾಡುತ್ತದೆ.
ನೀವು ಅದನ್ನು ListObject ಮತ್ತು <1 ನೊಂದಿಗೆ ಮಾಡಬಹುದು VBA ನ>DataBodyRange ಆಸ್ತಿ. ವಸ್ತು ಮತ್ತು ಆಸ್ತಿ ಎರಡನ್ನೂ ಹೊಂದಿರುವ ಮ್ಯಾಕ್ರೋ ಕೋಡ್ ಅನ್ನು ನಾವು ನಿಮಗೆ ತೋರಿಸುತ್ತೇವೆ.
2.1. ListObject ಜೊತೆ
VBA Excel ನಲ್ಲಿ ListObject ನೊಂದಿಗೆ ಸೆಲ್ ಮೌಲ್ಯದ ಮೂಲಕ ಟೇಬಲ್ನ ಪ್ರತಿ ಸಾಲಿನ ಪ್ರತಿ ಕೋಶದ ಮೂಲಕ ಲೂಪ್ ಮಾಡುವ ಹಂತಗಳನ್ನು ಕೆಳಗೆ ನೀಡಲಾಗಿದೆ.
ಹಂತಗಳು:
- ಮೊದಲಿನ ರೀತಿಯಲ್ಲಿಯೇ, ಡೆವಲಪರ್ ಟ್ಯಾಬ್ ಮತ್ತು ವಿಷುಯಲ್ ಬೇಸಿಕ್ ಎಡಿಟರ್ ಅನ್ನು ತೆರೆಯಿರಿ ಕೋಡ್ ವಿಂಡೋದಲ್ಲಿ 1> ಒಂದು ಮಾಡ್ಯೂಲ್ ಸೇರಿಸಿ.
- ನಂತರ, ಕೋಡ್ ವಿಂಡೋದಲ್ಲಿ, ನಕಲಿಸಿ ಕೆಳಗಿನ ಕೋಡ್ ಮತ್ತು ಅಂಟಿಸಿ ಅದು.
5969
ನಿಮ್ಮ ಕೋಡ್ ಈಗ ರನ್ ಆಗಲು ಸಿದ್ಧವಾಗಿದೆ.
- ಅದರ ನಂತರ, ರನ್ ಮ್ಯಾಕ್ರೋ ಮೇಲಿನ ವಿಭಾಗದಲ್ಲಿ ನಾವು ನಿಮಗೆ ತೋರಿಸಿದಂತೆ. ಫಲಿತಾಂಶವನ್ನು gif ನಲ್ಲಿ ತೋರಿಸಲಾಗಿದೆಕೆಳಗೆ>ನಿಮ್ಮ ಎಕ್ಸೆಲ್ ಶೀಟ್ನಲ್ಲಿರುವ ಟೇಬಲ್ನಿಂದ.
VBA ಕೋಡ್ ವಿವರಣೆ
1900
ವೇರಿಯೇಬಲ್ಗಳನ್ನು ವಿವರಿಸಿ.
5259
ಈ ತುಣುಕು ಕೋಡ್ ಮೊದಲು ಕೋಷ್ಟಕದಲ್ಲಿನ ಸಾಲುಗಳ ಮೂಲಕ ಲೂಪ್ ಮಾಡಲು ಪ್ರಾರಂಭಿಸುತ್ತದೆ (“ TblStudents ” ಎಂಬುದು ನಮ್ಮ ಟೇಬಲ್ ಹೆಸರು). ನಂತರ ಪ್ರತಿ ಸಾಲಿಗೆ ಕಾಲಮ್ಗಳನ್ನು ನಮೂದಿಸುತ್ತದೆ. ಅದರ ನಂತರ, ಸೆಲ್ನ ಮೌಲ್ಯವನ್ನು MsgBox ನಲ್ಲಿ ರವಾನಿಸಿ. ನಂತರ ಮುಂದಿನ ಅಂಕಣಕ್ಕೆ ಹೋಗಿ. ಒಂದು ಸಾಲಿನ ಎಲ್ಲಾ ಕಾಲಮ್ಗಳ ಮೂಲಕ ಪುನರಾವರ್ತನೆಯನ್ನು ಪೂರ್ಣಗೊಳಿಸಿದ ನಂತರ, ಅದು ಮುಂದಿನ ಸಾಲಿಗೆ ಹೋಗುತ್ತದೆ ಮತ್ತು ಕೊನೆಯ ಸಾಲಿನವರೆಗೆ ಪುನರಾವರ್ತನೆ ಪ್ರಕ್ರಿಯೆಯನ್ನು ಮುಂದುವರಿಸುತ್ತದೆ.
2.2. DataBodyRange ಆಸ್ತಿಯೊಂದಿಗೆ
ಟೇಬಲ್ನಿಂದ ಹೊರತೆಗೆಯಲಾದ ಡೇಟಾದೊಂದಿಗೆ ಹೆಚ್ಚು ನಿರ್ದಿಷ್ಟವಾಗಿರಲು, ನೀವು ListObject ನ DataBodyRange ಆಸ್ತಿಯನ್ನು ಬಳಸಿಕೊಳ್ಳಬಹುದು. DataBodyRange ಆಸ್ತಿಯು ಹೆಡರ್ ಸಾಲು ಮತ್ತು ಇನ್ಸರ್ಟ್ ಸಾಲಿನ ನಡುವಿನ ಪಟ್ಟಿಯಿಂದ ವ್ಯಾಪ್ತಿಯನ್ನು ಹೊಂದಿರುವ ಫಲಿತಾಂಶವನ್ನು ನಿಮಗೆ ಎಸೆಯುತ್ತದೆ.
ನೀವು ಹೇಗೆ ಪ್ರತಿ ಸಾಲಿನಲ್ಲಿ ಪ್ರತಿ ಸೆಲ್ ಮೂಲಕ ಲೂಪ್ ಮಾಡಬಹುದು ಎಂಬುದರ ಹಂತಗಳು VBA Excel ನಲ್ಲಿ DataBodyRange ನೊಂದಿಗೆ ಸೆಲ್ ಮೌಲ್ಯದಿಂದ ಟೇಬಲ್ ಅನ್ನು ಕೆಳಗೆ ನೀಡಲಾಗಿದೆ.
ಹಂತಗಳು:
- ತೋರಿಸಿದಂತೆ ಮೊದಲು, ಡೆವಲಪರ್ ಟ್ಯಾಬ್ನಿಂದ ವಿಷುಯಲ್ ಬೇಸಿಕ್ ಎಡಿಟರ್ ತೆರೆಯಿರಿ ಮತ್ತು ಕೋಡ್ ವಿಂಡೋದಲ್ಲಿ ಸೇರಿಸಿ ಮಾಡ್ಯೂಲ್ .
- ನಂತರ , ನಕಲು ಕೆಳಗಿನ ಕೋಡ್ ಮತ್ತು ಅಂಟಿಸಿ ಕೋಡ್ ವಿಂಡೋಗೆ.
8366
ನಿಮ್ಮ ಕೋಡ್ ಈಗ ಚಾಲನೆಗೆ ಸಿದ್ಧವಾಗಿದೆ.
- ನಂತರ, ರನ್ ಮ್ಯಾಕ್ರೋ ಮತ್ತು ಔಟ್ಪುಟ್ ನೋಡಲು ಈ ಕೆಳಗಿನ gif ಅನ್ನು ನೋಡಿ 2> ನಿಮ್ಮ ಎಕ್ಸೆಲ್ ಶೀಟ್ನಲ್ಲಿರುವ ಟೇಬಲ್ನಿಂದ ಪ್ರತಿ ಸಾಲಿನಿಂದ ಪ್ರತಿ ಕೋಶದಿಂದ ಸಾಗಿಸುವ ಮೌಲ್ಯವನ್ನು ತೋರಿಸುತ್ತದೆ.
VBA ಕೋಡ್ ವಿವರಣೆ
8948
ವೇರಿಯೇಬಲ್ ಅನ್ನು ವಿವರಿಸಿ.
4734
ಕೋಡ್ನ ಈ ತುಣುಕು ಮೊದಲು ಟೇಬಲ್ನಲ್ಲಿನ ಸಾಲುಗಳ ಮೂಲಕ ಲೂಪ್ ಮಾಡಲು ಪ್ರಾರಂಭಿಸುತ್ತದೆ (“ TblStdnt ” ನಮ್ಮ ಟೇಬಲ್ ಹೆಸರು) ಮತ್ತು ಹೊರತುಪಡಿಸಿ ಮೌಲ್ಯಗಳ ಶ್ರೇಣಿಯನ್ನು ಹಿಂತಿರುಗಿಸುತ್ತದೆ ಮೇಜಿನ ಹೆಡರ್ ಸಾಲು. ನಂತರ MsgBox ನಲ್ಲಿ ಶ್ರೇಣಿಯ ಮೌಲ್ಯವನ್ನು ರವಾನಿಸಿ. ನಂತರ ಅದು ಶ್ರೇಣಿಯನ್ನು ಹೊರತೆಗೆಯಲು ಮುಂದಿನ ಸಾಲಿಗೆ ಹೋಗುತ್ತದೆ ಮತ್ತು ಕೊನೆಯ ಸಾಲಿನವರೆಗೆ ಪುನರಾವರ್ತನೆ ಪ್ರಕ್ರಿಯೆಯನ್ನು ಮುಂದುವರಿಸುತ್ತದೆ.
3. ಎಕ್ಸೆಲ್ನಲ್ಲಿ ಕಾಲಮ್ಗಳನ್ನು ಸಂಯೋಜಿಸುವ ಮೂಲಕ ಸಾಲುಗಳ ಮೂಲಕ ಪುನರಾವರ್ತನೆ ಮಾಡಲು VBA ಮ್ಯಾಕ್ರೋ ಅನ್ನು ಅನ್ವಯಿಸಿ
ಈ ವಿಭಾಗವು ನಿಮ್ಮ ಡೇಟಾಸೆಟ್ನಿಂದ ಮೊದಲ ಕಾಲಮ್ನೊಂದಿಗೆ ಕಾಲಮ್ಗಳನ್ನು ಸಂಯೋಜಿಸುವ ಮೂಲಕ ಸಾಲುಗಳ ಮೂಲಕ ಲೂಪ್ ಮಾಡುವುದು ಹೇಗೆ ಎಂದು ತೋರಿಸುತ್ತದೆ ಎಕ್ಸೆಲ್ನಲ್ಲಿ.
ಉದಾಹರಣೆಗೆ, ನಮ್ಮ ಡೇಟಾಸೆಟ್ಗಾಗಿ, ಮೊದಲು ನಾವು ಜಾನ್ ಇನ್ ಸೆಲ್ ಬಿ5 ಮತ್ತು 101 ಸೆಲ್ ಸಿ5 ಮೂಲಕ ಅವುಗಳನ್ನು ಸಂಯೋಜಿಸುವ ಮೂಲಕ ಪುನರಾವರ್ತಿಸುತ್ತೇವೆ ಮತ್ತು ನಂತರ ಪುನರಾವರ್ತಿಸುತ್ತೇವೆ ಜಾನ್ ಇನ್ ಸೆಲ್ B5 ಮತ್ತು 89 ಸೆಲ್ ಡಿ5 ಅನ್ನು ಸಾಲು 5 ರಿಂದ ಸಂಯೋಜಿಸುವ ಮೂಲಕ.
ನೀವು ಅದನ್ನು ಹೇಗೆ ಮಾಡಬಹುದು ಎಂಬುದನ್ನು ನಾವು ನಿಮಗೆ ತೋರಿಸೋಣ. ಎಕ್ಸೆಲ್ನಲ್ಲಿ VBA ಮ್ಯಾಕ್ರೋ.
ಹಂತಗಳು:
- ಮೊದಲಿಗೆ, ವಿಷುಯಲ್ ಬೇಸಿಕ್ ಎಡಿಟರ್ ಅನ್ನು ತೆರೆಯಿರಿ. ಕೋಡ್ ವಿಂಡೋದಲ್ಲಿ 1>ಡೆವಲಪರ್
- ಎರಡನೆಯದಾಗಿ, ಕೋಡ್ ವಿಂಡೋದಲ್ಲಿ, ನಕಲಿಸಿ ಕೋಡ್ಮತ್ತು ಅಂಟಿಸಿ ಅದನ್ನು.
4088
ನಿಮ್ಮ ಕೋಡ್ ಈಗ ಚಾಲನೆಗೆ ಸಿದ್ಧವಾಗಿದೆ.
- ಮೂರನೆಯದಾಗಿ, <1 ಮ್ಯಾಕ್ರೋವನ್ನು> ರನ್ ಮಾಡಿ . ಫಲಿತಾಂಶವನ್ನು ನೋಡಲು ಕೆಳಗಿನ gif ಅನ್ನು ನೋಡಿ.
ಪಾಪ್-ಅಪ್ MsgBox ನಿಮಗೆ ಸಂಯೋಜಿತ ಮೌಲ್ಯವನ್ನು ತೋರಿಸುತ್ತದೆ ಮೊದಲ ಮತ್ತು ಎರಡನೆಯ ಕಾಲಮ್ನಿಂದ ಕೋಶಗಳ ( ಜಾನ್ ಇನ್ ಸೆಲ್ B5 ರಿಂದ ಕಾಲಮ್ B ಮತ್ತು 101 ಸೆಲ್ C5 ರಲ್ಲಿ ಕಾಲಮ್ C ) ಮತ್ತು ನಂತರ ಸಂಯೋಜಿತ ಮೌಲ್ಯ ಸಾಲು ಸಂಖ್ಯೆ 5<ರ ಮೊದಲ ಮತ್ತು ಮೂರನೇ ಕಾಲಮ್ನಿಂದ ( ಜಾನ್ ಇನ್ ಸೆಲ್ B5 ಕಾಲಮ್ B ಮತ್ತು 89 ಸೆಲ್ D5 ರಿಂದ ಕಾಲಮ್ D ) 2> ನಿಮ್ಮ ಡೇಟಾಸೆಟ್ನಿಂದ. ಮತ್ತು ಈ ಜೋಡಣೆಯ ಕಾರ್ಯಾಚರಣೆಯು ಟೇಬಲ್ನ ಕೊನೆಯ ಸಾಲನ್ನು ತಲುಪುವವರೆಗೆ ಮುಂದುವರಿಯುತ್ತದೆ.
VBA ಕೋಡ್ ವಿವರಣೆ
7567
ವೇರಿಯಬಲ್ ಅನ್ನು ವಿವರಿಸಿ.
4996
ನಂತರ ಕೋಡ್ ಸಕ್ರಿಯ ಶೀಟ್ನಿಂದ ಟೇಬಲ್ ಅನ್ನು ಆಯ್ಕೆಮಾಡುತ್ತದೆ (“ TblConcatenate ” ನಮ್ಮ ಕೋಷ್ಟಕದ ಹೆಸರಿನಲ್ಲಿ).
1932
ಅದರ ನಂತರ, ಹೆಡರ್ ಅನ್ನು ಹೊರತುಪಡಿಸಿ ಪ್ರತಿ ಸಾಲನ್ನು ಪುನರಾವರ್ತಿಸಲು ಪ್ರಾರಂಭಿಸುತ್ತದೆ. ಕಾಲಮ್. ಪುನರಾವರ್ತನೆಯು ಕಾಲಮ್ ಹೆಡರ್ ಮತ್ತು ಸಾಲುಗಳ ನಡುವಿನ ಶ್ರೇಣಿಯಲ್ಲಿ ಹೊಂದಾಣಿಕೆಯನ್ನು ಕಂಡುಕೊಂಡರೆ ಅದು ಮೌಲ್ಯವನ್ನು iValue ವೇರಿಯೇಬಲ್ನಲ್ಲಿ ಸಂಗ್ರಹಿಸುತ್ತದೆ.
5662
ಮೇಲಿನ ಸ್ಥಿತಿಯನ್ನು ಪೂರೈಸದಿದ್ದರೆ, ನಂತರ ಕೋಡ್ MsgBox ನಲ್ಲಿ ಮೌಲ್ಯವನ್ನು ಎಸೆಯುತ್ತದೆ ಮತ್ತು ಸ್ಥಿತಿಯನ್ನು ಪೂರ್ಣಗೊಳಿಸುತ್ತದೆ. ಅದರ ನಂತರ, ಅದು ಮತ್ತೊಂದು ಶ್ರೇಣಿಯಲ್ಲಿ ಲೂಪಿಂಗ್ಗೆ ಚಲಿಸುತ್ತದೆ ಮತ್ತು ಕೊನೆಯ ಸಾಲಿನವರೆಗೆ ಪುನರಾವರ್ತನೆಯನ್ನು ಮುಂದುವರಿಸುತ್ತದೆ. ಒಮ್ಮೆ ಅದು ಕೊನೆಯ ಸಾಲನ್ನು ತಲುಪಿದರೆ, ಮ್ಯಾಕ್ರೋ ಕೋಡ್ ಎಕ್ಸಿಕ್ಯೂಶನ್ ಅನ್ನು ಕೊನೆಗೊಳಿಸುತ್ತದೆ.
4. ಪುನರಾವರ್ತನೆ ಮಾಡಲು ಮ್ಯಾಕ್ರೋ ಎಂಬೆಡ್ ಮಾಡಿಎಕ್ಸೆಲ್ನಲ್ಲಿನ ಕೋಷ್ಟಕದಲ್ಲಿ ಎಲ್ಲಾ ಕಾಲಮ್ಗಳನ್ನು ಸಂಯೋಜಿಸುವ ಮೂಲಕ ಸಾಲುಗಳ ಮೂಲಕ
ಈ ವಿಭಾಗದಲ್ಲಿ, ಪ್ರತಿ ಸಾಲನ್ನು ಹೊಂದಿರುವ ಎಲ್ಲಾ ಕಾಲಮ್ಗಳನ್ನು ಜೊತೆಗೆ ಡೇಟಾಸೆಟ್ನಲ್ಲಿ ಹೇಗೆ ಸಂಯೋಜಿಸುವುದು ಎಂದು ನಾವು ಕಲಿಯುತ್ತೇವೆ ಎಕ್ಸೆಲ್ನಲ್ಲಿ VBA ಮ್ಯಾಕ್ರೋ.
ಕೆಳಗೆ ತೋರಿಸಿರುವ ಕಾರ್ಯಗತಗೊಳಿಸಲು ಹಂತಗಳು ಡೆವಲಪರ್ ಟ್ಯಾಬ್ನಿಂದ 1>ವಿಷುಯಲ್ ಬೇಸಿಕ್ ಎಡಿಟರ್ ಮತ್ತು ಕೋಡ್ ವಿಂಡೋದಲ್ಲಿ ಸೇರಿಸಿ ಮಾಡ್ಯೂಲ್ .
- ನಂತರ, ಈ ಕೆಳಗಿನ ಕೋಡ್ ಅನ್ನು ನಕಲಿಸಿ ಮತ್ತು ಅಂಟಿಸಿ ಕೋಡ್ ವಿಂಡೋಗೆ.
2018
ನಿಮ್ಮ ಕೋಡ್ ಈಗ ಚಾಲನೆಗೆ ಸಿದ್ಧವಾಗಿದೆ.
<3
- ಮುಂದೆ, ರನ್ ಮ್ಯಾಕ್ರೋ ಕೋಡ್.
ನೀವು ಮೇಲಿನ gif ನಿಂದ ನೋಡಬಹುದು ಒಂದು ಪಾಪ್-ಅಪ್ MsgBox ನಿಮ್ಮ ಎಕ್ಸೆಲ್ ವರ್ಕ್ಶೀಟ್ನ ಕೋಷ್ಟಕದಿಂದ ಪ್ರತಿ ಸಾಲಿನಲ್ಲಿ ವಾಸಿಸುವ ಎಲ್ಲಾ ಕಾಲಮ್ಗಳ ಸಂಯೋಜಿತ ಮೌಲ್ಯವನ್ನು ತೋರಿಸುತ್ತದೆ.
VBA ಕೋಡ್ ವಿವರಣೆ
5990
ವೇರಿಯೇಬಲ್ಗಳನ್ನು ವಿವರಿಸಿ.
6190
ನಾವು ಕೆಲಸ ಮಾಡುವ ಶೀಟ್ ಹೆಸರನ್ನು ಹೊಂದಿಸಿ (“ ConcatenatingAllCol ” ಎಂಬುದು ಶೀಟ್ ಹೆಸರು ಕಾರ್ಯಪುಸ್ತಕದಲ್ಲಿ).
8798
De ನಾವು ಕೆಲಸ ಮಾಡುವ ಟೇಬಲ್ ಹೆಸರನ್ನು ಉತ್ತಮಗೊಳಿಸಿ (“ TblConcatenateAll ” ಎಂಬುದು ನಮ್ಮ ಡೇಟಾಸೆಟ್ನಲ್ಲಿರುವ ಟೇಬಲ್ ಹೆಸರು).
1388
ಟೇಬಲ್ನ ಪ್ರತಿ ಸಾಲಿನ ಮೂಲಕ ಪುನರಾವರ್ತನೆಯನ್ನು ಪ್ರಾರಂಭಿಸುತ್ತದೆ.
2741
ಟೇಬಲ್ನ ಪ್ರತಿ ಸಾಲಿನ ಪ್ರತಿ ಕಾಲಮ್ನ ಮೂಲಕ ಪುನರಾವರ್ತನೆಯನ್ನು ಪ್ರಾರಂಭಿಸುತ್ತದೆ.
2759
ಪ್ರತಿ ಸಾಲಿನ ಪ್ರತಿ ಕಾಲಮ್ ಒಯ್ಯುವ ಮೌಲ್ಯಗಳನ್ನು ಛೇದಿಸುವ ಮೂಲಕ ಫಲಿತಾಂಶವನ್ನು ಸಂಗ್ರಹಿಸಿ. ಪ್ರತಿ ಸಾಲಿನಲ್ಲಿ ವಾಸಿಸುವ ಎಲ್ಲಾ ಕಾಲಮ್ಗಳ ಮೂಲಕ ಸ್ಕ್ಯಾನ್ ಮಾಡಿದ ನಂತರ, ಅದು ಹಾದುಹೋಗುತ್ತದೆMsgBox ನಲ್ಲಿ ಫಲಿತಾಂಶ. ನಂತರ ಮತ್ತೆ ಮುಂದಿನ ಸಾಲಿನಲ್ಲಿ ಲೂಪ್ ಮಾಡಲು ಪ್ರಾರಂಭಿಸುತ್ತದೆ ಮತ್ತು ಅದು ಟೇಬಲ್ನ ಕೊನೆಯ ಸಾಲನ್ನು ತಲುಪುವವರೆಗೆ ಲೂಪ್ ಮಾಡುವುದನ್ನು ಮುಂದುವರಿಸುತ್ತದೆ.
ಇನ್ನಷ್ಟು ಓದಿ: ಎಕ್ಸೆಲ್ VBA ನೊಂದಿಗೆ ಟೇಬಲ್ನ ಬಹು ಕಾಲಮ್ಗಳನ್ನು ಹೇಗೆ ವಿಂಗಡಿಸುವುದು (2 ವಿಧಾನಗಳು)
5. VBA ಮ್ಯಾಕ್ರೋದೊಂದಿಗೆ ಟೇಬಲ್ನ ಸಾಲುಗಳ ಮೂಲಕ ಲೂಪ್ ಮಾಡುವ ಮೂಲಕ ಮೌಲ್ಯ ಕಂಡುಬಂದರೆ ಪುನರಾವರ್ತನೆಯನ್ನು ನಿಲ್ಲಿಸಿ
ನೀವು ನಿಮ್ಮ ಟೇಬಲ್ನ ಸಾಲುಗಳ ಮೂಲಕ ಲೂಪ್ ಮಾಡಲು ಮತ್ತು ನಿರ್ದಿಷ್ಟ ಮೌಲ್ಯವನ್ನು ಕಂಡುಕೊಂಡಾಗ ಲೂಪಿಂಗ್ ಅನ್ನು ನಿಲ್ಲಿಸಲು ಬಯಸುತ್ತೀರಿ ಎಂದು ಭಾವಿಸೋಣ . ಸರಳವಾದ ಮ್ಯಾಕ್ರೋ ಕೋಡ್ನೊಂದಿಗೆ ನೀವು ಅದನ್ನು ಮಾಡಬಹುದು.
ಎಕ್ಸೆಲ್ನಲ್ಲಿ VBA ಅದನ್ನು ಹೇಗೆ ಮಾಡಬೇಕೆಂದು ಕಲಿಯೋಣ.
ಹಂತಗಳು:
- ಮೊದಲಿಗೆ, ಡೆವಲಪರ್ ಟ್ಯಾಬ್ನಿಂದ ವಿಷುಯಲ್ ಬೇಸಿಕ್ ಎಡಿಟರ್ ಅನ್ನು ತೆರೆಯಿರಿ ಮತ್ತು ಕೋಡ್ ವಿಂಡೋದಲ್ಲಿ ಮಾಡ್ಯೂಲ್ ಅನ್ನು ಸೇರಿಸಿ.
- ನಂತರ, ಕೋಡ್ ವಿಂಡೋದಲ್ಲಿ, ಕೆಳಗಿನ ಕೋಡ್ ಅನ್ನು ನಕಲಿಸಿ ಮತ್ತು ಅಂಟಿಸಿ ಅದನ್ನು.
9573
ನಿಮ್ಮ ಕೋಡ್ ಈಗ ಚಾಲನೆಗೆ ಸಿದ್ಧವಾಗಿದೆ .
- ನಂತರ, ರನ್ ಮ್ಯಾಕ್ರೋ.
- ಇದು ಲೂಪ್ ಅನ್ನು ಪ್ರಾರಂಭಿಸುತ್ತದೆ ಮತ್ತು ಅದನ್ನು ನಿಲ್ಲಿಸುತ್ತದೆ ನಿರ್ದಿಷ್ಟ ಮೌಲ್ಯವನ್ನು ಕಂಡುಹಿಡಿಯುತ್ತದೆ (“ Edge ”) ಮತ್ತು ಫಲಿತಾಂಶವನ್ನು MsgBox . ನಲ್ಲಿ ಎಸೆಯುತ್ತದೆ
ಮೇಲಿನ ಚಿತ್ರದಿಂದ ನೀವು ನೋಡುವಂತೆ, ನಿಮಗೆ ಸೆಲ್ ವಿಳಾಸ, $B$10 ಅನ್ನು ತೋರಿಸುವ ಪಾಪ್-ಅಪ್ MsgBox ಇದೆ, ಅಲ್ಲಿ ನಾವು ಕಂಡುಕೊಂಡಿದ್ದೇವೆ ನಿರ್ದಿಷ್ಟಪಡಿಸಿದ ಮೌಲ್ಯ, “ ಎಡ್ಜ್ ” .
VBA ಕೋಡ್ ವಿವರಣೆ
4705
ವ್ಯಾಖ್ಯಾನಿಸಿ ವೇರಿಯಬಲ್.
6900
1 ರಿಂದ 15 ರವರೆಗಿನ ಸಾಲುಗಳ ಮೂಲಕ ಲೂಪ್ ಮಾಡಲು ಈ ಕೋಡ್ ತುಣುಕು ಇಲ್ಲಿದೆ. ಇದು ನಿರ್ದಿಷ್ಟ ಪದವನ್ನು ಕಂಡುಕೊಂಡರೆ“ Edge ” ನಂತರ ಅದು ಪದವನ್ನು ಹೊಂದಿರುವ ಸೆಲ್ ವಿಳಾಸದೊಂದಿಗೆ ಫಲಿತಾಂಶವನ್ನು ರವಾನಿಸುತ್ತದೆ. ಪದದ ಹುಡುಕಾಟದಲ್ಲಿ 1 ರಿಂದ 15 ಸಾಲುಗಳ ಮೂಲಕ ಎಲ್ಲಾ ಡೇಟಾವನ್ನು ಸ್ಕ್ಯಾನ್ ಮಾಡುವವರೆಗೆ ಇದು ಇದನ್ನು ಮುಂದುವರಿಸುತ್ತದೆ.
ಇನ್ನಷ್ಟು ಓದಿ: ಎಕ್ಸೆಲ್ ಟೇಬಲ್ನಿಂದ ಸಾಲುಗಳು ಮತ್ತು ಕಾಲಮ್ಗಳನ್ನು ಸೇರಿಸುವುದು ಅಥವಾ ಅಳಿಸುವುದು ಹೇಗೆ
6. VBA ಪ್ರತಿ ಸಾಲಿನ ಮೂಲಕ ಲೂಪ್ ಮಾಡಲು ಮತ್ತು Excel ನಲ್ಲಿ ನಿರ್ದಿಷ್ಟ ಮೌಲ್ಯವನ್ನು ಬಣ್ಣಿಸಲು
ನೀವು MsgBox ನಲ್ಲಿ ನಿರ್ದಿಷ್ಟಪಡಿಸಿದ ಮೌಲ್ಯದ ಸೆಲ್ ವಿಳಾಸವನ್ನು ಎಸೆಯಲು ಬಯಸದಿದ್ದರೆ ಏನು ಮಾಡಬೇಕು? ನೀವು ಹುಡುಕುತ್ತಿರುವ ಮೌಲ್ಯವನ್ನು ಹೊಂದಿರುವ ಸೆಲ್ ಅನ್ನು ಬಣ್ಣಗೊಳಿಸಲು ನೀವು ಬಯಸಬಹುದು.
VBA ಮ್ಯಾಕ್ರೋದೊಂದಿಗೆ ಅದನ್ನು ಹೇಗೆ ಮಾಡಬೇಕೆಂದು ಕಲಿಯೋಣ.
ಹಂತಗಳು:
- ಹಿಂದಿನ ರೀತಿಯಲ್ಲಿಯೇ, ಡೆವಲಪರ್ ಟ್ಯಾಬ್ನಿಂದ ವಿಷುಯಲ್ ಬೇಸಿಕ್ ಎಡಿಟರ್ ತೆರೆಯಿರಿ ಮತ್ತು ಸೇರಿಸಿ ಒಂದು ಮಾಡ್ಯೂಲ್ ಕೋಡ್ ವಿಂಡೋದಲ್ಲಿ>
4071
ನಿಮ್ಮ ಕೋಡ್ ಈಗ ರನ್ ಆಗಲು ಸಿದ್ಧವಾಗಿದೆ.
- ಅದರ ನಂತರ, ರನ್ ಮ್ಯಾಕ್ರೋ.
- ಇದು ಲೂಪ್ ಅನ್ನು ಪ್ರಾರಂಭಿಸುತ್ತದೆ ಮತ್ತು ನಿರ್ದಿಷ್ಟ ಮೌಲ್ಯವನ್ನು (“ ಎಡ್ಜ್ ”) ಶ್ರೇಣಿಯಲ್ಲಿ ಕಂಡುಕೊಂಡಾಗ ಅದನ್ನು ನಿಲ್ಲಿಸುತ್ತದೆ ಮತ್ತು ಕಲರ್ ಇಂಡೆಕ್ಸ್ನೊಂದಿಗೆ ಸೆಲ್ ಅನ್ನು ಬಣ್ಣ ಮಾಡಿ ನೀವು ಕೋಡ್ನಲ್ಲಿ ಒದಗಿಸಿರುವಿರಿ.
ಮೇಲಿನ ಚಿತ್ರದಿಂದ ನೀವು ನೋಡುವಂತೆ, C ell B10 , ಅಲ್ಲಿ ನಾವು ನಿರ್ದಿಷ್ಟಪಡಿಸಿದ ಮೌಲ್ಯವನ್ನು ಕಂಡುಕೊಂಡಿದ್ದೇವೆ, “ ಎಡ್ಜ್ ” ಅನ್ನು ಕೋಡ್ ಎಕ್ಸಿಕ್ಯೂಶನ್ ನಂತರ ಬಣ್ಣಿಸಲಾಗಿದೆ.
VBA ಕೋಡ್ ವಿವರಣೆ
4742
ವ್ಯಾಖ್ಯಾನಿಸಿ
- ಮೊದಲನೆಯದಾಗಿ, ಡೆವಲಪರ್ ಟ್ಯಾಬ್ನಿಂದ ವಿಷುಯಲ್ ಬೇಸಿಕ್ ಎಡಿಟರ್ ಅನ್ನು ತೆರೆಯಿರಿ ಮತ್ತು ಸೇರಿಸಿ<2 ಕೋಡ್ ವಿಂಡೋದಲ್ಲಿ ಮಾಡ್ಯೂಲ್ 14>