අන්තර්ගත වගුව
ඔබ කිසියම් පෙළක් හෝ පින්තූරයක් කපා හෝ පිටපත් කරන්නේ නම්, එය මුලින්ම පසුරු පුවරුවේ සුරකිනු ඇත. ඊට පසු, ඔබට Word ගොනු සහ Excel ගොනු වැනි ඕනෑම තැනක පෙළ හෝ රූපය ඇලවිය හැකිය. Excel හි, ඔබට ක්ලිප්බෝඩ් එකෙන් විවිධ ආකාරවලින් ඇලවිය හැක. Microsoft Visual Basic Applications (VBA) භාවිතයෙන් ඔබට ඔබේ Excel ගොනුවේ ඇති පසුරු පුවරුවෙන් සමහර කේත සමඟ ඇලවීමට ඉඩ සලසයි. මෙම ලිපියෙන්, මම ඔබට ක්ලිප්බෝඩ් එකේ සිට Excel වෙත ඇලවීමට VBA භාවිතා කරන ක්රම 3ක් පෙන්වන්නම්.
ඔබ පෙළ ගොනුවකින් පෙළ කිහිපයක් පිටපත් කර ඇත යැයි සිතන්න. සහ ඒවා පසුරු පුවරුවේ සුරැකී ඇත. දැන්, ඔබට එය VBA භාවිතයෙන් ඔබේ Excel ගොනුවට ඇලවීමට අවශ්යයි.
පුහුණු වැඩපොත බාගන්න
ක්ලිප්බෝඩ් සිට Excel.xlsm වෙත අලවන්න
3 ක්ලිප්බෝඩ් සිට එක්සෙල් වෙත VBA භාවිතා කරමින් ඇලවීම
1. VBA
අයදුම් කිරීමට පෙර Clipboard වෙතින් තනි කොටුවක අලවන්න මෙම ක්රමය ඔබට VBA ව්යාපෘතිය සඳහා Microsoft Forms 2.0 Object Library සක්රිය කළ යුතුය. එය කිරීමට,
➤ ALT+F11 ඔබන්න VBA
➤ Tools > යොමු VBA කවුළුවෙහි.
එය යොමුව- VBAProject කවුළුව විවෘත කරනු ඇත.
➤ Microsoft Forms 2.0 Object Library පරීක්ෂා කර OK මත ක්ලික් කරන්න.
එය Microsoft Forms 2.0 සක්රිය කරයි. වස්තු පුස්තකාලය . දැන්,
➤ Insert tab එක මත ක්ලික් කර Module තෝරන්න.
එය එසේ වනු ඇත. මොඩියුලය(කේතය) කවුළුව විවෘත කරන්න.
➤ පහත කේතය මොඩියුල(කේතය) කවුළුව,
4910
කේතය සාදනු ඇත a Macro එය පසුරු පුවරුවේ ඇති පෙළ B4 කොටුවේ අලවයි.
කේතය ඇතුළු කිරීමෙන් පසු,
➤ Run නිරූපකය මත ක්ලික් කරන්න නැතහොත් F5 ඔබන්න.
දැන්,
➤ වසන්න හෝ VBA කවුළුව අවම කරන්න.
ඔබට පසුරු පුවරුවේ ඇති පෙළ B4 කොටුවේ අලවා ඇති බව ඔබට පෙනෙනු ඇත.
තවත් කියවන්න: සූත්ර නොමැතිව Excel හි පිටපත් කර අලවන්නේ කෙසේද (පහසු උපක්රම 7)
සමාන කියවීම්
17>2. SendKeys මගින් Clipboard වෙතින් අලවන්න
මෙම ක්රමය දත්ත ඇලවීමට භාවිතා කරන කෙටිමං යතුර CTRL+V මත පදනම්ව. VBA කේතයක් සමඟින්, ඔබට පසුරු පුවරුවෙන් දත්ත ඇලවීමට මෙම විධානය භාවිතා කළ හැක. පළමුව,
➤ VBA කවුළුවෙහි ව්යාපෘති පැනලයේ පත්රයේ නම මත දකුණු-ක්ලික් කරන්න.
පතන මෙනුවක් දිස්වනු ඇත.
➤ Expand Insert clicking and පසුව Module තෝරන්න.
එය Module එක විවෘත කරයි (කේතය) කවුළුව.
➤ මොඩියුලය(කේතය) කවුළුව,
7531
කේතය මැක්රෝ නම් කරන ලද කේතයක් සාදනු ඇත Paste_from_Clipboard_2 එය CTRL+V කොටුව B4 තේරීමෙන් පසු විධානය ලබා දී පසුරු පුවරුවේ දත්ත මෙම කොටුවේ අලවන්න.
දැන්,
➤ VBA කවුළුව වසන්න හෝ අවම කරන්න.
➤ ALT+F8
<ඔබන්න 0>එය මැක්රෝ කවුළුව විවෘත කරනු ඇත.➤ මැක්රෝ නාමය කොටුවෙහි පේස්ට්_ෆ්රොම්_ක්ලිප්බෝඩ්_2 තෝරා ධාවනය<2 මත ක්ලික් කරන්න>.
ප්රතිඵලයක් වශයෙන්, පසුරු පුවරුවේ ඇති පාඨ B4 කොටුවේ අලවා ඇති බව ඔබට පෙනෙනු ඇත.
තවත් කියවන්න: Excel VBA ගමනාන්තයට අගයන් පමණක් පිටපත් කිරීමට (මැක්රෝ, යූඩීඑෆ්, සහ යූසර් ෆෝම්)
3. පසුරු පුවරුවෙන් අලවන්න පරාසයක්
මෙම ක්රමයේදී, ඔබට පත්රයක සිට පසුරු පුවරුවට දත්ත පරාසයක් පිටපත් කර එම දත්ත පසුරු පුවරුවෙන් වෙනත් පත්රයක ඇලවිය හැකි ආකාරය මම ඔබට පෙන්වන්නම්.<3
ඔබට Da නම් පත්රයක පහත දත්ත කට්ටලය තිබේ යැයි සිතමු ta .
දැන්,
➤ VBA කවුළුව විවෘත කිරීමට ALT+11 ඔබන්න .
➤ VBA කවුළුවෙහි ව්යාපෘති පැනලයේ පත්රයේ නම මත දකුණු-ක්ලික් කරන්න.
පතන මෙනුවක් දිස්වනු ඇත.
➤ Expand Insert clicking by and then select Module .
එය Module((Module) විවෘත කරයි. කේතය) කවුළුව.
➤ මොඩියුලය(කේතය) තුළ පහත කේතය ඇතුළු කරන්න කවුළුව,
6766
කේතය දත්ත නම් පත්රයේ B4:E9 වෙතින් දත්ත පිටපත් කරයි පසුරු පුවරුව. ඊට පසු, එය පසුරු පුවරුවෙන් Paste Sheet නම් පත්රයේ B5:E10 දත්ත අලවයි.
පසු එය,
➤ VBA කවුළුව වසන්න හෝ අවම කරන්න.
➤ ALT+F8
එය <විවෘත කරනු ඇත 1>මැක්රෝ කවුළුව.
➤ මැක්රෝ නාමය කොටුව තුළ කොපි_ක්ලිප්බෝඩ්_රේන්ජ් තෝරා ධාවනය මත ක්ලික් කරන්න.
<0ප්රතිඵලයක් වශයෙන්, ඔබගේ දත්ත අපේක්ෂිත ගමනාන්තයට අලවනු ලැබේ.
➤ මුල් පිටුව වෙත යන්න. ටැබය වෙත ගොස් ක්ලිප්බෝඩ් රිබනයෙහි පහළ වම් කෙළවරේ ඇති කුඩා පහළට ඊතල නිරූපකය මත ක්ලික් කරන්න.
එය වම් පැත්තේ ඇති පසුරු පුවරුව විවෘත කරනු ඇත. ඔබගේ Excel ගොනුව.
දැන්, පත්රයේ අලවා ඇති දත්ත පසුරු පුවරුවේ ඇති බව ඔබට දැක ගත හැක. ඇත්ත වශයෙන්ම, දත්ත මුලින්ම මෙහි සුරකින ලද අතර පසුව එය මෙතැනින් පත්රයට අලවා ඇත. Excel හි අගයන් පිටපත් කර අලවන්න (උදාහරණ 5)
නිගමනය
මෙම ලිපියෙන්, ඔබට VBA භාවිතයෙන් පසුරු පුවරුවේ සිට Excel වෙත ඇලවීමට ක්රම 3ක් සොයාගත හැකිය. පළමු ක්රම දෙකෙන් ක්ලිප්බෝඩ් එකේ අන්තර්ගතය තනි කොටුවක අලවන නමුත් තුන්වන ක්රමය සමඟින් ඔබට පරාසයක දත්ත ඇලවිය හැක. ඔබට කිසියම් ව්යාකූලත්වයක් ඇත්නම් කරුණාකර අදහස් දැක්වීමට නිදහස් වන්න.