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 guddio rhif ffacs yn y Rhestr Enwau Dewis yn Outlook?

Yn Outlook, efallai eich bod wedi darganfod hynny yn y rhestr "Enwau Dethol" neu lyfr cyfeiriadau, mae'r golofn cyfeiriad e-bost yn cynnwys nid yn unig y cyfeiriadau e-bost ond hefyd y cofnodion ffacs a allai eich blino. Yn yr erthygl hon, rwy'n cyflwyno rhai ffyrdd i guddio'r rhif ffacs i chi.
doc ffug rhif ffacs 1

Cuddio rhif ffacs yn y rhestr Enwau Dethol gyda VBA

dileu pob cysylltiad dyblyg o un neu ffolderi cyswllt lluosog mewn rhagolwg

Mewn weithiau, efallai y byddwn yn ailadrodd yr un cysylltiadau, sut y gallwn symud y cysylltiadau dyblyg oddi wrth un neu ffolderi cyswllt lluosog? Kutools ar gyfer Outlook's Duplicate Contacts gall swyddogaeth gael gwared neu gyfuno cysylltiadau dyblyg yn gyflym yn seiliedig ar negeseuon e-bost, enw llawn neu feini prawf eraill o un ffolder neu fwy o gysylltiadau. Cliciwch ar gyfer treialon 45 am ddim!
doc dileu cysylltiadau dyblyg 1
Kutools for Outlook: gyda dwsinau o ychwanegu Outlook defnyddiol, am ddim i geisio heb gyfyngiad mewn diwrnodau 45.

Cuddio rhif ffacs yn y rhestr Enwau Dethol gyda VBA

Os ydych chi am guddio'r rhif ffacs yn y rhestr Dewis Enw, gwnewch fel hyn:

1. Gwasgwch Alt + F11 allweddi i'w galluogi Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

2. Cliciwch Mewnosod > Modiwlau i fewnosod modiwl gwag newydd, copïwch a gludwch y cod isod i'r sgript.

VBA: Mae cuddio yn bodoli rhif ffacs yn Enwau Dewis

Sub HideFaxNumbers_ExistingContacts () 'UpdatebyExtendoffice2018-5-23 Dim xStores Fel Outlook.Stores Dim xStore As Outlook.Store Dim xRootFolder Fel Outlook.Folder Dim xFolder Fel Ffolder Ar Gwall yn Cymryd Nesaf Set xStores = Outlook.Application.Session.Stores For Each xStore In xStores Set xRootFolder = xStore.GetRootFolder Ar gyfer pob xFolder Yn xRootFolder.Folders CallFolders Process (xFolder) Nesaf Nesaf Diweddarwch Is-Broses ProsesBolwyr (Trwy gyfredol CurrentFolder As Outlook.Folder) Dim xContactItem Fel Outlook.ContactItem Dim xSubFolder Fel Outlook.Folder Dim xFax Fel String Dim I Fel Integre Ar Gwall yn Cymryd Nesaf Os CurrentFolder.DefaultItemType <> olContractItem Yna Ewch Ymadael xFax = "Ffacs:" I I = CurrentFolder.Items.Count I 1 Step -1 Set xContactItem = CurrentFolder.Items.Item (I) Gyda xContactItem Os (Len (.BusinessFaxNumber) <> 0) Ac InStrRev (.BusinessFaxNumber, Trim (xFax)) = 0 Yna .BusinessFaxNumber = xFax & .BusinessFaxNumber End Os Os (Len (.HomeFaxNumber) <> 0) Ac InStrRev (.H omeFaxNumber, Trim (xFax)) = 0 Yna. HomeFaxNumber = xFax & .HomeFaxNumber End Os (Len (.OtherFaxNumber) <> 0) Ac InStrRev (.OtherFaxNumber, Trim (xFax)) = 0 Yna. OtherFaxNumber = xFax &. OtherFaxNumber End Os Cadwch Ddiwedd Gyda Nesaf I Os CurrentFolder.Folders.Count <> 0 Yna I I = CurrentFolder.Folders.Count I 1 Step -1 Set xSubFolder = CurrentFolder.Folders.Item (I) Call ProcessFolders (xSubFolder) Nesaf I Diwedd Os Is-Ddewedd

3. Gwasgwch F5 allweddol i redeg y cod, nawr mae'r rhifau ffacs wedi eu cuddio.
doc ffug rhif ffacs 2

Os ydych chi am guddio'r rhif ffacs mewn cysylltiadau newydd, gwnewch fel hyn:

1. Gwasgwch Alt + F11 allweddi i'w galluogi Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

2. Cliciwch ddwywaith ThisOutlookSession o Prosiect-1 pane, ac yna copïwch a gludwch y cod isod i'r sgript.

VBA: Cuddio rhif ffacs mewn cysylltiadau ychwanegol newydd

Public WithEvents xInspectors Fel Outlook.Inspectors Public WithEvents xContactItem Fel Outlook.ContactItem Private Sub Application_Startup () 'UpdatebyExtendoffice2018-5-23 Set xInspectors = Outlook.Application.Inspectors End Sub Private Sub xInspectors_NewInspector (Gan Arolygydd Val Fel Arolygydd) Os yw TypeName (Inspector.CurrentItem ) = "Cysylltu â ni" Yna Set xContactItem = Inspector.CurrentItem End If End Is Sub Preifat xContactItem_PropertyChange (By Name Name As String) Dim xArr () Fel Dim Amrywiol xFax Wrth i String On Error Cymryd Nesaf Nesaf xArr = Array ("BusinessFaxNumber", "HomeFaxNumber" , "OtherFaxNumber") xFax = "Ffacs:" Gydag xContactItem Dewiswch Achos Enw Achos xArr (0) Os InStrRev (.BusinessFaxNumber, Trim (xFax)) = 0 Yna .BusinessFaxNumber = xFax &. BusinessFaxNumber End Os Case xArr (1) Os InStrRev (.HomeFaxNumber, Trim (xFax)) = 0 Yna. HomeFaxNumber = xFax & .HomeFaxNumber End Os Case xArr (2) Os InStrRev (.OtherFaxNumber, Trim (xFax)) = 0 Yna. OtherFaxNumber = xFax & .O therFaxNumber End Os Diwedd Dewis Diwedd Gyda Is-Ddewedd
doc ffug rhif ffacs 3

3. Cadwch y cod ac ailgychwyn yr Outlook i wneud y cod yn effeithio.

O hyn ymlaen, bydd pob rhif ffacs o Gysylltiadau a grëwyd newydd yn cael eu cuddio yn y ffenestr Cysylltiadau Dewis: Cysylltiadau.

doc ffug rhif ffacs 4
doc arrow i lawr
doc ffug rhif ffacs 5


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.