Merhaba,
Ben Access 2010 tr kullanıyorum. form üzerine bir buton ekledim. bu butona basınca otomatikmen Outlook takvim çıkıyor ve kime kısmına formdaki Metin7 kutusunun içindeki mailleri Outlook kime kısmına ekliyor. Ben bu işlemi,
Outlook takvim kısmı değil de Yeni Eposta (ileti) penceresi çıksın ve Metin7 deki mailleri kime kısmına (gizli olanına, bcc ye) eklemesini istiyorum. Kod aşağıdadır, bu kodu nasıl düzeltebiliriz?
teşekkür ederim, saygılarımla.

KOD:
Private Sub Metin555_Click()

DoCmd.RunCommand acCmdSaveRecord
   Dim outobj As New Outlook.Application
   Dim outappt As Outlook.AppointmentItem
   On Error Resume Next
   
   Set outobj = GetObject(, "Outlook.Application")
  
   If Err <> 0 Then
   Set outobj = CreateObject("Outlook.Application")
   Err.Clear
   End If
  
   Set outobj = CreateObject("Outlook.Application")
   Set outappt = outobj.CreateItem(olAppointmentItem)
           With outappt
                .Start = CDate(Me.Metin193) - "1" & " " & CDate("0,4375")
                .Duration = "1440"
                .Subject = "" & Me.Metin16
                .Body = "" & Me.Metin7
                .MeetingStatus = olMeeting
                .Recipients.Add (Me.Metin321)
                .ReminderMinutesBeforeStart = "60"
                .ReminderSet = True
                .Save
           End With
          
   outappt.Display
End Sub