Erste Frage:
Wie kann ich in folgendem Code - Schnipsel
With Worksheets("Adressen")
avntValues = .Range(.Cells(3, 1), .Cells(500, 17)).Value
End With
aus .Cells(500, 17)) machen, dass dies immer nur die letzte befüllte Zelle in Spalte 17 ist, so dass er nicht bis zur Zeile 500 suchen muss? Meine Versuche scheiterten alle kläglich.
Zweite Frage:
In einer TextBox (TBEMaipriv) steht wie es der Name schon sagt, 'ne E-Mail Adresse. Nun soll beim Eintragen in das dafür vorgesehene Tabellenblatt dies auch als E-Mail eingetragen werden. Wie muss die entsprechende Zeile lauten?
Ich danke euch schon jetzt für die Hilfe!
Gruß Frank H.