Ինչպե՞ս էլեկտրոնային փոստ ուղարկել Excel- ից էլփոստի մարմնում հիպերհղումով:
Երբևէ փորձե՞լ եք նամակ ուղարկել VBA կոդով Excel-ում: Իսկ ինչպե՞ս նամակ ուղարկելիս հիպերհղումներ ավելացնել էլփոստի հիմնական տեքստին: Այս հոդվածը կօգնի լուծել այս խնդիրը։
Տեղադրեք գերհղումը էլփոստի մարմնում VBA կոդով
Տեղադրեք գերհղումը էլփոստի մարմնում VBA կոդով
Ստորև ներկայացված VBA կոդը կարող է օգնել Excel- ից էլփոստ ուղարկել և էլփոստի մարմնում տեղադրել հատուկ հիպերհղում: Խնդրում եմ արեք հետևյալ կերպ.
1. Գործարկեք ձեր աշխատանքային գիրքը, սեղմեք այն ալտ + F11 բացել ստեղները Microsoft Visual Basic հավելվածների համար պատուհան.
2. Մեջ Microsoft Visual Basic հավելվածների համար պատուհանը, սեղմեք Տեղադրել > Մոդուլ, և ապա պատճենեք ներքևի VBA կոդը Մոդուլի խմբագրում:
VBA կոդ. Հիպերհղումը տեղադրեք էլփոստի մարմնում
Sub EmailHyperlink()
'updated by Extendoffice 20190815
Dim xOtl As Object
Dim xOtlMail As Object
Dim xStrBody As String
xStrBody = "Hi there:" & "<br>" _
& "Please click " & "<a href=" & "http://www.extendoffice.com"">Here</a> to open the page" & "<br>" _
& "Thank you."
On Error Resume Next
Set xOtl = CreateObject("Outlook.Application")
Set xOtlMail = xOtl.CreateItem(olMailItem)
With xOtlMail
.To = "Email Address"
.CC = "Email Address "
.BCC = " Email Address "
.Subject = "Subject line"
.HTMLBody = .HTMLBody & xStrBody
.Display
End With
Set xOtl = Nothing
Set xOtlMail = Nothing
End Sub
Նշումներ:
- Խնդրում ենք փոխել մարմնի պարունակությունը և հղումը հղումներում xStrBody line.
- Փոխարինեք «Էլեկտրոնային հասցե«Է Վերադառնալ, .CCC ևBCC տողեր փաստացի էլփոստի հասցեներով, որոնց էլ. Եթե CC և BCC տողերի կարիքը չունեք, պարզապես հանեք դրանք ամբողջ ծածկագրից կամ տողերից առաջ ավելացրեք մեկ առաջարկ, օրինակ ՝ 'CC = ”էլ. Փոստի հասցե”.
- Փոխարինեք «Թեմայի տող«Է .Առարկա համապատասխան ձեր էլ. փոստի թեմային:
3. Սեղմեք F5 ծածկագիրը գործելու համար: Դրանից հետո էլ. Փոստը ստեղծվում է նշված դաշտերով և մարմնով, ներսում նշված հիպերհղումով, այն ուղարկելու համար կտտացրեք Ուղարկել կոճակին:
Առնչվող հոդվածներ
Excel- ում ավտոմատ կերպով նամակ ուղարկեք ՝ հիմնվելով բջջային արժեքի վրա
Ենթադրելով, որ ցանկանում եք Outlook- ի միջոցով նամակ ուղարկել որոշակի ստացողի ՝ Excel- ում նշված բջջային արժեքի հիման վրա: Օրինակ, երբ աշխատանքային թերթում D7 բջիջի արժեքը 200-ից մեծ է, ապա էլ.փոստը ստեղծվում է ավտոմատ կերպով: Այս հոդվածը ձեզ համար ներկայացնում է VBA մեթոդ ՝ այս խնդիրը արագ լուծելու համար:
Ուղարկեք էլ. Փոստ, եթե Excel- ում կտտացնում են կոճակը
Ենթադրելով, որ դուք պետք է նամակ ուղարկեք Outlook- ի միջոցով, սեղմելով Excel- ի աշխատանքային թերթիկի կոճակը, ինչպե՞ս կարող եք դա անել: Այս հոդվածը կներկայացնի VBA մեթոդ ՝ դրան մանրամասնորեն հասնելու համար:
Ուղարկեք էլ. Նամակ, եթե Excel- ում լրացվել է ժամկետը
Ենթադրելով, որ C սյունակում ժամկետի ավարտը 7 օրից պակաս է կամ հավասար է (ընթացիկ ամսաթիվը ՝ 2017/9/13), այնուհետև էլ. Փոստով ուղարկել հիշեցում B սյունակում նշված պարունակությամբ A սյունակում նշված հասցեատիրոջը: Ինչպե՞ս հասնել դրան: Այս հոդվածի մեթոդը կարող է ձեզ լավություն բերել:
Գրասենյակի արտադրողականության լավագույն գործիքները
Լրացրեք ձեր Excel-ի հմտությունները Kutools-ի հետ Excel-ի համար և փորձեք արդյունավետությունը, ինչպես երբեք: Kutools-ը Excel-ի համար առաջարկում է ավելի քան 300 առաջադեմ առանձնահատկություններ՝ արտադրողականությունը բարձրացնելու և ժամանակ խնայելու համար: Սեղմեք այստեղ՝ Ձեզ ամենաշատ անհրաժեշտ հատկանիշը ստանալու համար...
Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք
- Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
- Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
- Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր: