Hallo Chris,
hallo zusammen,
leider konnte ich den nachfolgenden Inhalt nicht zu dem vorhandenen Thread hinzufügen. Deshalb habe ich einen neuen Eröffnet :-).
Zunächst einmal möchte ich mich für die Hilfestellung von Chris und Oberschlumpf bedanken. Hab wieder einiges gelernt.
Habe mein Konzept nochmals überarbeitet und mich von den Checkboxen verabschiedet. So konnte ich mich auch vor dem Klassenmodul drücken :-). Werde mir diese Thematik jedoch in einer ruhigen Minute mal zu Gemüte führen.
Die Funktion Intersect habe ich noch nicht ganz verstanden. Sie liefert ja ein Schnittmenge z.B.
Intersect(A1:A3;A3:A6)...würde als Ergebnis A3 liefern als ein Range, soweit habe ich es verstanden.
Wie verhält es sich hier:
Private Sub Worksheet_Change(ByVal Target as Range)
Set Target = Intersect(Target, Range("A1:A3"))
Ist Target dann nothing, wenn ich z.B. A1="" eintrage? Target kann also nur not nothing oder nothing sein richtig?
Habe noch eine kurze weitere Frage, wenn ich Outlook aus Excel heraus anspreche und es in Outlook nur ein Konto gibt muss ich dann trotzdem
With myMsg
.SendUsingAccount = .Session.Accounts.Item("test1@gmx.de")
End With
verwenden oder lasse ich die Zeile dann einfach weg?
Gruß
Timm