Hallo allemaal,
Ik heb een stukje vba waarbij er een test moet komen of er 2 tabbladen zijn.
Zo ja dan moet het 2e tablad verwijdert worden.
De code die ik gemaakt heb werkt echter niet goed
Hij is namelijk altijd waar
Dus ergens zit iets niet goed
Heeft iemand enig idee wat ik fout doe?
Ik heb een stukje vba waarbij er een test moet komen of er 2 tabbladen zijn.
Zo ja dan moet het 2e tablad verwijdert worden.
De code die ik gemaakt heb werkt echter niet goed
Hij is namelijk altijd waar
Dus ergens zit iets niet goed
Code:
If Sheetcount < "2" Then
Sheets.Add After:=Sheets(Sheets.Count)
Else
Application.DisplayAlerts = False
Worksheets(2).Delete
Application.DisplayAlerts = True
End If
Heeft iemand enig idee wat ik fout doe?