Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 19:29:30
24.04.2024 18:49:56
Anzeige
Archiv - Navigation
884to888
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
884to888
884to888
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

select case interner Tabellenname

select case interner Tabellenname
10.07.2007 12:54:50
Peter
Guten Tag
Ich möchte gerne mein Select Case auf die internen Tabellennamen beziehen, die in der VBA Umgebung angezeigt werden. Wie ist die Bezeichnung genau - habe ich allenfalls noch andere Überlegungsfehler im untenstehenden Code?
Danke für eine Rückmeldung.
Peter

Sub anzStatus()
Select Case Sheet.Name
Case Is Tabelle11, Tabelle12, Tabelle13, Tabelle14, Tabelle15, Tabelle16, Tabelle17
'mein Code
Case Else
'keine Aktion
End Select
End Sub


3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: select case interner Tabellenname
10.07.2007 13:04:00
Rudi
Hallo,
.CodeName anstatt .Name
und Case "Tabelle11", "Tabelle12", ....
Gruß
Rudi
Eine Kuh macht Muh, viele Kühe machen Mühe

Das war es - vielen Dank! owT
10.07.2007 15:09:00
Peter

AW: select case interner Tabellenname
10.07.2007 13:06:04
c0bRa
Hio...
so sollts gehen:
Code aus Modul Modul1:
Option Explicit
Sub anzStatus()
    'Kladderadatsch
    Dim sheet As Worksheet
    Set sheet = ActiveSheet
    
    'Hier wirds interessant:
    Select Case sheet.Name
    Case "Tabelle11", "Tabelle12", "Tabelle13", "Tabelle14", "Tabelle15", "Tabelle16", "Tabelle17":
        MsgBox "ja"
        'Dein Code
        '........
    Case Else
        MsgBox "nö"
        'keine Aktion
        '........
    End Select
End Sub

Rückmeldung nicht vergessen...
c0bRa
Perl ist die einzige Sprache, die vor und nach einer RSA-Verschlüsselung gleich aussieht.
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige