ich lade eine Userform "frmMeldung" wenn die entsprechende Tabelle (Monatsjournal) angeklickt wird.
Private Sub Worksheet_Activate()
frmMeldung.Show
End Sub
Über einem anderen Button spreche die Tabelle (Monatsjournal) mehrmals mit dem Befehl: Sheets("Monatsjournal").Select an. (Der Button kopiert Daten von einer anderen Tabelle in das Monatsjournal"
Code dieses Buttons:
Private Sub cmdJanuar_Click()
Sheets("Monatsjournal").Select
Hier wird die Userfrom "frmMeldung" angezeigt
Range("A8:G1000").Select
Selection.ClearContents
Sheets("Buchungsjournal").Select
ActiveSheet.ListObjects("tblDaten").Range.AutoFilter Field:=1, Criteria1:= _
xlFilterAllDatesInPeriodJanuary, Operator:=xlFilterDynamic
Selection.SpecialCells(xlCellTypeVisible).Select
Range("A5:G10000").Select
Selection.Copy
Sheets("Monatsjournal").Select
Range("A8").Select
Hier wird die Userfrom "frmMeldung" wieder angezeigt
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Sheets("Buchungsjournal").Select
On Error Resume Next
ActiveSheet.ShowAllData
On Error GoTo 0
Range("A4").Select
Unload Me
Sheets("Monatsjournal").Select
Range("B4").Select
End Sub
Ich möchte erreichen, dass die Userform bei diesem Button nicht angezeigt wird.
Ich hab es mit frmMeldung.Hide und Unload frmMeldung versucht.
Bei frmMeldung.Hide kommt Laufzeitfehler 402 das oberste gebundene Formular muss zuerst geschlossen oder ausgeblendet werden.
Bei Unload frmMeldung erscheint das Userformular frmMeldung trotzdem.
Ich hoffe ich hab mich verständlich ausgedrückt und denke für Euch ist das ein "klacks" ;).
Danke jetzt schon für Eure Hilfe.
Matti63