Outlook randevu atama

[mkucagri]

Arkadaşlar merhaba

Ekli dosyadaki Herşey atılabiliyor fakat bir türlü katagori atamasını yapamadım.
Dosya ekte

 

[mancubus]

merhaba.

.cat[COLOR="Red"]a[/COLOR]gor[COLOR="red"]y[/COLOR] = Cells(i, 9)

satırını

.Cat[COLOR="red"]e[/COLOR]gor[COLOR="Red"]ies[/COLOR] = Cells(i, 9)

ile değiştirdiğinizde sorun çözülüyor mu?

 

[mkucagri]

Tamamdır. Yardımın için çok teşekkürler

 

[mkucagri]

Mesasjı bir arkadaşıma daha göndermek istiyorum. Gönderilen kısmına mail adresi atamak için tanımla nasıl olur.
örnek
.xxxxxx = cells (i, 10) yapacağım fakat xxxxxx kısmı ne olmalı
bu konudada yardım edersenizi sevinirim.

 

[mancubus]

sen sağol.

aşağıdaki gibi deneyebilirsin.
ben ikişer mail adresi ekledim, sen kendine göre uyarla. mail adresleri hücreden de alınabilir. senin örnekteki gibi.

.RequiredAttendees = "aaa.bbb@mail.com;ccc.ddd@mail.com" 'zorunlu katılımcı
.OptionalAttendees = "eee.fff@mail.com;ggg.hhh@mail.com" 'opsiyonel katılımcı
.Display 'görüntülemek için
'.Send 'göndermek için

 

[omurdeep]

merhaba,

buraya şu eklenebilirmi? ok yazan kısımları boş olanları outlooka eklesin diğerlerini pas geçsin.