Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Prüfung von vorhandenen Tabellen

Forumthread: Prüfung von vorhandenen Tabellen

Prüfung von vorhandenen Tabellen
vorhandenen
mahlzeit,
If Sheets("Konfiguration").Exists Then
Sheets("Konfiguration").Select
Else
Sheets.Add.Name = "Konfiguration"
Sheets("Konfiguration").Select
End If
Fehler-Ausgabe in der ersten Zeile: Index außerhalb des gültigen Bereiches.
ich glaub es liegt an dem Befehl, hab ihn irgendwo aufgeschnappt.
gruß
KibbA
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Prüfung von vorhandenen Tabellen
22.10.2010 12:39:03
vorhandenen
Hallo,
die .Exists-Eigenschaft gibt es nicht für Sheets.
Sub tt()
Dim wks As Worksheet
On Error Resume Next
Set wks = Worksheets("Konfiguration")
On Error GoTo 0
If wks Is Nothing Then
Worksheets.Add.Name = "Konfiguration"
Else
wks.Activate
End If
End Sub

Gruß
Rudi
Anzeige
Danke *owT
22.10.2010 13:07:41
KibbA
Danke *owT

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige