volevo comandare outlook dal mio applicativo, ossia voglio che mi sia apra outlook ed attraverso il mio applicativo mi vengano complitai i campi da, to, cc, il campo testo ed il campo oggetto,ho già fatto qualcosa, ma ho dei problemi per modificare il campo DA:
. Ti allego il codice per semplicità

Dim out As Object 'crea variabile oggetto

'assegna Outlook.Application alla variabile oggetto
Set out = CreateObject("Outlook.Application")

With out.CreateItem(olMailItem) 'usando l'oggetto Outlook

'inserisci i destinatari uno alla volta con il metodo Add
'(questi nomi sono fittizi -- sostituirli con nomi a scelta)

.Recipients.Add("xxx@xxx.it").Type = olOriginator

.Recipients.Add("xxx@xxx.it").Type = olTo 'A: campo

.Subject = "Messaggio di prova" 'includi un campo soggetto
.Body = Text1.Text 'copia il testo del messaggio dalla casella di testo

'inserisci gli allegati uno alla volta con il metodo Add

.Attachments.Add "c:\vb6PpP\lezio14\smile.bmp"
'infine, copia il messaggio nella posta in uscita di Outlook con Send

.Send
End With

End Sub