Conas mé féin a bhaint ó fhreagra ar fad in Outlook?

Má tá cuntais ríomhphoist iolracha i do Outlook, cruthóidh sé roinnt fadhbanna nuair a thabharfaidh tú freagra ar fad ar r-phost a fuarthas. Mar shampla, má fhaigheann tú r-phost trí chuntas amháin, ach seoltaí do chuntas ríomhphoist Outlook go léir a thaispeánann mar fhaighteoirí sa ríomhphost seo, tar éis duit an cnaipe Reply All a chliceáil, tá gach seoladh cuntas ríomhphoist san áireamh sa bhosca To, Cc nó Bcc. Ach i ndáiríre, níl tú ag iarraidh go bhfaighidh cuntais ríomhphoist eile an ríomhphost freagartha seo. Ach conas mé féin a bhaint den fhreagra ar fad? Molfaidh an t-alt seo modhanna duit chun é a bhaint amach.

Bain díom féin nuair a sheolann mé ríomhphoist le cód VBA
Cliceáil amháin chun mé féin a bhaint as freagra ar fad le Kutools le haghaidh Outlook

Bain díom féin nuair a sheolann mé ríomhphoist le cód VBA

Féadfaidh tú seoltaí do chuntais ríomhphoist laistigh de do Outlook a chur leis an gcód VBA seo a leanas chun cosc a chur ar ríomhphoist a sheoladh chugat féin. Déan mar a leanas le do thoil.

1. Brúigh Eile + F11 eochracha ag an am céanna chun an Microsoft Visual Basic d’Fheidhmchláir fhuinneog.

2. Sa Microsoft Visual Basic d’Fheidhmchláir fuinneog, cliceáil faoi dhó ar an Project1 > Microsoft Outlook Object > ThisOutlookSession, agus ansin cóipeáil agus greamaigh faoi bhun chód VBA isteach i bhfuinneog an Chóid. Féach an pictiúr:

Cód VBA: bain mé féin ó gach ríomhphost seolta in Outlook

Private Sub RemoveRecipientsWhenItemSend(Item As Outlook.MailItem)
	Dim RemoveAddrList As VBA.Collection
	Dim Recipients As Outlook.Recipients
	Dim aRecipient As Outlook.Recipient
	Dim i
	Dim j
	Set RemoveAddrList = New VBA.Collection
	' add addresses here
	RemoveAddrList.Add ""
	RemoveAddrList.Add ""
	Set Recipients = Item.Recipients
	For i = Recipients.Count To 1 Step - 1
		Set aRecipient = Recipients.Item(i)
		For j = 1 To RemoveAddrList.Count
			If LCase$(aRecipient.Address) = LCase$(RemoveAddrList(j)) Then
				Recipients.Remove i
				Exit For
			End If
		Next
	Next
End Sub
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
	On Error Resume Next
	RemoveRecipientsWhenItemSend Item
End Sub

nótaí:

1. Athraigh na seoltaí ríomhphoist sa chód VBA chuig do chuntais ríomhphoist le do thoil.

2. Déan cinnte go bhfuil an rogha Cumasaigh gach macraí cumasaithe. Féach an pictiúr:

3. Cliceáil ar an Sábháil cnaipe agus dún an Microsoft Visual Basic d’Fheidhmchláir fhuinneog.

As seo amach, nuair a sheolfaidh tú ríomhphoist, bainfear seoltaí ríomhphoist sonraithe do chuntais Outlook go huathoibríoch ón mbosca To, Cc nó Bcc go huathoibríoch.

Cliceáil amháin chun mé féin a bhaint as freagra ar fad le Kutools le haghaidh Outlook

Mar a leanas an pictiúr a thaispeántar, chun mé féin a bhaint ó fhreagra uile in Outlook, déan mar a leanas le do thoil.

1. Tar éis duit an cnaipe Reply All a chliceáil chun ríomhphost freagartha a chruthú, cliceáil le do thoil Kutools > Mo Ainmneacha. Féach an pictiúr:

Ansin baintear d’ainmneacha go léir (seoltaí cuntais ríomhphoist) ón mbosca To, Cc nó Bcc láithreach.

Más mian leat triail saor in aisce a bhaint as an bhfóntas seo, téigh chuig íoslódáil saor in aisce na bogearraí ar dtús, agus ansin téigh chun an oibríocht a chur i bhfeidhm de réir na gcéimeanna thuas.