Skip i'r prif gynnwys

Sut i anfon e-bost newydd o gyfrif penodol yn Outlook bob amser?

Gan dybio eich bod wedi creu cyfrifon e-bost lluosog yn eich Outlook, wrth anfon e-bost yn Outlook, mae'r cyfrif e-bost a ddangosir yn y maes From yn dibynnu ar ba gyfrif rydych ynddo ar hyn o bryd. Ni waeth pa gyfrif rydych ynddo ar hyn o bryd, rydych am anfon newydd bob amser negeseuon e-bost o gyfrif e-bost penodol, gall y tiwtorial canlynol eich helpu chi, gall y dull yn y tiwtorial hwn eich helpu chi.

Anfonwch e-bost newydd o gyfrif penodol gyda chod VBA bob amser

Tab Office - Galluogi Golygu a Phori Tabiau yn Microsoft Office, Gwneud Gwaith yn Awel
Kutools ar gyfer Outlook - Hwb Outlook gyda 100 + Nodweddion Uwch ar gyfer Effeithlonrwydd Superior
Rhowch hwb i'ch Outlook 2021 - 2010 neu Outlook 365 gyda'r nodweddion uwch hyn. Mwynhewch dreial cynhwysfawr am ddim 60 diwrnod a dyrchafwch eich profiad e-bost!

swigen dde glas saethAnfonwch e-bost newydd o gyfrif penodol gyda chod VBA bob amser

Gall y cod VBA hwn eich helpu i anfon e-byst newydd yn hawdd o gyfrif penodol yn Outlook. Gwnewch fel a ganlyn.

1. Pwyswch Alt + F11 i agor y Microsoft Visual Basic ar gyfer Ceisiadau blwch deialog.

2. Ehangu'r Project1 > Gwrthrychau Microsoft Outlook trwy glicio ddwywaith arnynt. Ac yna cliciwch ddwywaith ar y SesiwnOutlook i agor y VbaProject.OTM blwch deialog.

3. Copïwch a gludwch y cod VBA isod i'r blwch deialog.

VBA: anfonwch e-bost newydd o gyfrif penodol bob amser.

Public Sub NewBySpecAccount()
Dim oAccount As Outlook.Account
Dim oMail As Outlook.MailItem
For Each oAccount In Application.Session.Accounts
If oAccount.DisplayName = "Your account name" Then
    Set oMail = Application.CreateItem(olMailItem)
    oMail.SendUsingAccount = oAccount
    oMail.Display
End If
Next
End Sub

4. Nawr mae angen i chi newid y “Enw'ch cyfrif”I'r cyfrif e-bost rydych chi am anfon e-byst newydd bob amser. Gweler y screenshot:

5. Yna pwyswch F5 allwedd ar y bysellfwrdd i redeg y cod VBA.

6. Ar ôl rhedeg y cod VBA, newydd Neges bydd y ffenestr yn ymddangos, cyfansoddwch eich e-bost a chlicio anfon botwm i'w anfon.

Nodyn: Mae'r cod VBA hwn wedi profi'n llwyddiannus yn Outlook 2007, 2010 a 2013, ond nid yw'n gweithredu yn Exchange 2007 a 2010.

 


Offer Cynhyrchiant Swyddfa Gorau

Kutools ar gyfer Rhagolwg - Dros 100 o Nodweddion Pwerus i Werthu Eich Outlook

🤖 Cynorthwy-ydd Post AI: E-byst pro ar unwaith gyda hud AI - un clic i atebion athrylith, tôn berffaith, meistrolaeth amlieithog. Trawsnewid e-bostio yn ddiymdrech! ...

📧 E-bostio Automation: Allan o'r Swyddfa (Ar gael ar gyfer POP ac IMAP)  /  Amserlen Anfon E-byst  /  Auto CC/BCC gan Reolau Wrth Anfon E-bost  /  Awto Ymlaen (Rheolau Uwch)   /  Auto Ychwanegu Cyfarchiad   /  Rhannwch E-byst Aml-Dderbynnydd yn Negeseuon Unigol yn Awtomatig ...

📨 Rheoli E-bost: Dwyn i gof E-byst yn Hawdd  /  Rhwystro E-byst Sgam gan Bynciau ac Eraill  /  Dileu E-byst Dyblyg  /  Chwilio Manwl  /  Cydgrynhoi Ffolderi ...

📁 Ymlyniadau ProArbed Swp  /  Swp Datgysylltu  /  Cywasgu Swp  /  Auto Achub   /  Datgysylltiad Auto  /  Cywasgiad Auto ...

🌟 Rhyngwyneb Hud: 😊Mwy o Emojis Pretty a Cŵl   /  Rhowch hwb i'ch Cynhyrchiant Outlook gyda Golygfeydd Tabbed  /  Lleihau Outlook Yn lle Cau ...

???? Rhyfeddodau un clic: Ateb Pawb ag Ymlyniadau Dod i Mewn  /   E-byst Gwrth-Gwe-rwydo  /  🕘Dangos Parth Amser yr Anfonwr ...

👩🏼‍🤝‍👩🏻 Cysylltiadau a Chalendr: Swp Ychwanegu Cysylltiadau O E-byst Dethol  /  Rhannwch Grŵp Cyswllt i Grwpiau Unigol  /  Dileu Atgoffa Pen-blwydd ...

Dros Nodweddion 100 Aros Eich Archwiliad! Cliciwch Yma i Ddarganfod Mwy.

 

 

 

Comments (2)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
This code does not work if you have multiple Exchange accounts defined in your profile - pointing to different exchange servers.

In that case you need a variation on this code from Microsoft.

https://learn.microsoft.com/en-us/office/vba/outlook/concepts/accounts/create-a-sendable-item-for-a-specific-account-based-on-the-current-folder-outloo
This comment was minimized by the moderator on the site
Hi, the "VBA: always send a new email from specific account." does not work. If you want to send email from Excel, you have to change Outlook settings. Outlook - File - Account settings. Here you have to prioritise different email and different datafiles you have access to besides your usual account (email). This will work even if Outlook is closed then. (W10, O365)
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations