Sut i fewnosod testun penodol wrth gyrchwr wrth gyfansoddi neges mewn rhagolwg? 

Gan dybio, mae gennych rai llinynnau testun penodol a ddefnyddir yn aml wrth gyfansoddi'r neges e-bost, felly, hoffech fewnosod y testun yn safle presennol y cyrchwr yn y corff post yn awtomatig heb eu teipio â llaw dro ar ôl tro. Yr erthygl hon, byddaf yn siarad am ddull hawdd o ddatrys y dasg hon yn gyflym.

Mewnosod testun penodol neu ddyddiad cyfredol yn y cyrchwr wrth gyfansoddi neges gyda chod VBA

Mewnosod testun penodol neu ddyddiad cyfredol yn y cyrchwr wrth gyfansoddi neges gyda chod VBA

Gall y cod VBA canlynol eich helpu i fewnosod llinyn testun penodol neu ddyddiad cyfredol yn safle'r cyrchwr, gwnewch fel hyn:

1. Daliwch i lawr y ALT + F11 allweddi i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

2. Ac yna, cliciwch Mewnosod > Modiwlau, copïo a gludo islaw'r cod i'r modiwl gwag agored:

Cod VBA: Mewnosod testun penodol neu ddyddiad cyfredol yn y cyrchwr

Option Explicit
Public Sub InsertInfoToSelection()
    Dim xDoc As Word.Document
    Dim xSel As Word.Selection
    On Error Resume Next
    Select Case TypeName(Application.ActiveWindow)
        Case "Explorer"
            Set xDoc = Application.ActiveExplorer.Selection(1).GetInspector.WordEditor
        Case "Inspector"
            Set xDoc = Application.ActiveInspector.WordEditor
    End Select
    Set xSel = xDoc.Application.Selection
    xSel.InsertBefore Format("ExtendOffice")
    Set xDoc = Nothing
    Set xSel = Nothing
End Sub

Nodyn: Yn y cod uchod, ExtendOffice yw'r testun penodol yr ydych am ei fewnosod, os oes angen i chi fewnosod y dyddiad cyfredol yn lle'r llinyn testun, newidiwch y testun yn y sgript hon Fformat xSel.InsertBefore ("ExtendOffice") i Fformat xSel.InsertBefore (Nawr, "DD / MM / BBBB").

3. Yna, arbed a chau ffenestr y cod, creu e-bost newydd, ac yn y ffenestr Negeseuon, cliciwch Addasu Bar Offer Mynediad Cyflym gollwng i lawr, a dewis Mwy o Orchymyn, gweler y screenshot:

4. Yn y Dewisiadau Outlook blwch deialog, gwnewch y gweithrediadau canlynol:

(1.) Dewis Macros oddi wrth y Dewiswch orchymyn o gollwng i lawr;

(2.) Cliciwch yr enw macro rydych wedi'i fewnosod;

(3.) Yna, cliciwch Ychwanegu botwm i ychwanegu'r macro hwn i'r Addasu Bar Offer Mynediad Cyflym blwch rhestr.

5. Ac yna, cliciwch OK botwm i gau'r blwch deialog, nawr, mae'r eicon macro wedi'i fewnosod yn y Addasu Bar Offer Mynediad Cyflym. Rhowch y cyrchwr lle rydych chi am fewnosod y testun, ac yna cliciwch y botwm macro hwn, bydd y testun penodol yn cael ei fewnosod ar unwaith, gweler y screenshot:

---

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 Pro: Arbed 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.

Darllenwch fwy       Lawrlwythiad Am Ddim      prynu