Rij wissen (VBA)

[FrankCed]

Hallo,

Ik zit met een probleem. Ik heb in mijn excel bestand ik een VBA script ingbouwd welke het mogelijk maakt om via een userform een werkblad aan te maken. Aanmaken gaat prima. Wanneer een nieuw werkblad aangemaakt wordt, wordt de naam hiervan in lijst in een apart werkblad gezet. Deze lijst wordt gebruikt om de listbox/combobox in een ander userform te vullen waar aan de hand van een aangemaakt werkblad weer kan worden geopend of verwijderd.

Het verwijderen/openen gaat ook goed, alleen mijn probleem is, dat wanneer ik middels de userform een werkblad verwijder dat de naam van het werkblad in de lijst, en dus ook in de listbox, blijft staan terwijl het werkblad al is verwijderd. Hoe kan ik VBA ook de naam uit de lijst op het aparte werkblad laten verwijderen?

Graag hoor ik van jullie, p.s. onderstaand mijn VBA code voor mijn verwijderknop.

Private Sub cmdVerwijderen_Click()
Dim Usersheet As Object
Set Usersheet = Sheets(cmbVerwijderen.Value)
If Usersheet.Visible Then
Usersheet.Delete
Else
OriginalSheet.Activate
End If
Unload Me
lijstvullen

End Sub

 

[FrankCed]

Mensen,

In de bijlage heb ik voor het gemak ook even het bestandje bijgevoegd.

Met vriendelijke groet,

F.

 

[Wigi]

Frank

waarom loop je niet gewoon door de bladen van het bestand? Dat op een ander blad zetten is niet nodig. Hier is wat code om je aan het werk te zetten:

Sub w()
    Dim ws As Worksheet
    
    For Each ws In Worksheets
        MsgBox ws.Name
    Next
End Sub

Wigi