Mae cwcis yn ein helpu i gyflwyno ein gwasanaethau. Drwy ddefnyddio ein gwasanaethau, rydych yn cytuno i'n defnydd cwcis.
Tip: Mae ieithoedd eraill yn Google-Cyfieithu. Gallwch ymweld â'r English fersiwn o'r ddolen hon.
Mewngofnodi
x
or
x
x
cofrestr
x

or

Sut i fewnosod testun penodol ar y cyrchwr wrth gyfansoddi neges mewn rhagolwg?

Yn rhagdybio, mae gennych rai teclynnau testun penodol sy'n cael eu defnyddio'n aml wrth gyfansoddi neges e-bost, felly, hoffech chi fewnosod y testun yn sefyllfa bresennol y cyrchwr yn y corff post yn awtomatig heb eu teipio â llaw unwaith eto. Yr erthygl hon, byddaf yn sôn am ddull hawdd o ddatrys y dasg hon yn gyflym.

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


Mewnosod testun penodol mewn unrhyw leoliad wrth gyfansoddi neges:

gyda Kutools ar gyfer Outlook's Testun Auto nodwedd, gallwch greu testun auto, ac yna ei fewnosod yn unrhyw le wrth gyfansoddi neges fel y mae ei angen arnoch chi.

mewnosodwch y testun yn y cyrchwr 4

Kutools ar gyfer Outlook: gyda mwy na 20 + addysgol Excel defnyddiol, am ddim i geisio heb gyfyngiad mewn diwrnodau 60. Lawrlwythwch a cheisiwch y treial am ddim nawr!

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

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

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

2. Ac yna, cliciwch Mewnosod > Modiwlau, copïwch a gludwch y cod isod i'r modiwl gwag a agorwyd:

Cod VBA: Mewnosod testun penodol neu ddyddiad cyfredol ar 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 bydd angen i chi fewnosod y dyddiad cyfredol yn lle'r llinyn testun, newid y testun yn y sgript hon Fformat xSel.InsertBefore ("YmestynOffig") i Fformat xSel.InsertBefore (Nawr, "DD / MM / BBBB").

3. Yna, arbed a chau'r ffenestr cod, creu e-bost newydd, ac yn y ffenestr Neges, cliciwch Customize Bar Offer Mynediad Cyflym gollwng, a dewis Mwy Reoli, gweler y sgrin:

mewnosodwch y testun yn y cyrchwr 1

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

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

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

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

mewnosodwch y testun yn y cyrchwr 2

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

mewnosodwch y testun yn y cyrchwr 3



Kutools ar gyfer Outlook

Mwy na Swyddogaethau Uwch 100 ar gyfer Outlook 2010, 2013, 2016, 2019 a 365

sgrinio kutools ar gyfer rhagolygon bach ar gyfer baner 201812

Mwy o Nodweddion | Lawrlwythiad Am Ddim | $ 39.00 yn unig ar gyfer cannoedd o swyddogaethau

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.