අන්තර්ගත වගුව
Excel හි VBA සමඟ වැඩ කරන විට, අපට බොහෝ විට වැඩ පත්රිකාවක string (s) සහ variable (s) සම්බන්ධ කිරීමට සිදුවේ. ශිෂ්යයන්ගේ ප්රතිඵල සාරාංශ කිරීමේ සිට සංකීර්ණ ව්යාපාරයක් විශ්ලේෂණය කිරීම දක්වා අපගේ ක්රියාකාරකම්වල සියලුම අංශවල පාහේ තන්තු (ය) සහ විචල්ය (ය) සංයුක්ත කිරීම බහුලව භාවිතා වේ. මෙම ලිපියෙන්, මම ඔබට Excel හි VBA සමඟ වැඩ පත්රිකාවක තන්තුව (ය) සහ විචල්ය (ය) ඒකාබද්ධ කරන්නේ කෙසේදැයි පෙන්වන්නම්. මම දේවල් නිසි උදාහරණ සහ නිදර්ශන සහිතව පැහැදිලි කරන්නම්.
Excel VBA හි String (s) සහ Variable (s) Concatenate (Quick View)
ප්රායෝගික වැඩපොත බාගන්න
ඔබ මෙම ලිපිය කියවන අතරතුර ව්යායාම කිරීමට මෙම පුහුණු වැඩපොත බාගන්න.
Concatenate String සහ Variable.xlsm
Excel VBA හි String (s) සහ Variable (s) Concatenate (s) (පියවරෙන් පියවර විශ්ලේෂණය)
මුලින්ම, අපි බලමු අපි string (s) concatenate කරන්නේ කෙසේදැයි බලමු. සහ විචල්ය (s) VBA හි පියවරෙන් පියවර.
⧪ Concatenating String (s):
තන්තු දෙකක් හෝ වැඩි ගණනක් <තුළ සම්බන්ධ කිරීමට 1>VBA , ඔබට අංක ගණිතය එකතු කිරීම (+) සංකේතය සහ ඇම්පර්සන්ඩ් (& ) සංකේතය යන දෙකම භාවිතා කළ හැක.
උදාහරණයක් ලෙස, සංයුක්ත කිරීමට “මහා අපේක්ෂාවන්” සහ “නගර දෙකක කතාවක්” කොමාව සමඟ, ඔබට භාවිතා කළ හැක:
9508
නැතහොත්,
4385
ඉහත ඕනෑම කේතයක් ක්රියාත්මක කරන්න. එය සංගත ප්රතිදානය, මහා අපේක්ෂාවන්, සංදර්ශන කරයිA Tale of Two Cities .
⧪ Concatenating Variable (s)
සියලු විචල්ය වල තන්තු අගයන් අඩංගු නම්, එවිට ඔබට අංක ගණිතය එකතු කිරීම (+) සංකේතය සහ ඇම්පර්සන්ඩ් (&) සංකේතය යන දෙකම භාවිතා කළ හැක.
එහෙත් ඒවා නොමැති නම්, ඔබට භාවිතා කළ හැක. සම්බන්ධ කිරීමට ඇම්පර්සන්ඩ් (&) සංකේතය පමණි.
උදාහරණයක් ලෙස, අපට A සහ B යන විචල්ය දෙකක් තිබේ.
A තන්තුවක් අඩංගු වේ, “නගර දෙකක කතාවක්” , සහ B තවත් තන්තුවක් අඩංගු වේ, “ආදරයේ නීති හතළිස්” .
ඔබට එකතු කිරීම (+) සංකේතය සහ ඇම්පර්සන්ඩ් (&) සංකේතය ඒකාබද්ධ කිරීම සඳහා භාවිත කළ හැක.
4125
නැතහොත්,
4833
අවස්ථා දෙකේදීම, ඔවුන් සංයුක්ත තන්තුව ආපසු ලබා දෙනු ඇත.
<0නමුත් A තන්තුවක් නම් ( “ A Tale of Two Cities” ) සහ B යනු පූර්ණ සංඛ්යාවක් ( 27 ), ඔබ සංයුක්ත කිරීම සඳහා ඇම්පර්සන්ඩ් (&) සංකේතය භාවිතා කළ යුතුය.
4575
එය සංයුක්ත ප්රතිදානය ලබා දෙනු ඇත. .
Concat සඳහා උදාහරණ Excel VBA හි Strings සහ Variables enate (Macro, UDF, සහ UserForm සම්බන්ධ)
අපි Excel හි VBA සමඟ string (s) සහ variable (s) concatenate කිරීමට ඉගෙන ගෙන ඇත . මෙවර අපි VBA සමඟ තන්තු (ය) සහ විචල්ය (ය) සම්බන්ධ කිරීම සම්බන්ධ උදාහරණ කිහිපයක් ගවේෂණය කරන්නෙමු.
උදාහරණ 1: තන්තු (ය) සම්බන්ධ කිරීමට මැක්රෝවක් සංවර්ධනය කිරීම සහ Excel VBA හි විචල්ය (s)
අපි ඉගෙන ගත්තෙමු VBA සමඟ තන්තු සහ විචල්ය සම්බන්ධ කරන්න. මේ වතාවේ අපි වැඩ පත්රිකාවක තීරු කිහිපයක තන්තු සහ විචල්ය ඒකාබද්ධ කිරීමට මැක්රෝ සංවර්ධනය කරන්නෙමු.
මෙහි අපට පොත් නම් සහිත දත්ත කට්ටලයක් ලැබී ඇත. Martin Bookstore නම් පොත් සාප්පුවක සමහර පොත් වල කතුවරුන් , සහ මිල .
අපි Macro<2 සංවර්ධනය කරමු> F4 කොටුවේ B4:D14 දත්ත කට්ටලයේ 1, 2, සහ 3 තීරු ඒකාබද්ධ කිරීමට.
VBA කේතය වනුයේ:
⧭ VBA කේතය:
2626
⧭ ප්රතිදානය :
මෙම කේතය ක්රියාත්මක කරන්න. ඔබට 3 තීරු F4:F14 පරාසය තුළ සංකලනය වනු ඇත.
තවත් කියවන්න: Macro to Excel හි බහු තීරු ඒකාබද්ධ කරන්න (UDF සහ UserForm සමග)
උදාහරණ 2: Excel VBA හි string (s) සහ variable (s) Concatenate කිරීමට පරිශීලක-නිර්වචනය කළ කාර්යයක් නිර්මාණය කිරීම
අපි දත්ත කට්ටලයක තීරු කිහිපයක් ඒකාබද්ධ කිරීමට මැක්රෝ සංවර්ධනය කිරීමට ඉගෙන ගත්තෙමු. මෙවර අපි Excel හි තන්තු හෝ විචල්ය සම්බන්ධ කිරීමට පරිශීලක-නිර්වචනය කළ ශ්රිතයක් සාදන්නෙමු.
සම්පූර්ණ VBA කේතය වනුයේ:
⧭ VBA කේතය:
5788
⧭ Output:
ඔබට සම්බන්ධ කිරීමට අවශ්ය තීරුව තෝරන්න පරාසය සහ මෙම සූත්රය ඇතුළු කරන්න:
=ConcatenateValues("She","H. Rider Haggard",", ")
එය She, H. Rider Haggard ප්රතිදානය ලෙස ආපසු එනු ඇත.
නැවතත්, සූත්රය ඇතුළු කරන්න:
=ConcatenateValues(B4:B14,30,", ")
[ අරා සූත්රය . ඒ නිසා අමතක කරන්න එපාඔබ Office 365 හි සිටින්නේ නම් මිස CTRL + SHIFT + ENTER ඔබන්න.]
එය B4:B14 පරාසයේ සියලුම අගයන් සමඟ 30 සම්බන්ධ කරයි .
අවසාන වශයෙන්, ඇතුළු කරන්න:
=ConcatenateValues(B4:B14,C4:C14,", ")
[නැවත අරාව සූත්රය . එබැවින් ඔබ Office 365 හි සිටින්නේ නම් මිස CTRL + SHIFT + ENTER ඔබන්න අමතක කරන්න එපා.]
එය B4 පරාසයේ සියලුම අගයන් ඒකාබද්ධ කරයි: B14 සමඟින් C4:C14 .
තවත් කියවන්න: Excel හි සම්බන්ධ කරන්නේ කෙසේද (සුදුසු ක්රම 3ක්)
සමාන කියවීම්:
- Cell දෙකකින් හෝ වැඩි ගණනකින් පෙළ එක්සෙල් හි එක් සෛලයකට ඒකාබද්ධ කරන්නේ කෙසේද (ක්රම 5)
- Excel හි එක් කොටුවකට පේළි ඒකාබද්ධ කරන්න
- Excel හි අංක සම්බන්ධ කරන්න (ඉක්මන් සූත්ර 4)
- පෙළ ඒකාබද්ධ කරන්න Excel හි (සුදුසු ක්රම 8ක්)
- Excel හි Apostrophe සම්බන්ධ කරන්නේ කෙසේද (පහසු ක්රම 6ක්)
උදාහරණ 3: සංවර්ධනය කිරීම Excel VBA හි විවිධ වැඩ පත්රිකාවක තන්තුව (ය) සහ විචල්ය (ය) සම්බන්ධ කිරීමට පරිශීලක පෝරමය
අපි මැක්රෝ සහ පරිශීලක-නිර්වචනය කිරීමට ඉගෙන ගත්තෙමු. ශ්රිතය තන්තු සහ අගයන් ඒකාබද්ධ කිරීමට. අවසාන වශයෙන්, අපි අවශ්ය වැඩ පත්රිකාවේ අවශ්ය ස්ථානයට නූල් සහ අගයන් සම්බන්ධ කිරීමට පරිශීලක පෝරමය සංවර්ධනය කරන්නෙමු.
⧪ පියවර 1: පරිශීලක පෝරමය ඇතුළත් කිරීම
ඇතුළු කරන්න > නව UserForm ඇතුළු කිරීමට VBA මෙවලම් තීරුවේ UserForm විකල්පය.
⧪ පියවර 2: ඇදගෙන යාම සඳහා මෙවලම් UserForm1 නම් UserForm UserForm Control නමින් Toolbox සමඟ විවෘත වනු ඇත.
ඔබගේ මූසිකය th e මෙවලම් පෙට්ටිය මතින් ගෙන ගොස් ListBoxes 2ක්, TextBoxes 5ක්, Labels 7ක් සහ CommanButtons 1ක් UserForm තුළ ඇදගෙන යන්න .
Labels හි displays වෙනස් කරන්න. රූපයේ දැක්වෙන පරිදි.
ඒ හා සමානව, CommandButton හි සංදර්ශකය OK ලෙස වෙනස් කරන්න.
⧪ පියවර 3: TextBox1 සඳහා කේතය ලිවීම
TextBox1 මත දෙවරක් ක්ලික් කරන්න. TextBox1_Change නමින් පුද්ගලික උපක්රියා පටිපාටිය විවෘත වනු ඇත. එහි පහත කේතය ඇතුලත් කරන්න.
2241
⧪ පියවර 4: TextBox3 සඳහා කේතය ලිවීම
ඒ හා සමානව, මත දෙවරක් ක්ලික් කරන්න TextBox3 . TextBox3_Change ලෙස හඳුන්වන තවත් පුද්ගලික උපක්රියාවලියක් විවෘත වනු ඇත. එහි පහත කේතය ඇතුළත් කරන්න.
6810
⧪ පියවර 5: TextBox4 සඳහා කේතය ලිවීම
එසේම, මත දෙවරක් ක්ලික් කරන්න. TextBox3 . TextBox3_Change ලෙස හඳුන්වන තවත් පුද්ගලික උපක්රියාවලියක් විවෘත වනු ඇත. එහි පහත කේතය ඇතුලත් කරන්න.
9004
⧪ පියවර 6: ListBox2 සඳහා කේතය ලිවීම
ඉන්පසු ListBox2 මත දෙවරක් ක්ලික් කරන්න. . ListBox2_Click නමැති පුද්ගලික උපක්රියා පටිපාටිය විවෘත වූ විට, මෙම කේතය එහි ඇතුළත් කරන්න.
4420
⧪ පියවර 7: කේතය ලිවීම CommanButton1 සඳහා
එසේම, CommandButton1 මත දෙවරක් ක්ලික් කරන්න. පුද්ගලික උපක්රියා පටිපාටිය ට පසුව CommandButton1_Change ලෙස හැඳින්වේ විවෘත වේ, පහත කේතය එහි ඇතුළත් කරන්න.
6704
⧪ පියවර 7: පරිශීලක පෝරමය ක්රියාත්මක කිරීම සඳහා කේතය ලිවීම
දැන් අවසාන පියවර වේ. VBA මෙවලම් තීරුවෙන් නව මොඩියුලයක් ඇතුළු කර පහත කේතය ඇතුළු කරන්න.
9006
⧪ පියවර 8: ධාවනය UserForm
ඔබගේ UserForm දැන් භාවිතා කිරීමට සූදානම්. එය ක්රියාත්මක කිරීමට, වැඩ පත්රිකාවෙන් ( ශීර්ෂ ඇතුළුව) දත්ත කට්ටලය තෝරන්න සහ Run_UserForm නම් Macro ධාවනය කරන්න.
UserForm සියලු විකල්ප සමඟ පූරණය වේ. තෝරාගත් පරාස ලිපිනය TextBox1 ( B3:D4 මෙහි) පෙන්වනු ඇත. ඔබට අවශ්ය නම්, ඔබට එය වෙනස් කළ හැකිය. වැඩ පත්රිකාවේ තෝරාගත් පරාසය වෙනස් වනු ඇත.
ඔබට තීරු සිට Concat ListBox වෙත සම්බන්ධ කිරීමට අවශ්ය තීරු තෝරන්න. මෙන්න මම පොත් නම සහ මිල තෝරාගෙන ඇත.
Separator ඇතුළු කරන්න. මෙහිදී මම කොමාවක් ( , ) ඇතුළත් කර ඇත.
ඔබට Concatenated In<2 වෙතින් concatenated range එක දැමීමට අවශ්ය වැඩ පත්රිකාවේ නම තෝරන්න> ලැයිස්තු පෙට්ටිය. මෙන්න මම Sheet3 ඇතුලත් කර ඇත.
(ඔබ පත්රය තෝරන මොහොතේ, එය සක්රිය එක නොවුනත් එය සක්රිය වේ.)
ඉන්පසු ඇතුල් කරන්න. ප්රතිදාන ස්ථානය . එය සංයුක්ත පරාසයේ පළමු කොටුවේ සෛල යොමුවයි. මෙන්න මම දැම්මා B3 .
(ඔබ ප්රතිදාන ස්ථානය ඇතුළු කළ සැණින් ප්රතිදාන පරාසය තෝරනු ලැබේ).
සහ අවසාන වශයෙන් , ඇතුල් කරන්න ප්රතිදාන ශීර්ෂයේ නම (ප්රතිදාන පරාසයේ ශීර්ෂකය). ඔන්න මම දැම්මා Concatenated Range .
( Output Header එක දාපු ගමන් output column එකේ header එක set වෙනවා.)
0>හරි ක්ලික් කරන්න. ඔබට අවශ්ය ස්ථානයෙන් අපේක්ෂිත ප්රතිදානය ලැබෙනු ඇත.
වැඩිදුර කියවන්න: VBA
භාවිතයෙන් තන්තු සහ පූර්ණ සංඛ්යා සම්බන්ධ කරන්නේ කෙසේද නිගමනය
ඉතින් මේ ඔබට Excel VBA තන්තු සහ විචල්ය සම්බන්ධ කිරීමට භාවිතා කළ හැකි උදාහරණ කිහිපයකි. නිදසුන් ඔබට සෑම දෙයක්ම හොඳින් පැහැදිලි කර ඇතැයි බලාපොරොත්තු වෙමු. ඔබට ප්රශ්න තිබේද? අපෙන් අසන්න. තවත් පළ කිරීම් සහ යාවත්කාලීන කිරීම් සඳහා අපගේ වෙබ් අඩවිය ExcelWIKI වෙත පිවිසීමට අමතක නොකරන්න.