Mail-Makro mit Adresse
29.05.2007 11:10:28
serge
ich komme nicht weiter!
ich speichere ein Tabelleblatt ("Rechnung")aus meiner Mappe ("Analysenmanagement.xls").und versende es über Mail. Das klappt soweit.
Sub rechnung()
Sheets("Rechnung").Select
Sheets("Rechnung").Copy
ChDir "K:\Keller"
ActiveWorkbook.SaveAs Filename:="K:\Keller\Rechnung.xls", FileFormat:= _
xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
, CreateBackup:=False
Application.Goto Reference:="link"
Application.Dialogs(xlDialogSendMail).Show
Windows("Analysenmanagement.xls").Activate
Application.Goto Reference:="link"
Windows("Rechnung.xls").Activate
ActiveWorkbook.Close
End Sub
Da habe ich mein Problem:
Application.Dialogs(xlDialogSendMail).Show
Ich möchte dass die Mailadresse aus der Zelle mit Name "link" mitgenommen wird.
(Ich arbeite mit LotusNote)
Wie stelle ich das an?
Ich danke euch für jede Hilfe!
Gruss Serge
Anzeige