මෙම නිබන්ධනය ස්වයංක්‍රීයව විද්‍යුත් තැපෑලක් යැවීමට එක්සෙල් මැක්‍රෝ භාවිතා කරන ආකාරය නිදර්ශනය කරනු ඇත. අපට VBA macros භාවිතයෙන් අපගේ තැපැල් විශේෂාංගය වින්‍යාසගත කළ හැක. එබැවින්, VBA macro භාවිතයෙන් අපට එකවර පරිශීලකයින් කිහිප දෙනෙකුට විද්‍යුත් තැපෑලක් යැවිය හැක. මැක්‍රෝවක් සමඟ ස්වයංක්‍රීයව විද්‍යුත් තැපෑල යැවීමට අප අපගේ උපාංගයේ Outlook ස්ථාපනය කර තිබිය යුතුය. මොකද අපි ඇතුල් කරන කේතය ලබන්නන්ට ඊමේල් යැවීමට Outlook භාවිතා කරයි.

පුහුණු වැඩපොත බාගන්න

ඔබට පුහුණු වැඩපොත මෙතැනින් බාගත හැක.

3 ස්වයංක්‍රීයව විද්‍යුත් තැපෑල යැවීමට Excel මැක්‍රෝ සඳහා සුදුසු උදාහරණ

මෙම ලිපිය පුරා අපි නිරූපණය කරන්නෙමු 3 ලබන්නන් වෙත ස්වයංක්‍රීයව විද්‍යුත් තැපෑලක් යැවීමට එක්සෙල් මැක්‍රෝ භාවිතා කිරීම සඳහා සුදුසු උදාහරණ. උදාහරණය නිදර්ශනය කිරීමට පෙර අපගේ එක්සෙල් පත්‍රයේ යමක් සවි කිරීමට අවශ්‍ය වේ. ස්වයංක්‍රීයව විද්‍යුත් තැපෑල යැවීමට මැක්‍රෝ අයදුම් කිරීමට පෙර පහත පියවර සම්පූර්ණ කරන්න.

පියවර:

• පළමුව, ඔබේ දත්ත කට්ටලයෙන්, සංවර්ධක ටැබයට<යන්න 2>. Visual Basic විකල්පය තෝරන්න.

• ඊළඟට Tool tab එකට ගොස් විකල්පය තෝරන්න යොමු .

• ' යොමු - VBAProject ' නමින් නව සංවාද කොටුවක් විවෘත වනු ඇත.
• අවසාන වශයෙන්, ' Microsoft Office 16.0 Object Library ' විකල්පය පරීක්ෂා කර OK මත ක්ලික් කරන්න.

1. යැවීමට Excel VBA Macro යොදන්නසෛල අගය මත ස්වයංක්‍රීයව විද්‍යුත් තැපෑල

පළමුව සහ ප්‍රධාන වශයෙන්, අපගේ දත්ත කට්ටලයේ ඇති විශේෂිත සෛල අගයක් මත පදනම්ව ස්වයංක්‍රීයව විද්‍යුත් තැපෑලක් යැවීමට අපි excel VBA macro යොදන්නෙමු. මෙම උදාහරණය නිදර්ශනය කිරීම සඳහා අපි පහත දත්ත කට්ටලය භාවිතා කරමු. සෛලය D6 සෛල අගය 400 ට වැඩි නම් ස්වයංක්‍රීයව විද්‍යුත් තැපෑලක් යවන කේතයක් අපි ලියන්නෙමු.

මෙම ක්‍රියාව සිදු කිරීමට පියවර බලමු.

පියවර:

• ආරම්භ කිරීමට, දකුණ – ක්ලික් කරන්න පත්‍රය මත ' Cell මත පදනම්ව '.
• ඊට අමතරව, ' කේතය බලන්න ' විකල්පය තෝරන්න.

• ඉහත ක්‍රියාව මඟින් එම වැඩ පත්‍රිකාව සඳහා හිස් VBA කේත කවුළුවක් විවෘත කරනු ඇත. එම කේත කවුළුව විවෘත කිරීමට තවත් ක්‍රමයක් වන්නේ Alt + F11 ඔබන්න.
• තව, එම කේත කවුළුවේ පහත කේතය ටයිප් කරන්න:

5823

• ඉන්පසු, කේතය ක්‍රියාත්මක කිරීමට Run බොත්තම ක්ලික් කරන්න හෝ F5 යතුර ඔබන්න.

• අවසාන වශයෙන්, මෙතැන් සිට කොටුව කොටුවේ අගය D6 > 400 Outlook හි විද්‍යුත් තැපෑලක් නිශ්චිත ලබන්නන් සමඟ ස්වයංක්‍රීයව ජනනය වේ. විද්‍යුත් තැපෑල යැවීමට අපට Send බොත්තම ක්ලික් කිරීමට සිදුවේ.

කියවන්නතවත්: සෛල අන්තර්ගතය මත පදනම්ව Excel වෙතින් ස්වයංක්‍රීයව විද්‍යුත් තැපැල් යවන්න (ක්‍රම 2)

2. VBA මැක්‍රෝ සමඟ නියමිත දිනය මත ස්වයංක්‍රීයව විද්‍යුත් තැපෑල යැවීම

දෙවන ක්‍රමය, ඕනෑම ව්‍යාපෘතියක නියමිත දිනය ආසන්න නම් ස්වයංක්‍රීයව විද්‍යුත් තැපෑලක් යැවීමට අපි Excel VBA macro භාවිතා කරන්නෙමු. මේක මතක් කිරීමක් වගේ දෙයක්. මෙම උදාහරණය නිදර්ශනය කිරීම සඳහා අපි පහත දත්ත කට්ටලය භාවිතා කරමු. දත්ත කට්ටලයේ විවිධ විකුණුම්කරුවන්ගේ ඊමේල්, පණිවිඩ සහ ඔවුන්ගේ ව්‍යාපෘතියේ නියමිත දිනය අඩංගු වේ.

මෙම ක්‍රමය ක්‍රියාත්මක කිරීමට පහත පියවර අනුගමනය කරන්න.

පියවර:

• පළමුව, දිනය පත්‍රය මත දකුණු-ක්ලික් කරන්න.
• ඊළඟට, ' කේතය බලන්න විකල්පය තෝරන්න '.

• එය සක්‍රිය වැඩ පත්‍රිකාව සඳහා හිස් VBA කේත කවුළුවක් විවෘත කරයි. එම කේත කවුළුව ලබා ගැනීමට අපට Alt + F11 ඔබන්න.
• ඉන්පසු, එම කේත කවුළුවට පහත කේතය ඇතුළු කරන්න:

8122

" aMailBody = "" aMailBody = aMailBody & "Hello" & zRgSendVal & CrLf aMailBody = aMailBody & "පණිවිඩය: " & aRgText.Offset(j - amp; 1; ලිපි හුවමාරුව). aMailBody & "" සකසන්න aMailItem = aOutApp.CreateItem(0) aMailItem සමඟින් .Subject = aMailSubject .To = zRgSendVal .HTMLBody = aMailBody .ඉදිරිපත් කර අවසන් නම් <ඊළඟ අයිතමය = අවසන් නොවේ නම්

• අලුත් එකක්සංවාද කොටුව උත්පතන වනු ඇත.
• ඉන්පසු, එම සංවාද කොටුවේ ආදාන ක්ෂේත්‍රයේ නියමිත දින තීරු පරාසය D$5:$D$9 තෝරන්න. ඉන්පසු, OK මත ක්ලික් කරන්න.

• තවත් එක් සංවාද කොටුවක් උත්පතන වනු ඇත.
• තව, දී ආදාන ක්ෂේත්‍රය ඊමේල් ලිපින අඩංගු B$5:$B$9 තීරු පරාසය තෝරා OK මත ක්ලික් කරන්න.

• එසේම, තවත් එක් කවුළුවක් උත්පතන වනු ඇත. පොප් කවුළුවේ ආදාන ක්ෂේත්‍රයේ $C$5:$C$9 පණිවිඩ පරාසය තෝරන්න.

• අවසානයේ , පහත රූපයේ වැනි ප්‍රතිඵල අපට දැකිය හැක. 3 විවිධ කවුළු Outlook හි ස්වයංක්‍රීයව සාදනු ලබන 3 ඊමේල් අපට ලැබේ. මෙය පළමු ඊමේල් ලිපින දෙක සඳහා තැපෑල නිර්මාණය නොකරයි. මොකද ඒ ව්‍යාපෘති දෙකේ නියමිත දිනය ඉවරයි.

Read More: Email එක මත පදනම්ව ස්වයංක්‍රීයව Email යවන්නේ කෙසේද? දිනය

සමාන කියවීම්

• [විසඳා ඇත]: Excel හි නොපෙන්වන වැඩපොත බෙදා ගන්න (පහසු පියවර සමඟ)
• Excel ලැයිස්තුවෙන් විද්‍යුත් තැපෑල යවන්නේ කෙසේද (ඵලදායී ක්‍රම 2ක්)
• Editable Excel Spreadsheet එකක් විද්‍යුත් තැපෑලෙන් යවන්නේ කෙසේද (ඉක්මන් ක්‍රම 3ක්)
• Macro Excel වෙතින් විද්‍යුත් තැපෑල යැවීමට (සුදුසු උදාහරණ 5)
• Macro 11>

  3. ඇමුණුම් සමඟ ස්වයංක්‍රීයව විද්‍යුත් තැපෑල යැවීමට Excel මැක්‍රෝ භාවිත කරන්න

  අවසාන උදාහරණයේදී, අපට කළ හැකි ආකාරය අපි බලමු.ඇමුණුම් සමඟ ස්වයංක්‍රීයව විද්‍යුත් තැපෑලක් යැවීමට එක්සෙල් මැක්‍රෝ එකක් සංවර්ධනය කරන්න. පහත රූපයේ අපට ඇමුණුමක් ඇතැයි සිතමු. අපට මෙම ඇමුණුම excel VBA macro භාවිතයෙන් විද්‍යුත් තැපෑලක් හරහා යැවීමට අවශ්‍යයි. මෙය සිදු කිරීම සඳහා අපට මෙම එක්සෙල් ගොනුවේ මාර්ගය අවශ්‍ය වේ. ඒ සඳහා වන පියවර මෙන්න:

  • ගොනුව තෝරන්න ' Attachment.xlsx ' '.
  • ' Copy Path<2 විකල්පය මත ක්ලික් කරන්න>'.

  

  • ඉතින්, අපට ලැබෙන ගොනුවේ මාර්ගය:
  E:\Exceldemy\Attachment.xlsx

මෙම ගොනුව විද්‍යුත් තැපෑලෙන් යැවීමට අපි අපගේ මැක්‍රෝ කේතයට මෙම මාර්ගය ඇතුළත් කරන්නෙමු. මෙය සිදු කිරීම සඳහා පහත පියවර අනුගමනය කරන්න.

පියවර:

• පළමුව, සංවර්ධක ටැබය වෙත ගොස් <1 විකල්පය තෝරන්න> Visual Basic .

• ' Project – VBAProject නමින් නව කවුළුවක් විවෘත වනු ඇත '.
• දෙවනුව, පත්‍රයේ නම මත දකුණු-ක්ලික් කරන්න .
• ඉන්පසු, Insert > Module තෝරන්න.

• ඉහත විධානය හිස් VBA
• තුන්වනුව, එම මොඩියුලයේ පහත කේතය ටයිප් කරයි:

1161

• ඉන්පසු, F5 යතුර ඔබන්න හෝ කේතය ක්‍රියාත්මක කිරීමට Run බොත්තම ක්ලික් කරන්න.

• අවසාන වශයෙන්, කේතය කේතයේ සපයා ඇති ඊමේල් වෙත ඇමුණුම යවනු ඇත. කේතය Outlook මගින් ඊමේල් යවයි. එබැවින්, Allow බොත්තම මත ක්ලික් කරන්න Outlook ඇමිණුම ලබා දී ඇති ඊමේල් වෙත යැවීමට.

තවත් කියවන්න: අයදුම් කරන ආකාරයඇමුණුම සමඟ Excel වෙතින් විද්‍යුත් තැපෑල යැවීමට මැක්‍රෝ

නිගමනය

අවසානයේ දී, මෙම ලිපිය 3 එක්සෙල් VBA මැක්‍රෝ වෙත භාවිත කිරීමේ උදාහරණ පෙන්වයි තැපැල් ස්වයංක්‍රීයව යවන්න. ඔබේ කුසලතා පරීක්ෂණයට ලක් කිරීම සඳහා මෙම ලිපියේ දක්වා ඇති නියැදි වැඩ පත්‍රිකාව බාගන්න. ඔබට කිසියම් ප්‍රශ්නයක් ඇත්නම්, කරුණාකර පහත කොටුවේ අදහස් දක්වන්න. අපගේ කණ්ඩායම හැකි ඉක්මනින් ඔබගේ පණිවිඩයට පිළිතුරු දීමට උත්සාහ කරනු ඇත. අනාගතයේදී වඩාත් නව නිපැයුම් Microsoft Excel විසඳුම් සඳහා විමසිල්ලෙන් සිටින්න.