nachdem ihr mir hier im Forum schon das ein oder andere Mal geholfen habt, hätte ich nun nochmals ein kleines Problem, bei dem ich eure Hilfe bräuchte.
1.) Ich verwende in meiner Exceldatei den Befehl zum Laden eines Addins:
Private Sub Workbook_Open()
AddIns("Alle Bertsch-Wasserdampffunktionen Nach IAPWS-IF97").Installed = True
End Sub
Nun finde ich leider den vergleichbaren Befehl beim Öffnen einer UserForm nicht. Ich möchte nämlich, dass Excel mir wenn ich per Button eine Userform aufrufe aus einem Arbeitsblatt einen Datums-Wert ausliest und in einem Textfeld (Name = Datum_Alt) darstellt. Wie muss hier der Befehl lauten?
Mit:
Private Sub Userform_open()
End Sub
funktioniert es leider nicht!
2.) Außerdem würde ich mich freuen, wenn mir jemand den entsprechenden Befehl nennen kann, sodass Excel für den oben genannten Datums-Wert folgende Systematik anwendet.
Der entsprechend gewünschte Datums-Wert findet sich jeweils in der letzten aktuell ausgefüllten Zeile in Spalte B. Mit jedem Mal wo die UserForm aufgerufen wird, wird diese Zeile jedoch um 6 Zeilen weiter unten liegen, da jedesmal 6 Zeilen von Spalte A bis K ausgefüllt werden. Funktioniert es also mit der Funktion:
Me.Controls("Datum_Alt").Value = Sheets("An_Abfahren").Range("B65536").End(xlUp).Value
Mein Problem ist leider, ich kann Punkt 2 nicht testen ohne das Punkt 1 funktiert. Also würde ich mich freuen, wenn mir einer von euch wirklich helfen könnte.
Grüße Manuel
