ich habe mir eine Combobox in ein Sheet (nicht in ein Userform) gesetzt und es mit den Namen aller vorhandenen Sheets gefüllt.
Private Sub Worksheet_Activate()
Dim ws As Worksheet
Dim Auswahl As String
ComboSheets.Clear
For Each ws In Worksheets
ComboSheets.AddItem ws.Name
Next ws
End Sub
Ich habe es auch bewerkstelligen können, dass die Auswahl, die ich in der Box treffeeiner Variable zugewiesen wird, die ich in einem anderen Modul verwende.
Allerdings habe ich nun ein weiteres Problem. Es sollen nicht alle Tabellenblätter angezeigt werden.
In der Mappe gibt es drei Tabellen (Ziel, Quelle, Auswertung), die nicht angezeigt werden sollen.
Weiterhin möchte ich Tabellen, in denen ein bestimmter Wert in einer Zelle steht (IV65000 = schon exportiert) auch nicht anzeigen lassen.
Den Ausschluss mit einem Tabellennamen bekomme ich hin,
If ws.name "ziel" then...
hadere aber mit der Syntax von AND/OR für weitere Bedingungen. Kann mir da nochmal jemand auf die Sprünge Helfen?
Danke und Gruß,
Peter
Gruß,
Peter