ಪರಿವಿಡಿ
ನಿಮಗೆ ಅಗತ್ಯವಿರುವಾಗ ನೀವು ಒಂದು ಶೀಟ್ನಿಂದ ಇನ್ನೊಂದು ಹಾಳೆ ಅಥವಾ ವರ್ಕ್ಬುಕ್ಗೆ ಶ್ರೇಣಿಯನ್ನು ನಕಲಿಸಬಹುದು. ವಿವಿಧ ರೀತಿಯ ನಕಲು ಮತ್ತು ಅಂಟಿಸುವಿಕೆಗಳಿವೆ. ಈ ಲೇಖನವನ್ನು ಅನುಸರಿಸಿ, ಎಕ್ಸೆಲ್ ವಿಬಿಎ ನಕಲು ಶ್ರೇಣಿಯನ್ನು ಮತ್ತೊಂದು ಶೀಟ್ಗೆ ಬಳಸುವ ವಿವಿಧ ವಿಧಾನಗಳನ್ನು ನೀವು ತಿಳಿದುಕೊಳ್ಳುತ್ತೀರಿ.
ವಿವರಣೆಯನ್ನು ಉತ್ಸಾಹಭರಿತವಾಗಿಸಲು, ನಿರ್ದಿಷ್ಟ ವ್ಯಕ್ತಿಗಳ ವೈಯಕ್ತಿಕ ಮಾಹಿತಿಯನ್ನು ಪ್ರತಿನಿಧಿಸುವ ಮಾದರಿ ಡೇಟಾಸೆಟ್ ಅನ್ನು ನಾನು ಬಳಸಲಿದ್ದೇನೆ. . ಡೇಟಾಸೆಟ್ 4 ಕಾಲಮ್ಗಳನ್ನು ಹೊಂದಿದೆ. ಈ ಕಾಲಮ್ಗಳು ಮೊದಲ ಹೆಸರು, ಕೊನೆಯ ಹೆಸರು, ಪೂರ್ಣ ಹೆಸರು, ಮತ್ತು ಇಮೇಲ್ .
ಅಭ್ಯಾಸ ಮಾಡಲು ವರ್ಕ್ಬುಕ್ ಡೌನ್ಲೋಡ್ ಮಾಡಿ
VBA ನಕಲು ಶ್ರೇಣಿಯನ್ನು ಮತ್ತೊಂದು ಶೀಟ್ಗೆ ನಕಲಿಸಿ ಫಾರ್ಮ್ಯಾಟ್ನೊಂದಿಗೆ ಮತ್ತೊಂದು ಶೀಟ್ಗೆನೀವು ನಕಲಿಸಲು ಒಂದು ಶೀಟ್ನಿಂದ ಮತ್ತೊಂದು ಶೀಟ್ಗೆ ಫಾರ್ಮ್ಯಾಟ್ ನೊಂದಿಗೆ ಶ್ರೇಣಿಯನ್ನು ಬಳಸಿಕೊಂಡು ನೀವು ಅದನ್ನು ಸರಳವಾಗಿ ಮಾಡಬಹುದು 2>VBA .
ಇಲ್ಲಿ, ನಾನು ಡೇಟಾಸೆಟ್ ಶೀಟ್ನಿಂದ ವಿತ್ ಫಾರ್ಮ್ಯಾಟ್ ಶೀಟ್ಗೆ
ನಕಲು ಮಾಡುತ್ತೇನೆ.0>ವಿಧಾನವನ್ನು ಪ್ರಾರಂಭಿಸೋಣ,ಮೊದಲು, ಡೆವಲಪರ್ ಟ್ಯಾಬ್ >> ವಿಷುಯಲ್ ಬೇಸಿಕ್ ಆಯ್ಕೆಮಾಡಿ
ನೀವು VBA <ತೆರೆಯಲು ALT + F11 ಕೀಬೋರ್ಡ್ ಅನ್ನು ಸಹ ಬಳಸಬಹುದು. 3>ಎಡಿಟರ್.
ಮುಂದೆ, ಇದು ಅಪ್ಲಿಕೇಶನ್ಗಳಿಗಾಗಿ ಮೈಕ್ರೋಸಾಫ್ಟ್ ವಿಷುಯಲ್ ಬೇಸಿಕ್ ಹೆಸರಿನ ಹೊಸ ವಿಂಡೋವನ್ನು ತೆರೆಯುತ್ತದೆ.
ಅಲ್ಲಿಂದ, ಇನ್ಸರ್ಟ್ <3 ಅನ್ನು ತೆರೆಯಿರಿ>>> ಮಾಡ್ಯೂಲ್ ಅನ್ನು ಆಯ್ಕೆಮಾಡಿ.
A ಮಾಡ್ಯೂಲ್ ತೆರೆಯುತ್ತದೆ ನಂತರ ತೆರೆಯಲಾದ ಕೋಡ್ ಅನ್ನು ಟೈಪ್ ಮಾಡಿ >> ಮ್ಯಾಕ್ರೋಗಳನ್ನು ವೀಕ್ಷಿಸಿ
➤ ಡೈಲಾಗ್ ಬಾಕ್ಸ್ ಪಾಪ್ ಅಪ್ ಆಗುತ್ತದೆ.
ಆಯ್ಕೆಮಾಡಿ
ಈಗ, ಮ್ಯಾಕ್ರೋ ಹೆಸರಿನಿಂದ Copy_Range_BelowLastCell_AnotherSheets ಅನ್ನು ಆಯ್ಕೆ ಮಾಡಿ ಮ್ಯಾಕ್ರೋಸ್ ಇನ್ ಒಳಗೆ ವರ್ಕ್ಬುಕ್ ಅನ್ನು ಆಯ್ಕೆ ಮಾಡಿ.
ಅಂತಿಮವಾಗಿ, ರನ್ ಮಾಡಿ ಆಯ್ಕೆಮಾಡಿದ ಮ್ಯಾಕ್ರೋ .
ಆದ್ದರಿಂದ, ಇದು ನಕಲು ಮಾಡುತ್ತದೆ ಆಯ್ಕೆಮಾಡಿದ ಶ್ರೇಣಿ ಮತ್ತು ಅದನ್ನು ಮತ್ತೊಂದು ಹಾಳೆಯ ಕೊನೆಯ ಸಾಲಿನಿಂದ ಅಂಟಿಸಿ .
8. VBA ಮತ್ತೊಂದು ವರ್ಕ್ಬುಕ್ನ ಕೊನೆಯ ಸಾಲಿಗೆ ಶ್ರೇಣಿಯನ್ನು ನಕಲಿಸಿ
ನೀವು ನಕಲು ಮಾಡಲು ಇನ್ನೊಂದು ವರ್ಕ್ಬುಕ್ ಶೀಟ್ನ ಕೊನೆಯ ಸಾಲಿನವರೆಗಿನ ಶ್ರೇಣಿಯನ್ನು ನೀವು VBA ಅನ್ನು ಸಹ ಬಳಸಬಹುದು.
ಇಲ್ಲಿ, ನಾನು Dataset2 ನಿಂದ ಶ್ರೇಣಿಯನ್ನು ನಕಲಿಸುತ್ತೇನೆ ಶೀಟ್ನಿಂದ ಶೀಟ್1 ನ ಪುಸ್ತಕ2 ಆದರೆ ಮೊದಲ ಖಾಲಿ ಅಲ್ಲದ ಸೆಲ್ನಿಂದ.
ಕಾರ್ಯಕ್ರಮವನ್ನು ಪ್ರಾರಂಭಿಸಲು,
ಮೊದಲು, ಡೆವಲಪರ್ ಟ್ಯಾಬ್ >> ವಿಷುಯಲ್ ಬೇಸಿಕ್ ಆಯ್ಕೆಮಾಡಿ
ನೀವು VBA ಎಡಿಟರ್ ತೆರೆಯಲು ALT + F11 ಕೀಬೋರ್ಡ್ ಅನ್ನು ಸಹ ಬಳಸಬಹುದು.
ಮುಂದೆ, ಇದು ಅಪ್ಲಿಕೇಶನ್ಗಳಿಗಾಗಿ ಮೈಕ್ರೋಸಾಫ್ಟ್ ವಿಷುಯಲ್ ಬೇಸಿಕ್ನ ಹೊಸ ವಿಂಡೋವನ್ನು ತೆರೆಯುತ್ತದೆ.
ಅಲ್ಲಿಂದ, ಸೇರಿಸಿ <3 ಅನ್ನು ತೆರೆಯಿರಿ>>> ಮಾಡ್ಯೂಲ್ ಅನ್ನು ಆಯ್ಕೆ ಮಾಡಿ.
A ಮಾಡ್ಯೂಲ್ ತೆರೆಯುತ್ತದೆ ನಂತರ ತೆರೆದ ಮಾಡ್ಯೂಲ್ ನಲ್ಲಿ ಈ ಕೆಳಗಿನ ಕೋಡ್ ಅನ್ನು ಟೈಪ್ ಮಾಡಿ.
4627
ಇಲ್ಲಿ, ನಾನು ಉಪ ಕಾರ್ಯವಿಧಾನವನ್ನು Copy_Range_BelowLastCell_To_Another_Workbook ಅಲ್ಲಿ wsCopy ಮತ್ತು ws Destination ವರ್ಕ್ಶೀಟ್ ಪ್ರಕಾರ, lCopyLastRow ಮತ್ತು lDestLastRow ಉದ್ದ ಪ್ರಕಾರ.
ಮೊದಲಿಗೆ, ಶೀಟ್ ನಕಲಿಸಲು ಮತ್ತು ಗಮ್ಯಸ್ಥಾನದ ಹಾಳೆಗಾಗಿ ವೇರಿಯೇಬಲ್ಗಳನ್ನು ಹೊಂದಿಸಲು ಸೆಟ್ ಅನ್ನು ಬಳಸಲಾಗುತ್ತದೆ.
ಮುಂದೆ, ನಕಲು ಶ್ರೇಣಿಯಲ್ಲಿ A ಕಾಲಮ್ನ ಡೇಟಾವನ್ನು ಆಧರಿಸಿ ಕೊನೆಯ ಸಾಲನ್ನು ಕಂಡುಹಿಡಿಯಲು ಸಾಲು ವಿಧಾನವನ್ನು ಬಳಸಲಾಗಿದೆ.
ಮತ್ತೆ, ಸಾಲು ವಿಧಾನವನ್ನು ಬಳಸಲಾಗಿದೆ ಗಮ್ಯಸ್ಥಾನ ಶ್ರೇಣಿಯಲ್ಲಿ A ಕಾಲಮ್ನ ಡೇಟಾವನ್ನು ಆಧರಿಸಿ ಮೊದಲ ಖಾಲಿ ಸಾಲನ್ನು ಹುಡುಕಲು ಆಫ್ಸೆಟ್ ಒಂದು ಆಸ್ತಿಯನ್ನು ಕೆಳಕ್ಕೆ ಸರಿಸಲು ಸಹ ಬಳಸಲಾಗಿದೆ.
ಅಂತಿಮವಾಗಿ, ನಕಲು ಮಾಡಲಾಗಿದೆ Dataset2 ಶೀಟ್ನಿಂದ Excel VBA ನಕಲು ಶ್ರೇಣಿಯಿಂದ ಮತ್ತೊಂದು Sheet.xlsm ವರ್ಕ್ಬುಕ್ ಗಮ್ಯಸ್ಥಾನಕ್ಕೆ Sheet1 ವರ್ಕ್ಬುಕ್ Book2.xlsx .
ಈಗ, ಕೋಡ್ ಅನ್ನು ಉಳಿಸಿ ಮತ್ತು ವರ್ಕ್ಶೀಟ್ಗೆ ಹಿಂತಿರುಗಿ.
ಮುಂದೆ, ವೀಕ್ಷಿಸಿ ಟ್ಯಾಬ್ >> ಮ್ಯಾಕ್ರೋಗಳಿಂದ >> ಮ್ಯಾಕ್ರೋಗಳನ್ನು ವೀಕ್ಷಿಸಿ
➤ ಡೈಲಾಗ್ ಬಾಕ್ಸ್ ಪಾಪ್ ಅಪ್ ಆಗುತ್ತದೆ.
ಆಯ್ಕೆಮಾಡಿ
ಈಗ, ಮ್ಯಾಕ್ರೋ ಹೆಸರಿನಿಂದ Copy_Range_BelowLastCell_To_Another_Workbook ಅನ್ನು ಆಯ್ಕೆ ಮಾಡಿ ಮ್ಯಾಕ್ರೋಸ್ ಇನ್ ಒಳಗೆ ವರ್ಕ್ಬುಕ್ ಅನ್ನು ಆಯ್ಕೆ ಮಾಡಿ.
ಅಂತಿಮವಾಗಿ, ರನ್ ಮಾಡಿ ಆಯ್ಕೆಮಾಡಿದ ಮ್ಯಾಕ್ರೋ .
ಆದ್ದರಿಂದ, ಇದು ನಕಲು ಮಾಡುತ್ತದೆ ಇನ್ನೊಂದು ವರ್ಕ್ಬುಕ್ನ ಕೊನೆಯ ಸಾಲಿಗೆ ಅಸ್ತಿತ್ವದಲ್ಲಿರುವ ಶೀಟ್ನಿಂದ ಆಯ್ಕೆಮಾಡಿದ ಶ್ರೇಣಿ.
ಅಭ್ಯಾಸ ವಿಭಾಗ
ಎಕ್ಸೆಲ್ VBA ನಕಲು ಶ್ರೇಣಿಯ ಈ ವಿವರಿಸಿದ ವಿಧಾನಗಳನ್ನು ಅಭ್ಯಾಸ ಮಾಡಲು ನಾನು ವರ್ಕ್ಬುಕ್ನಲ್ಲಿ ಅಭ್ಯಾಸ ಹಾಳೆಯನ್ನು ಒದಗಿಸಿದ್ದೇನೆ ಇನ್ನೊಂದು ಹಾಳೆಗೆಎಕ್ಸೆಲ್ VBA ಶ್ರೇಣಿಯನ್ನು ಮತ್ತೊಂದು ಹಾಳೆಗೆ ನಕಲಿಸಿ. ಒಂದು ಹಾಳೆಯಿಂದ ಇನ್ನೊಂದಕ್ಕೆ ಮತ್ತು ಒಂದು ಹಾಳೆಯಿಂದ ಇನ್ನೊಂದು ವರ್ಕ್ಬುಕ್ಗೆ ಶ್ರೇಣಿಯನ್ನು ನಕಲಿಸಲು ಈ ವಿಭಿನ್ನ ಮಾರ್ಗಗಳು ನಿಮಗೆ ಸಹಾಯ ಮಾಡುತ್ತವೆ. ಕೊನೆಯದಾಗಿ ಆದರೆ ಕನಿಷ್ಠವಲ್ಲ, ನೀವು ಯಾವುದೇ ರೀತಿಯ ಸಲಹೆಗಳು, ಆಲೋಚನೆಗಳು ಮತ್ತು ಪ್ರತಿಕ್ರಿಯೆಯನ್ನು ಹೊಂದಿದ್ದರೆ ದಯವಿಟ್ಟು ಕೆಳಗೆ ಕಾಮೆಂಟ್ ಮಾಡಲು ಮುಕ್ತವಾಗಿರಿ.
ಮಾಡ್ಯೂಲ್.2296
ಇಲ್ಲಿ, ನಾನು ಉಪ ವಿಧಾನ Copy_Range_withFormat_ToAnother_Sheet
ಅಸ್ತಿತ್ವದಲ್ಲಿರುವ ಹಾಳೆಯಿಂದ ಫಾರ್ಮ್ಯಾಟ್ನೊಂದಿಗೆ ಶೀಟ್ ಹೆಸರಿಗೆ ನಕಲಿಸಲು ನಾನು B1:E10 ಶ್ರೇಣಿಯನ್ನು ತೆಗೆದುಕೊಂಡಿದ್ದೇನೆ.
ಇಲ್ಲಿ, ನಾನು ನಕಲನ್ನು ಬಳಸಿದ್ದೇನೆ ಆಯ್ಕೆಮಾಡಿದ ಶ್ರೇಣಿಯನ್ನು ನಕಲಿಸುವ ವಿಧಾನ, ನಕಲು ವಿಧಾನವು ಯಾವುದೇ ಶ್ರೇಣಿಯನ್ನು ಫಾರ್ಮ್ಯಾಟ್ ನೊಂದಿಗೆ ನಕಲಿಸುತ್ತದೆ.
ಅಂತಿಮವಾಗಿ, ಕೋಡ್ ಅನ್ನು ಉಳಿಸಿ ಮತ್ತು ವರ್ಕ್ಶೀಟ್ಗೆ ಹಿಂತಿರುಗಿ .
ಮುಂದೆ, ವೀಕ್ಷಿಸಿ ಟ್ಯಾಬ್ >> ಮ್ಯಾಕ್ರೋಗಳಿಂದ >> ಮ್ಯಾಕ್ರೋಗಳನ್ನು ವೀಕ್ಷಿಸಿ
➤ ಡೈಲಾಗ್ ಬಾಕ್ಸ್ ಪಾಪ್ ಅಪ್ ಆಗುತ್ತದೆ.
ಆಯ್ಕೆಮಾಡಿ
ಈಗ, ಮ್ಯಾಕ್ರೋ ಹೆಸರಿನಿಂದ Copy_Range_withFormat_ToAnother_Sheet ಅನ್ನು ಆಯ್ಕೆ ಮಾಡಿ ಮ್ಯಾಕ್ರೋಸ್ ಇನ್ ಒಳಗೆ ವರ್ಕ್ಬುಕ್ ಅನ್ನು ಸಹ ಆಯ್ಕೆಮಾಡಿ.
ಅಂತಿಮವಾಗಿ, ರನ್ ಮಾಡಿ ಆಯ್ಕೆಮಾಡಲಾದ ಮ್ಯಾಕ್ರೋ .
ಆದ್ದರಿಂದ, ಇದು ಆಯ್ಕೆಮಾಡಲಾದ ಶ್ರೇಣಿಯನ್ನು ಫಾರ್ಮ್ಯಾಟ್ ನೊಂದಿಗೆ ನಾನು ಆಯ್ಕೆ ಮಾಡಿದ ಹೊಸ ಶೀಟ್ಗೆ ನಕಲಿಸುತ್ತದೆ ( ಫಾರ್ಮ್ಯಾಟ್ನೊಂದಿಗೆ) .
2. ಫಾರ್ಮ್ಯಾಟ್ ಇಲ್ಲದೆಯೇ ಮತ್ತೊಂದು ಶೀಟ್ಗೆ VBA ಶ್ರೇಣಿಯನ್ನು ನಕಲಿಸಿ
ಇದು ಕೂಡ VBA ಅನ್ನು ಬಳಸಿಕೊಂಡು ಫಾರ್ಮ್ಯಾಟ್ ಇಲ್ಲದೆ ಮತ್ತೊಂದು ಶೀಟ್ಗೆ ಶ್ರೇಣಿಯನ್ನು ನಕಲಿಸಲು ಸಾಧ್ಯ.
ಇಲ್ಲಿ, ನಾನು ನಕಲು ಮಾಡುತ್ತೇನೆ ಡೇಟಾಸೆಟ್ ಶೀಟ್ನಿಂದ ಫಾರ್ಮ್ಯಾಟ್ ಇಲ್ಲದೆ ಶೀಟ್.
ಪ್ರಕ್ರಿಯೆಯನ್ನು ಪ್ರಾರಂಭಿಸೋಣ,
ಈಗ, ಡೆವಲಪರ್ ಅನ್ನು ತೆರೆಯಿರಿ ಟ್ಯಾಬ್ >> ವಿಷುಯಲ್ ಬೇಸಿಕ್ ಆಯ್ಕೆಮಾಡಿ ( ALT + F11 ಬಳಸಿ)
ಮುಂದೆ, ಅದು ತೆರೆಯುತ್ತದೆ ಅಪ್ಲಿಕೇಶನ್ಗಳಿಗಾಗಿ ಮೈಕ್ರೋಸಾಫ್ಟ್ ವಿಷುಯಲ್ ಬೇಸಿಕ್.
ನಂತರ, ಸೇರಿಸು ತೆರೆಯಿರಿ >> ಮಾಡ್ಯೂಲ್ ಅನ್ನು ಆಯ್ಕೆ ಮಾಡಿ.
A ಮಾಡ್ಯೂಲ್ ತೆರೆಯುತ್ತದೆ ನಂತರ ತೆರೆದ ಮಾಡ್ಯೂಲ್ ನಲ್ಲಿ ಈ ಕೆಳಗಿನ ಕೋಡ್ ಅನ್ನು ಟೈಪ್ ಮಾಡಿ.
3976
ಇಲ್ಲಿ, ನಾನು ಉಪ ಕಾರ್ಯವಿಧಾನವನ್ನು ಘೋಷಿಸಿದ್ದೇನೆ Copy_Range_WithoutFormat_Toanother_Sheet
ನಾನು ಶ್ರೇಣಿಯನ್ನು ತೆಗೆದುಕೊಂಡಿದ್ದೇನೆ B1:E10 ಅಸ್ತಿತ್ವದಲ್ಲಿರುವ ಶೀಟ್ನಿಂದ ಫಾರ್ಮ್ಯಾಟ್ ಇಲ್ಲದೆ ಶೀಟ್ ಹೆಸರಿಗೆ ನಕಲಿಸಲು.
ಇಲ್ಲಿ, ನಾನು ಆಯ್ಕೆಮಾಡಿದ ಶ್ರೇಣಿಯನ್ನು ನಕಲಿಸಲು ನಕಲು ವಿಧಾನವನ್ನು ಬಳಸಿದ್ದೇನೆ ಆದರೆ ಅಂಟಿಸಿ:=xlPasteValues ಪೇಸ್ಟ್ ಸ್ಪೆಷಲ್ ವಿಧಾನದಲ್ಲಿ ಉಲ್ಲೇಖಿಸಲಾಗಿದೆ ಇದರಿಂದ ಅದು ಆಯ್ದ ಶ್ರೇಣಿಯ ಮೌಲ್ಯಗಳನ್ನು ಮಾತ್ರ ಅಂಟಿಸಲಿದೆ, ಸ್ವರೂಪವಲ್ಲ.
ಅಂತಿಮವಾಗಿ , ಕೋಡ್ ಅನ್ನು ಉಳಿಸಿ ಮತ್ತು ವರ್ಕ್ಶೀಟ್ಗೆ ಹಿಂತಿರುಗಿ.
ಮುಂದೆ, ವೀಕ್ಷಿಸಿ ಟ್ಯಾಬ್ >> ಮ್ಯಾಕ್ರೋಗಳಿಂದ >> ಮ್ಯಾಕ್ರೋಗಳನ್ನು ವೀಕ್ಷಿಸಿ
➤ ಡೈಲಾಗ್ ಬಾಕ್ಸ್ ಪಾಪ್ ಅಪ್ ಆಗುತ್ತದೆ.
ಆಯ್ಕೆಮಾಡಿ
ಈಗ, ಮ್ಯಾಕ್ರೋ ಹೆಸರಿನಿಂದ Copy_Range_WithoutFormat_Toanother_Sheet ಅನ್ನು ಆಯ್ಕೆ ಮಾಡಿ ಮತ್ತು ಮ್ಯಾಕ್ರೋಸ್ನಲ್ಲಿ ಒಳಗೆ ವರ್ಕ್ಬುಕ್ ಅನ್ನು ಆಯ್ಕೆ ಮಾಡಿ.
ಅಂತಿಮವಾಗಿ, ಆಯ್ಕೆಮಾಡಿದ ಮ್ಯಾಕ್ರೋ ಅನ್ನು ರನ್ ಮಾಡಿ.
ಆದ್ದರಿಂದ, ಇದು ನಕಲು ಮಾಡುತ್ತದೆ ಆಯ್ಕೆಮಾಡಲಾದ ಶ್ರೇಣಿಯನ್ನು ಮೌಲ್ಯಗಳು ಇಲ್ಲ ಫಾರ್ಮ್ಯಾಟ್<3 ನೊಂದಿಗೆ ಮಾತ್ರ ನಕಲಿಸುತ್ತದೆ>.
3. ಫಾರ್ಮ್ಯಾಟ್ ಮತ್ತು ಕಾಲಮ್ ಅಗಲದೊಂದಿಗೆ ಮತ್ತೊಂದು ಶೀಟ್ಗೆ ಶ್ರೇಣಿಯನ್ನು ನಕಲಿಸಿ
ಕೆಲವೊಮ್ಮೆ ನೀವು ಬಯಸಬಹುದು ಯಾವುದೇ ಆಯ್ಕೆಮಾಡಿದ ಶ್ರೇಣಿಯನ್ನು ನಕಲು ಮಾಡಿ, ಅದಕ್ಕಾಗಿ ನೀವು ಒಂದು ಶ್ರೇಣಿಯನ್ನು ಫಾರ್ಮ್ಯಾಟ್ ಮತ್ತು ಕಾಲಮ್ ಅಗಲ ಜೊತೆಗೆ ನಕಲಿಸಬಹುದು.
ಇಲ್ಲಿ, ನಾನು ಡೇಟಾಸೆಟ್ ಶೀಟ್ನಿಂದ ಫಾರ್ಮ್ಯಾಟ್ &ಗೆ ಶ್ರೇಣಿಯನ್ನು ನಕಲಿಸುತ್ತೇನೆ. ಕಾಲಮ್ ಅಗಲ ಶೀಟ್.
VBA ಬಳಸಿಕೊಂಡು ಕಾರ್ಯವನ್ನು ಮಾಡುವ ವಿಧಾನವನ್ನು ನೋಡಲು,
ಮೊದಲು, ಡೆವಲಪರ್ ಟ್ಯಾಬ್ >> ವಿಷುಯಲ್ ಬೇಸಿಕ್ ಆಯ್ಕೆಮಾಡಿ
ನೀವು VBA ಎಡಿಟರ್ ತೆರೆಯಲು ALT + F11 ಕೀಬೋರ್ಡ್ ಅನ್ನು ಸಹ ಬಳಸಬಹುದು.
ಮುಂದೆ, ಇದು ಅಪ್ಲಿಕೇಶನ್ಗಳಿಗಾಗಿ ಮೈಕ್ರೋಸಾಫ್ಟ್ ವಿಷುಯಲ್ ಬೇಸಿಕ್ನ ಹೊಸ ವಿಂಡೋವನ್ನು ತೆರೆಯುತ್ತದೆ.
ಅಲ್ಲಿ, ಸೇರಿಸಿ ತೆರೆಯಿರಿ >> ಮಾಡ್ಯೂಲ್ ಅನ್ನು ಆಯ್ಕೆ ಮಾಡಿ.
A ಮಾಡ್ಯೂಲ್ ತೆರೆಯುತ್ತದೆ ನಂತರ ತೆರೆದ ಮಾಡ್ಯೂಲ್ ನಲ್ಲಿ ಈ ಕೆಳಗಿನ ಕೋಡ್ ಅನ್ನು ಟೈಪ್ ಮಾಡಿ.
7955
ಇಲ್ಲಿ, ನಾನು ಉಪ ಕಾರ್ಯವಿಧಾನವನ್ನು ಘೋಷಿಸಿದ್ದೇನೆ Copy_Range_to_Another_Sheet_with_FormatAndColumnWidth
ನಾನು ಶ್ರೇಣಿಯನ್ನು ತೆಗೆದುಕೊಂಡಿದ್ದೇನೆ B1:E10 ಅಸ್ತಿತ್ವದಲ್ಲಿರುವ ಹಾಳೆಯಿಂದ ಗಮ್ಯಸ್ಥಾನದ ಶೀಟ್ ಹೆಸರಿಗೆ ನಕಲಿಸಲು ಫಾರ್ಮ್ಯಾಟ್ & ಕಾಲಮ್ ಅಗಲ .
ಇಲ್ಲಿ, ಆಯ್ದ ಶ್ರೇಣಿಯನ್ನು ನಕಲಿಸಲು ನಾನು ನಕಲು ವಿಧಾನವನ್ನು ಬಳಸಿದ್ದೇನೆ. ನಾನು ಅಂಟಿಸಿ:=xlPasteColumnWidths ಎಂದು ನಾನು ಉಲ್ಲೇಖಿಸಿರುವ PasteSpecial ವಿಧಾನವನ್ನು ಸಹ ಬಳಸಿದ್ದೇನೆ ಆದ್ದರಿಂದ ಇದು ಫಾರ್ಮ್ಯಾಟ್ ಮತ್ತು ಕಾಲಮ್ ಅಗಲ ಜೊತೆಗೆ ಆಯ್ಕೆಮಾಡಿದ ಶ್ರೇಣಿಯನ್ನು ಅಂಟಿಸುತ್ತದೆ .
ಅಂತಿಮವಾಗಿ, ಕೋಡ್ ಅನ್ನು ಉಳಿಸಿ ಮತ್ತು ವರ್ಕ್ಶೀಟ್ಗೆ ಹಿಂತಿರುಗಿ.
ಮುಂದೆ, ವೀಕ್ಷಿಸಿ ಟ್ಯಾಬ್ >> ಮ್ಯಾಕ್ರೋಗಳಿಂದ >> ಮ್ಯಾಕ್ರೋಗಳನ್ನು ವೀಕ್ಷಿಸಿ
➤ ಡೈಲಾಗ್ ಬಾಕ್ಸ್ ಪಾಪ್ ಅಪ್ ಆಗುತ್ತದೆ.
ಆಯ್ಕೆಮಾಡಿ
ಈಗ, ಮ್ಯಾಕ್ರೋ ಹೆಸರಿನಿಂದ Copy_Range_to_Another_Sheet_with_FormatAndColumnWidth ಅನ್ನು ಆಯ್ಕೆ ಮಾಡಿ ಮತ್ತು ಮ್ಯಾಕ್ರೋಸ್ ಇನ್ ಒಳಗೆ ವರ್ಕ್ಬುಕ್ ಅನ್ನು ಆಯ್ಕೆ ಮಾಡಿ.
ಅಂತಿಮವಾಗಿ, ಆಯ್ಕೆ ರನ್ ಮಾಡಿ ಮ್ಯಾಕ್ರೋ .
ಪರಿಣಾಮವಾಗಿ, ಇದು ಆಯ್ಕೆಮಾಡಿದ ಶ್ರೇಣಿಯನ್ನು ಫಾರ್ಮ್ಯಾಟ್ ಮತ್ತು ಕಾಲಮ್ ಅಗಲ .<1 ನಕಲು ಮಾಡುತ್ತದೆ>
4. VBA ಒಂದು ಶ್ರೇಣಿಯನ್ನು ಮತ್ತೊಂದು ಶೀಟ್ಗೆ ಫಾರ್ಮುಲಾದೊಂದಿಗೆ ನಕಲಿಸಿ
ನಿಮ್ಮ ಡೇಟಾಸೆಟ್ನಲ್ಲಿ ನೀವು ಯಾವುದೇ ಸೂತ್ರವನ್ನು ಹೊಂದಿದ್ದರೆ ನೀವು ನಕಲಿಸಲು ಬಯಸುತ್ತೀರಿ. ಚಿಂತೆಯಿಲ್ಲ! ನೀವು ಫಾರ್ಮುಲಾ ಅನ್ನು ಹೊಂದಿರುವ ಶ್ರೇಣಿಯನ್ನು ಮತ್ತೊಂದು ಹಾಳೆಗೆ ನಕಲಿಸಬಹುದು. ಫಾರ್ಮುಲಾ ಶೀಟ್ಗೆ
ವಿಧಾನವನ್ನು ಪ್ರಾರಂಭಿಸೋಣ,
ಪ್ರಾರಂಭಿಸಲು, ಡೆವಲಪರ್ ಟ್ಯಾಬ್ >> ವಿಷುಯಲ್ ಬೇಸಿಕ್ ಆಯ್ಕೆಮಾಡಿ ( ನೀವು ALT + F11 ಕೀಬೋರ್ಡ್ ಅನ್ನು ಸಹ ಬಳಸಬಹುದು)
ಮುಂದೆ, ಇದು ಅಪ್ಲಿಕೇಶನ್ಗಳಿಗಾಗಿ ಮೈಕ್ರೋಸಾಫ್ಟ್ ವಿಷುಯಲ್ ಬೇಸಿಕ್ ತೆರೆಯುತ್ತದೆ.
ಅಲ್ಲಿಂದ, ತೆರೆಯಿರಿ ಇನ್ಸರ್ಟ್ >> ಮಾಡ್ಯೂಲ್ ಅನ್ನು ಆಯ್ಕೆ ಮಾಡಿ.
A ಮಾಡ್ಯೂಲ್ ತೆರೆಯುತ್ತದೆ ನಂತರ ತೆರೆದ ಮಾಡ್ಯೂಲ್ ನಲ್ಲಿ ಈ ಕೆಳಗಿನ ಕೋಡ್ ಅನ್ನು ಟೈಪ್ ಮಾಡಿ.
4171
ಇಲ್ಲಿ, ನಾನು ಉಪ ಕಾರ್ಯವಿಧಾನವನ್ನು ಘೋಷಿಸಿದ್ದೇನೆ Copy_Range_withFormula_ToAnother_Sheet
ನಾನು ಶ್ರೇಣಿಯನ್ನು ತೆಗೆದುಕೊಂಡಿದ್ದೇನೆ B1:E10 ಅಸ್ತಿತ್ವದಲ್ಲಿರುವ ಹಾಳೆಯಿಂದ ಗಮ್ಯಸ್ಥಾನದ ಶೀಟ್ ಹೆಸರಿಗೆ Formula ಗೆ ನಕಲಿಸಲು.
ಇಲ್ಲಿ, ನಾನು ಆಯ್ಕೆಮಾಡಿದ ಶ್ರೇಣಿಯನ್ನು ನಕಲಿಸಲು ನಕಲು ವಿಧಾನವನ್ನು ಬಳಸಿದ್ದೇನೆ. ನಾನು ಅಂಟಿಸಿ:=xlPasteFormulas ಅನ್ನು ಉಲ್ಲೇಖಿಸಿರುವ PasteSpecial ವಿಧಾನವನ್ನು ಸಹ ನಾನು ಬಳಸಿದ್ದೇನೆ ಆದ್ದರಿಂದ ಇದು ಆಯ್ಕೆಮಾಡಿದ ಶ್ರೇಣಿಯ ಜೊತೆಗೆ ಸೂತ್ರಗಳನ್ನು ಒಯ್ಯುತ್ತದೆ.
ಅಂತಿಮವಾಗಿ , ಕೋಡ್ ಅನ್ನು ಉಳಿಸಿ ಮತ್ತು ವರ್ಕ್ಶೀಟ್ಗೆ ಹಿಂತಿರುಗಿ.
ನಂತರ, ವೀಕ್ಷಣೆ ತೆರೆಯಿರಿ ಟ್ಯಾಬ್ >> ಮ್ಯಾಕ್ರೋಗಳಿಂದ >> ಮ್ಯಾಕ್ರೋಗಳನ್ನು ವೀಕ್ಷಿಸಿ
➤ ಡೈಲಾಗ್ ಬಾಕ್ಸ್ ಪಾಪ್ ಅಪ್ ಆಗುತ್ತದೆ.
ಆಯ್ಕೆಮಾಡಿ
ಈಗ, ಮ್ಯಾಕ್ರೋ ಹೆಸರಿನಿಂದ Copy_Range_withFormula_ToAnother_Sheet ಅನ್ನು ಆಯ್ಕೆ ಮಾಡಿ ಮ್ಯಾಕ್ರೋಸ್ ಇನ್ ಒಳಗೆ ವರ್ಕ್ಬುಕ್ ಅನ್ನು ಸಹ ಆಯ್ಕೆಮಾಡಿ.
ಅಂತಿಮವಾಗಿ, ರನ್ ಮಾಡಿ ಆಯ್ಕೆಮಾಡಲಾದ ಮ್ಯಾಕ್ರೋ .
ಆದ್ದರಿಂದ, ಇದು ಆಯ್ಕೆಮಾಡಲಾದ ಎಲ್ಲಾ ಆಯ್ಕೆಮಾಡಿದ ಸೆಲ್ ಶ್ರೇಣಿಗಳನ್ನು ಸೂತ್ರಗಳೊಂದಿಗೆ .
ನಕಲಿಸುತ್ತದೆ.
ಇದೇ ರೀತಿಯ ವಾಚನಗೋಷ್ಠಿಗಳು:
- VBA ಶ್ರೇಣಿಯ ಆಫ್ಸೆಟ್ ಅನ್ನು ಹೇಗೆ ಬಳಸುವುದು (11 ಮಾರ್ಗಗಳು)
- ಎಕ್ಸೆಲ್ನಲ್ಲಿನ ಪ್ರತಿ ಕೋಶಕ್ಕೆ VBA (3 ವಿಧಾನಗಳು)
- ಎಕ್ಸೆಲ್ನಲ್ಲಿ VBA ವ್ಯಾಪ್ತಿಯ ವಸ್ತುವನ್ನು ಹೇಗೆ ಬಳಸುವುದು (5 ಗುಣಲಕ್ಷಣಗಳು)
5. ಆಟೋಫಿಟ್ನೊಂದಿಗೆ ಶ್ರೇಣಿಯನ್ನು ಮತ್ತೊಂದು ಶೀಟ್ಗೆ ನಕಲಿಸಿ
ಒಂದು ಶ್ರೇಣಿಯನ್ನು ಮತ್ತೊಂದು ಹಾಳೆಗೆ ನಕಲಿಸುವಾಗ ನೀವು ಆಟೋಫಿಟ್ ವಿಧಾನವನ್ನು ಸಹ ಬಳಸಬಹುದು VBA ನಿಂದ AutoFit ಗೆ ಹೊಸ ಶೀಟ್ನಲ್ಲಿ ನಕಲು ಮಾಡಲಾದ ಶ್ರೇಣಿ.
ಇಲ್ಲಿ, ನಾನು ಡೇಟಾಸೆಟ್ನಿಂದ ಶ್ರೇಣಿಯನ್ನು ನಕಲಿಸುತ್ತೇನೆ ಶೀಟ್ನಿಂದ ಆಟೋಫಿಟ್ ಶೀಟ್
ಪ್ರಕ್ರಿಯೆಯನ್ನು ಪ್ರಾರಂಭಿಸೋಣ,
ಮೊದಲು, ಡೆವಲಪರ್ ಟ್ಯಾಬ್ >> ವಿಷುಯಲ್ ಬೇಸಿಕ್ ಆಯ್ಕೆಮಾಡಿ
ನೀವು VBA ಎಡಿಟರ್ ತೆರೆಯಲು ALT + F11 ಕೀಬೋರ್ಡ್ ಅನ್ನು ಸಹ ಬಳಸಬಹುದು.
ಮುಂದೆ, ಇದು ಅಪ್ಲಿಕೇಶನ್ಗಳಿಗಾಗಿ ಮೈಕ್ರೋಸಾಫ್ಟ್ ವಿಷುಯಲ್ ಬೇಸಿಕ್ನ ವಿಂಡೋವನ್ನು ತೆರೆಯುತ್ತದೆ.
ನಂತರ, ತೆರೆಯಿರಿ ಇನ್ಸರ್ಟ್ > ;> ಮಾಡ್ಯೂಲ್ ಅನ್ನು ಆಯ್ಕೆಮಾಡಿ.
A ಮಾಡ್ಯೂಲ್ ತೆರೆಯುತ್ತದೆ ನಂತರ ತೆರೆಯಲಾದ ಕೋಡ್ ಅನ್ನು ಟೈಪ್ ಮಾಡಿ ಮಾಡ್ಯೂಲ್ .
2914
ಇಲ್ಲಿ, ನಾನು ಉಪ ಕಾರ್ಯವಿಧಾನ Copy_Range_withFormat_AutoFit
ಮೊದಲಿಗೆ, ನಾನು ವರ್ಕ್ಶೀಟ್ ಡೇಟಾಸೆಟ್ ಅನ್ನು ಆಯ್ಕೆ ಮಾಡಿದೆ. ನಂತರ ಅಸ್ತಿತ್ವದಲ್ಲಿರುವ ಹಾಳೆಯಿಂದ AutoFit ಹೆಸರಿನ ಗಮ್ಯಸ್ಥಾನದ ಹಾಳೆಗೆ ನಕಲಿಸಲು B1:E10 ಶ್ರೇಣಿಯನ್ನು ತೆಗೆದುಕೊಳ್ಳಲಾಗಿದೆ.
ಇಲ್ಲಿ, ನಾನು ನಕಲನ್ನು ಬಳಸಿದ್ದೇನೆ ಆಯ್ಕೆಮಾಡಿದ ಶ್ರೇಣಿಯನ್ನು ನಕಲಿಸುವ ವಿಧಾನ ಮತ್ತು AutoFit ವಿಧಾನವು ಕೊಟ್ಟಿರುವ ಕಾಲಮ್ಗಳನ್ನು B:E ಸ್ವಯಂಚಾಲಿತವಾಗಿ ಹೊಂದಿಸುತ್ತದೆ.
ಅಂತಿಮವಾಗಿ, ಕೋಡ್ ಅನ್ನು ಉಳಿಸಿ ಮತ್ತು ಹೋಗಿ ವರ್ಕ್ಶೀಟ್ಗೆ ಹಿಂತಿರುಗಿ.
ಮುಂದೆ, ವೀಕ್ಷಿಸಿ ಟ್ಯಾಬ್ >> ಮ್ಯಾಕ್ರೋಗಳಿಂದ >> ಮ್ಯಾಕ್ರೋಗಳನ್ನು ವೀಕ್ಷಿಸಿ
➤ ಡೈಲಾಗ್ ಬಾಕ್ಸ್ ಪಾಪ್ ಅಪ್ ಆಗುತ್ತದೆ.
ಆಯ್ಕೆಮಾಡಿ
ಈಗ, ಮ್ಯಾಕ್ರೋ ಹೆಸರಿನಿಂದ Copy_Range_withFormat_AutoFit ಅನ್ನು ಆಯ್ಕೆ ಮಾಡಿ ಮ್ಯಾಕ್ರೋಸ್ ಇನ್ ಒಳಗೆ ವರ್ಕ್ಬುಕ್ ಅನ್ನು ಸಹ ಆಯ್ಕೆಮಾಡಿ.
ಅಂತಿಮವಾಗಿ, ರನ್ ಮಾಡಿ ಆಯ್ಕೆಮಾಡಿದ ಮ್ಯಾಕ್ರೋ .
ಆದ್ದರಿಂದ, ಇದು ಆಯ್ಕೆಮಾಡಿದ ಶ್ರೇಣಿಯನ್ನು ಹೊಸ ಶೀಟ್ಗೆ ಮತ್ತು ಆಟೋಫಿಟ್ ಕಾಲಮ್ಗಳನ್ನು ನಕಲಿಸುತ್ತದೆ.
6. VBA ಒಂದು ಶ್ರೇಣಿಯನ್ನು ಮತ್ತೊಂದು ವರ್ಕ್ಬುಕ್ಗೆ ನಕಲಿಸಿ
ನೀವು ಬಯಸಿದರೆ ನೀವು ಒಂದು ಶೀಟ್ನಿಂದ ಇನ್ನೊಂದು ಹಾಳೆಗೆ ಶ್ರೇಣಿಯನ್ನು ನಕಲು ಮಾಡಬಹುದು ಬೇರೆ ವರ್ಕ್ಬುಕ್ನ ಕಾರ್ಯಪುಸ್ತಕ.
ವಿಧಾನವನ್ನು ಪ್ರಾರಂಭಿಸೋಣ,
ಮೊದಲು, ಡೆವಲಪರ್ ಟ್ಯಾಬ್ >> ವಿಷುಯಲ್ ಬೇಸಿಕ್ ಆಯ್ಕೆಮಾಡಿ (y ನೀವು ALT + F11 ಕೀಬೋರ್ಡ್ ಅನ್ನು ಸಹ ಬಳಸಬಹುದು)
ನಂತರ, ಅದು Microsoft Visual ಅನ್ನು ತೆರೆಯುತ್ತದೆಅಪ್ಲಿಕೇಶನ್ಗಳಿಗೆ ಬೇಸಿಕ್.
ಮುಂದೆ, ಇನ್ಸರ್ಟ್ >> ಮಾಡ್ಯೂಲ್ ಅನ್ನು ಆಯ್ಕೆ ಮಾಡಿ.
A ಮಾಡ್ಯೂಲ್ ತೆರೆಯುತ್ತದೆ ನಂತರ ತೆರೆದ ಮಾಡ್ಯೂಲ್ ನಲ್ಲಿ ಈ ಕೆಳಗಿನ ಕೋಡ್ ಅನ್ನು ಟೈಪ್ ಮಾಡಿ.
7799
ಇಲ್ಲಿ, ನಾನು ಉಪ ಕಾರ್ಯವಿಧಾನವನ್ನು ಘೋಷಿಸಿದ್ದೇನೆ Copy_Range_WithFormat_Toanother_WorkBook
ನಾನು ಶ್ರೇಣಿಯನ್ನು ತೆಗೆದುಕೊಂಡಿದ್ದೇನೆ B3:E10 ಶೀಟ್ ಹೆಸರಿನಿಂದ ಡೇಟಾಸೆಟ್ ಅಸ್ತಿತ್ವದಲ್ಲಿರುವ ಶೀಟ್ನಿಂದ ಹೊಸ ವರ್ಕ್ಬುಕ್ ಹೆಸರು ಪುಸ್ತಕ1 ಮತ್ತು ಶೀಟ್ ಹೆಸರು ಶೀಟ್1 ಗೆ ನಕಲಿಸಲು.
0>ಇಲ್ಲಿ, ಆಯ್ದ ಶ್ರೇಣಿಯನ್ನು ಹೊಸ ವರ್ಕ್ಬುಕ್ಗೆ ನಕಲಿಸಲು ನಾನು ನಕಲು ವಿಧಾನವನ್ನು ಬಳಸಿದ್ದೇನೆ.ಅಂತಿಮವಾಗಿ, ಕೋಡ್ ಅನ್ನು ಉಳಿಸಿ ಮತ್ತು ವರ್ಕ್ಶೀಟ್ಗೆ ಹಿಂತಿರುಗಿ.
ಮುಂದೆ, ವೀಕ್ಷಿಸಿ ಟ್ಯಾಬ್ >> ಮ್ಯಾಕ್ರೋಗಳಿಂದ >> ಮ್ಯಾಕ್ರೋಗಳನ್ನು ವೀಕ್ಷಿಸಿ
➤ ಡೈಲಾಗ್ ಬಾಕ್ಸ್ ಪಾಪ್ ಅಪ್ ಆಗುತ್ತದೆ.
ಆಯ್ಕೆಮಾಡಿ
ಈಗ, ಮ್ಯಾಕ್ರೋ ಹೆಸರಿನಿಂದ Copy_Range_WithFormat_Toanother_WorkBook ಅನ್ನು ಆಯ್ಕೆ ಮಾಡಿ ಮ್ಯಾಕ್ರೋಸ್ ಇನ್ ಒಳಗೆ ವರ್ಕ್ಬುಕ್ ಅನ್ನು ಆಯ್ಕೆ ಮಾಡಿ.
ಅಂತಿಮವಾಗಿ, ರನ್ ಮಾಡಿ ಆಯ್ಕೆಮಾಡಲಾದ ಮ್ಯಾಕ್ರೋ .
ಈಗ, ಡೇಟಾಸೆಟ್ ಶೀಟ್ನಿಂದ ಮತ್ತೊಂದು ವರ್ಕ್ಬುಕ್ಗೆ ಆಯ್ಕೆಮಾಡಲಾದ ಶ್ರೇಣಿಯನ್ನು ನಕಲು ಮಾಡುತ್ತದೆ.
7. ಮತ್ತೊಂದು ಶೀಟ್ನ ಕೊನೆಯ ಸಾಲಿಗೆ ಶ್ರೇಣಿಯನ್ನು ನಕಲಿಸಿ
ಯಾವುದೇ ಸಂದರ್ಭದಲ್ಲಿ, ನೀವು ಶ್ರೇಣಿಯನ್ನು ಇನ್ನೊಂದು ಹಾಳೆಗೆ ನಕಲಿಸಲು ಬಯಸಿದರೆ ನಿರ್ದಿಷ್ಟ ಕೋಶದಿಂದ ಅಥವಾ ಕೊನೆಯ ಸೆಲ್ನಿಂದ ನೀವು VBA ಬಳಸಿಕೊಂಡು ಇದನ್ನು ಮಾಡಬಹುದು.
ಕಾರ್ಯವಿಧಾನಕ್ಕೆ ಪ್ರವೇಶಿಸುವ ಮೊದಲು, ನಾನು ನಿಮಗೆ ಹೇಳಲು ಬಯಸುತ್ತೇನೆ, ನಾನು <ಒಳಗೊಂಡಿರುವ ಎರಡು ಹೊಸ ಹಾಳೆಗಳನ್ನು ತೆಗೆದುಕೊಂಡಿದ್ದೇನೆ 2> ಪೂರ್ಣ ಹೆಸರು, ಇಮೇಲ್, ಮತ್ತು ವಿಳಾಸ .
ಮೊದಲು ಡೇಟಾಸೆಟ್2 ಶೀಟ್ ಅನ್ನು ಗಮನಿಸೋಣ.
ಕೆಳಗಿನ ಕೊನೆಯ ಸೆಲ್ ಶೀಟ್ ಇಲ್ಲಿದೆ.
ಇಲ್ಲಿ, ನಾನು ಶ್ರೇಣಿಯನ್ನು <ನಕಲು ಮಾಡುತ್ತೇನೆ 2>ಡೇಟಾಸೆಟ್2 ಶೀಟ್ನಿಂದ ಕೊನೆಯ ಸೆಲ್ನ ಕೆಳಗೆ ಆದರೆ ಮೊದಲ ಖಾಲಿ ಅಲ್ಲದ ಸೆಲ್ನಿಂದ.
ಪ್ರಾರಂಭಿಸಲು, ಡೆವಲಪರ್ ಟ್ಯಾಬ್ >> ವಿಷುಯಲ್ ಬೇಸಿಕ್ ಆಯ್ಕೆಮಾಡಿ
ಮುಂದೆ, ಅದು ಅಪ್ಲಿಕೇಶನ್ಗಳಿಗಾಗಿ ಮೈಕ್ರೋಸಾಫ್ಟ್ ವಿಷುಯಲ್ ಬೇಸಿಕ್ ಅನ್ನು ತೆರೆಯುತ್ತದೆ.
ನಂತರ, ತೆರೆಯಿರಿ. ಸೇರಿಸಿ >> ಮಾಡ್ಯೂಲ್ ಅನ್ನು ಆಯ್ಕೆ ಮಾಡಿ.
A ಮಾಡ್ಯೂಲ್ ತೆರೆಯುತ್ತದೆ ನಂತರ ತೆರೆದ ಮಾಡ್ಯೂಲ್ ನಲ್ಲಿ ಈ ಕೆಳಗಿನ ಕೋಡ್ ಅನ್ನು ಟೈಪ್ ಮಾಡಿ.
9676
ಇಲ್ಲಿ, ನಾನು ಉಪ ಕಾರ್ಯವಿಧಾನವನ್ನು ಘೋಷಿಸಿದ್ದೇನೆ Copy_Range_BelowLastCell_AnotherSheets
ಮೊದಲು, ನಾನು ಶೀಟ್ ಅನ್ನು ಆಯ್ಕೆ ಮಾಡಿದ್ದೇನೆ ಡೇಟಾಸೆಟ್2 ಮತ್ತು ನಂತರ ಕೊನೆಯ ಸಾಲು ಅನ್ನು ಎಣಿಸಲು ಸಾಲು ವಿಧಾನವನ್ನು ಬಳಸಿದೆ ಮತ್ತು ಎಣಿಸಿದ ಸಾಲನ್ನು lr ನಲ್ಲಿ ಇರಿಸಿದೆ.
ನಂತರ ತೆಗೆದುಕೊಳ್ಳಲಾಗಿದೆ ಶ್ರೇಣಿ A2:C & lr ಅಸ್ತಿತ್ವದಲ್ಲಿರುವ ಶೀಟ್ನಿಂದ ಗಮ್ಯಸ್ಥಾನದ ಶೀಟ್ ಹೆಸರಿಗೆ ನಕಲಿಸಲು ಕೊನೆಯ ಸೆಲ್ನ ಕೆಳಗೆ .
ಮತ್ತೆ, ಕೊನೆಯದನ್ನು ಎಣಿಸಲು ಸಾಲು ವಿಧಾನವನ್ನು ಬಳಸಲಾಗಿದೆ ಕೊನೆಯ ಸೆಲ್ನ ಕೆಳಗೆ ಹೆಸರಿನ ಮತ್ತೊಂದು ಹಾಳೆಯ ಸಾಲು ಮತ್ತು ಎಣಿಸಿದ ಸಾಲನ್ನು lrAnotherSheet ನಲ್ಲಿ ಇರಿಸಿದೆ.
ಇಲ್ಲಿ, ನಾನು ನಕಲು ವಿಧಾನವನ್ನು ಬಳಸಿದ್ದೇನೆ ಆಯ್ಕೆಮಾಡಿದ ಶ್ರೇಣಿಯನ್ನು ನಕಲಿಸಲು ಮತ್ತು AutoFit ವಿಧಾನವು ಕೊಟ್ಟಿರುವ ಕಾಲಮ್ಗಳನ್ನು A:C ಸ್ವಯಂಚಾಲಿತವಾಗಿ ಹೊಂದಿಸುತ್ತದೆ.
ಅಂತಿಮವಾಗಿ, ಕೋಡ್ ಅನ್ನು ಉಳಿಸಿ ಮತ್ತು ಹಿಂತಿರುಗಿ ವರ್ಕ್ಶೀಟ್ಗೆ.
ಮುಂದೆ, ವೀಕ್ಷಿಸಿ ಟ್ಯಾಬ್ >> ಮ್ಯಾಕ್ರೋಗಳಿಂದ