Dé Máirt, Feabhra 14, 2023
  0 Freagraí
  Cuairteanna 2.8K
Tá mé nua do VBA. Táim ag iarraidh ríomhphost a sheoladh nuair a bheidh "Tá" ag cill K isteach.... Tá mé chomh fada seo ach ag streachailt leis an gcéad chéim eile.

Ba mhaith liom an comhlacht ríomhphoist a léamh mar seo thíos:

Dia duit, achoimre ar thogra an tionscadail thíos.

Ainm an tionscadail: *Faisnéis ó chill A*
Cur síos: *cill B*
Réiteach: *cill C*
Sochair: *Cill D*
Costas: *Cill F*
Am: Cill *G*
Riosca: Cill *H*
Custaiméir(í): Cill I
Brand(s): Cill J

Cineál mhéin,

*Cill L*


Seo thíos an cód a d’úsáid mé go dtí seo:


Fo-Bileog Oibre Príobháideach_Change (Sprioc ByVal Mar Raon)
Má tá Target.Cells.Count > 1 Ansin Scoir Fo
Mura bhfuil (Sprioc, Raon ("K:K")) Rud ar bith) Agus (Target.Value = "Tá") Ansin
Cuir glaoch ar Mail_small_Text_Outlook
Deireadh Má
Fo Deireadh
Fo-phost_small_Text_Outlook()
Dim xOutApp Mar Réad
Dim xOutMail Mar Réad
Dim xMailBody Mar Teaghrán
Socraigh xOutApp = CreateObject ("Outlook.Application")
Socraigh xOutMail = xOutApp.CreateItem(0)
xMailBody = "Dia duit ansin" & vbNewLine & vbNewLine &_
"Seo líne 1" & vbNewLine&_
"Seo líne 2"
Ar Lean Earráid Aghaidh
Le xOutMail
.To = "seoladh ríomhphoist"
.CC = ""
.BCC = ""
.Subject = "seol trí thástáil luach cille"
.Comhlacht = xMailBody
.Display’ nó úsáid .Send
Deireadh Le
Ar Earráid TéighTo 0
Socraigh xOutMail = faic
Socraigh xOutApp = faic
Fo Deireadh

Go raibh maith agat, roimh ré, do dhuine ar bith atá in ann cabhrú liom.
Níl aon fhreagraí déanta don phost seo go fóill.