ich bitte euch um eure Hilfe für ein Problem, welches ich selbst nicht lösen kann.
Ich habe eine Userform bei der ich ein bestimmtes Tabellenblatt benötige.
In der Userform_initialize habe ich hierzu folgenden Code:
Dim WB As Workbook
Dim WS1 As Worksheet
Set WB = ThisWorkbook
Set WS1 = WB.Sheets("Buchen")
Aufgrund meines Programmablaufs ist es jetzt jedoch so, das das benötigte Sheet einen immer wieder ändernden Namen hat.
Das benötigte Sheet ist aber immer das Sheet, welches direkt vor dem Sheet ("Hilfstabelle") befindet.
Nun habe ich im Forum einen Hinweis gefunden, wie der Index von diesem Sheet ausgelesen werden kann: "Msgbox ThisWorkbook.Worksheets("Hilfstabelle").Index".
In meinem derzeitigen Programm ist der Index "4"
Logischerweise, nachdem sich mit jedem Einfügen vor der Hilfstabelle der Index ändert, müsste der Code hierzu lauten:
ThisWorkbook.Worksheets("Hilfstabelle").Index -1
Wie kann ich dies mit mit o. a. Set ... verbinden.
Besten Dank
Gruss
Peter