Note: The other languages of the website are Google-translated. Back to English

Conas ceangaltáin a phriontáil go huathoibríoch nuair a shroicheann ríomhphoist Outlook?

Léiríonn an teagasc seo modh chun script VBA agus riail Outlook a chomhcheangal chun cabhrú leat ceangaltáin de ríomhphoist áirithe a phriontáil go huathoibríoch nuair a thagann siad go Outlook.


Priontáil ceangaltáin go huathoibríoch nuair a thagann ríomhphoist áirithe isteach

Ag cur san áireamh, ba mhaith leat ceangaltáin ríomhphoist a thagann isteach ó sheoltóir áirithe a phriontáil go huathoibríoch. Is féidir leat a dhéanamh mar a leanas chun é a dhéanamh.

Céim 1: Cruthaigh script in Outlook

Ar an gcéad dul síos, ní mór duit script VBA a chruthú in Outlook.

1. Seoladh do Outlook, brúigh an 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 fhuinneog, cliceáil faoi dhó ar Project1 > Microsoft Outlook Object > ThisOutlookSession a oscailt ThisOutlookSession (Cód) fhuinneog, agus ansin cóipeáil an cód seo a leanas isteach sa fhuinneog cód seo.

Cód VBA 1: Priontáil ceangaltáin go huathoibríoch (gach cineál ceangaltán) nuair a thagann ríomhphoist


Sub AttachementAutoPrint(Item As Outlook.MailItem)
'Updated by Extendoffice 20220413
  Dim xFS As FileSystemObject
  Dim xTempFolder As String
  Dim xAtt As Attachment
  On Error Resume Next
  Set xFS = New FileSystemObject
  xTempFolder = xFS.GetSpecialFolder(TemporaryFolder)
  xTempFolder = xTempFolder & "\ATMP" & Format(Now, "yyyymmddhhmmss")
  MkDir (xTempFolder)
  
  'Set Item = Application.ActiveExplorer.Selection.Item(1)
  Set xShell = CreateObject("Shell.Application")
  Set xFolder = xShell.NameSpace(0)
  For Each xAtt In Item.Attachments
    xFileName = xAtt.FileName
    xFileType = LCase$(Right$(xFileName, 4))
    xFileName = xTempFolder & "\" & xFileName
    xAtt.SaveAsFile (xFileName)
      Set xFolderItem = xFolder.ParseName(xFileName)
      xFolderItem.InvokeVerbEx ("print")
  Next xAtt
'xFS.DeleteFolder (xTempFolder)
Set xFS = Nothing
Set xFolder = Nothing
Set xFolderItem = Nothing
Set xShell = Nothing
xError:
  If Err <> 0 Then
    MsgBox Err.Number & " - " & Err.Description, , "Kutools for Outlook"
    Err.Clear
  End If
Exit Sub
End Sub

Nóta: Tacaíonn an cód seo le priontáil gach cineál ceangaltán a fhaightear i ríomhphoist. Mura dteastaíonn uait ach an cineál ceangaltáin sonraithe a phriontáil, mar chomhaid pdf, cuir an cód VBA seo a leanas i bhfeidhm.

Cód VBA 2: Priontáil go huathoibríoch ar an gcineál sonraithe ceangaltán nuair a thagann ríomhphoist

Sub AttachementAutoPrint(Item As Outlook.MailItem)
'Updated by Extendoffice 20220413
  Dim xFS As FileSystemObject
  Dim xTempFolder As String
  Dim xAtt As Attachment
  On Error Resume Next
  Set xFS = New FileSystemObject
  xTempFolder = xFS.GetSpecialFolder(TemporaryFolder)
  xTempFolder = xTempFolder & "\ATMP" & Format(Now, "yyyymmddhhmmss")
  MkDir (xTempFolder)
  
  'Set Item = Application.ActiveExplorer.Selection.Item(1)
  Set xShell = CreateObject("Shell.Application")
  Set xFolder = xShell.NameSpace(0)
  For Each xAtt In Item.Attachments
    xFileName = xAtt.FileName
    xFileType = LCase$(Right$(xFileName, 4))
    xFileName = xTempFolder & "\" & xFileName
    xAtt.SaveAsFile (xFileName)
    Select Case xFileType
    Case "pdf" ‘change “pdf” to the file extension you want to print
      Set xFolderItem = xFolder.ParseName(xFileName)
      xFolderItem.InvokeVerbEx ("print")
     End Select
  Next xAtt
'xFS.DeleteFolder (xTempFolder)
Set xFS = Nothing
Set xFolder = Nothing
Set xFolderItem = Nothing
Set xShell = Nothing
xError:
  If Err <> 0 Then
    MsgBox Err.Number & " - " & Err.Description, , "Kutools for Outlook"
    Err.Clear
  End If
Exit Sub
End Sub

Nóta: Sa líne Cás "pdf", athraigh le do thoil "pdf" chuig an síneadh comhad is mian leat a phriontáil.

3. Téigh ar aghaidh agus cliceáil uirlisí > Tagairtí. Sa popping suas Tagairtí – Tionscadal1 bosca dialóige, seiceáil an Microsoft Scripting Runtime bosca, agus ansin cliceáil ar an OK cnaipe.

4. Sábháil an cód agus brúigh an Eile + Q eochracha chun an Microsoft Visual Basic d’Fheidhmchláir fhuinneog.

Nóta: Cinntigh le do thoil go bhfuil an Cumasaigh gach macra Tá an rogha cumasaithe i do Outlook. Is féidir leat an rogha seo a sheiceáil trí na céimeanna a thaispeántar thíos a leanúint.

Step2: Tóg riail chun an script a úsáid

Tar éis duit an script VBA a chur leis in Outlook, ní mór duit riail a chruthú chun an script a úsáid bunaithe ar choinníollacha áirithe.

1. Téigh go dtí an Baile tab, cliceáil Rialacha > Bainistigh Rialacha & Foláirimh.

2. Sa Rialacha agus Foláirimh bosca dialóige, cliceáil an Riail Nua cnaipe chun riail a chruthú.

Leid: Má tá cuntais ríomhphoist iolracha curtha agat le do Outlook, sonraigh le do thoil cuntas sa Cuir athruithe i bhfeidhm ar an bhfillteán seo liosta anuas áit ar mhaith leat an riail a chur i bhfeidhm. Seachas sin, cuirfear i bhfeidhm é ar bhosca isteach an chuntais ríomhphoist atá roghnaithe faoi láthair.

3. Sa chéad cheann Draoi Rialacha dialóg, roghnaigh Cuir riail ar na teachtaireachtaí a bhfaighidh mé sa 1 Céim bosca, agus ansin cliceáil Seo chugainn.

4. Sa dara ceann Draoi Rialacha bosca dialóige, ní mór duit:

4.1) Sonraigh coinníoll amháin nó níos mó sa 1 Céim bosca de réir do riachtanas;
Sa chás seo, ba mhaith liom a phriontáil ach na ceangaltáin i ríomhphoist ag teacht isteach ó seoltóir sonraithe. Anseo, seiceáilim an ó dhaoine nó ó ghrúpa poiblí bosca.
4.2) Cliceáil ar an luach a bhfuil líne faoi sa 2 Céim bosca chun an riocht a chur in eagar;
4.3) Cliceáil Seo chugainn. Féach an pictiúr:

5. Sa tríú Draoi Rialacha bosca dialóige, ní mór duit a chumrú mar seo a leanas.

5.1) Sa Céim 1: Roghnaigh gníomh(s) alt, seiceáil an script a rith bosca;
5.2) Sa 2 Céim alt, cliceáil ar an téacs a bhfuil líne faoi “script”;
5.3) San oscailt Roghnaigh Script bosca dialóige, cliceáil ar ainm an chóid VBA a chuir tú leis thuas, agus ansin cliceáil Ceart go leor;
5.4) Cliceáil ar an Ar Aghaidh cnaipe. Féach an pictiúr:

Leid: Má tá an “script a rithTá rogha " ar iarraidh i do Draoi Rialacha, is féidir leat é a thaispeáint tríd an modh a luaitear san Airteagal seo a leanúint: a chur ar ais ar iarraidh Rith A Script pption i Outlook riail.

6. Ansin ceann eile Draoi Rialacha pop suas ag iarraidh eisceachtaí. Is féidir leat na heisceachtaí a roghnú más gá, ar shlí eile, cliceáil ar an Ar Aghaidh cnaipe gan aon roghanna.

7. Sa cheann deireanach Draoi Rialacha, ní mór duit ainm a shonrú don riail, agus ansin cliceáil ar an Críochnaigh cnaipe.

8. Ansin filleann sé ar an Rialacha agus Foláirimh bosca dialóige, is féidir leat an riail a chruthaigh tú atá liostaithe taobh istigh a fheiceáil, cliceáil ar an OK cnaipe chun na socruithe iomlána a chríochnú.

As seo amach, nuair a fhaightear ríomhphost ón duine sonraithe, déanfar na comhaid a ghabhann leis a phriontáil go huathoibríoch.


Earraí gaolmhara

Priontála Amháin Ceangaltán(S) Ó Ríomhphost Amháin Nó Ríomhphoist Roghnaithe In Outlook
In Outlook, is féidir leat na ríomhphoist a phriontáil, ach an ndearna tú na ceangaltáin a phriontáil ó r-phost amháin nó ríomhphoist roghnaithe in Outlook? Tugann an t-alt seo isteach na cleasanna maidir leis an bpost seo a réiteach.

Priontáil Ceanntásc Teachtaireacht amháin de Ríomhphost In Outlook
Agus ríomhphost á phriontáil in Outlook, déanfaidh sé ceanntásc teachtaireachta agus comhlacht teachtaireachta sa ríomhphost a phriontáil. Mar sin féin, i gcásanna speisialta áirithe, b'fhéidir nach mbeadh ort ach ceanntásc na teachtaireachta a phriontáil leis an ábhar, an seoltóir, na faighteoirí, etc. Tabharfaidh an t-alt seo isteach dhá réiteach chun é a dhéanamh.

Priontáil Féilire I Raon Dáta Sonraithe/Saincheaptha In Outlook
De ghnáth, nuair a bhíonn féilire á phriontáil i Month view in Outlook, roghnóidh sé go huathoibríoch an mhí ina bhfuil an dáta roghnaithe faoi láthair. Ach, b'fhéidir go mbeadh ort an féilire a phriontáil laistigh de raon dáta saincheaptha, mar shampla 3 mhí, leath na bliana, etc. Tabharfaidh an t-alt seo an réiteach isteach duit.

Priontáil Teagmháil Le Pictiúr In Outlook
De ghnáth, ní phriontálfar pictiúr teagmhálaí nuair a phriontálfar an teagmháil in Outlook. Ach uaireanta, beidh sé níos suntasaí teagmháil lena phictiúr a phriontáil. Tabharfaidh an t-alt seo roinnt réimsí oibre isteach chun é a chur i gcrích.

Priontáil Roghnú Ríomhphost In Outlook
Má fuair tú teachtaireacht ríomhphoist agus má fuair tú amach go bhfuil rogha den ábhar ríomhphoist is gá a phriontáil amach in ionad an teachtaireacht iomlán a phriontáil, cad a dhéanfá? I ndáiríre, is féidir le Outlook cabhrú leat an oibríocht seo a bhaint amach le cabhair ó bhrabhsálaithe idirlín, mar an Firefox agus an Internet Explorer. Tógfaidh mé na brabhsálaithe Idirlín anseo mar shampla. Féach ar na ranganna teagaisc seo a leanas, le do thoil.

Tuilleadh alt faoi "priontáil in Outlook"...


Kutools for Outlook - Tugann sé 100 Gné Ard le Outlook, agus Déan an Obair i bhfad Níos Éasca!

  • Auto CC / BCC de réir rialacha agus ríomhphost á sheoladh; Auto Ar Aghaidh Ríomhphoist Il de réir saincheaptha; Freagra Auto gan freastalaí malairte, agus gnéithe níos uathoibríoch ...
  • Rabhadh BCC - taispeáin teachtaireacht nuair a dhéanann tú iarracht gach ceann a fhreagairt má tá do sheoladh ríomhphoist ar liosta BCC; Meabhraigh Nuair a bhíonn Ceangaltáin ar Iarraidh, agus gnéithe meabhrúcháin níos mó ...
  • Freagra (Gach) Leis na Ceangaltáin Uile sa chomhrá poist; Freagair go leor Ríomhphost i soicindí; Beannacht Auto Cuir leis nuair a thabharfar freagra; Cuir Dáta leis san ábhar ...
  • Uirlisí Ceangail: Bainistigh Gach Ceangaltán i ngach Ríomhphost, Auto Dícheangail, Comhbhrú Gach, Athainmnigh Uile, Sábháil Gach ... Tuarascáil Thapa, Líon Ríomhphoist Roghnaithe...
  • Ríomhphoist Cumhachtacha Junk de réir saincheaptha; Bain Ríomhphoist agus Teagmhálacha Dúblacha... Cuir ar do chumas déanamh níos cliste, níos gasta agus níos fearr in Outlook.
kutools lámhaigh dearcadh kutools tab 1180x121
kutools lámhaigh dearcadh kutools móide cluaisín 1180x121
 
Sórtáil tuairimí de réir
Comments (2)
Níl rátálacha ar bith fós. Bí ar an gcéad duine a rátáil!
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit

j ai suivi a la lettre votre methode pour imprimez automatiquement lesz píosaí jointess

activez les macros mais il nya pas de macra

donc ca ne fonctionne pas ou il me manque un eilimint

trócaire orm go díreach svp
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Haigh,
Tar éis an Cumasaigh gach macra rogha i bhfuinneog an Ionaid Iontaobhais, ní mór duit Outlook a atosú chun an cód a ghníomhachtú.
Níl aon tráchtanna curtha suas anseo go fóill
Fág do chuid tuairimí
Ag postáil mar Aoi
×
Ráta an post seo:
0  Carachtair
Suímh Molta