Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
18.04.2024 18:04:29
Formel fehler Wert#
18.04.2024 17:45:21
Shellkommando ausführen, stderr auslesen
18.04.2024 17:41:41
Summe: Bestimmter Bereich mit sverweis
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
276to280
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
276to280
276to280
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Tabellen mit unbekanntem Namen ansprechen

Tabellen mit unbekanntem Namen ansprechen
08.07.2003 10:32:35
Jörg
Hi NG!
Ich such 'ne Möglichkeit in einer Mappe Tabellen durch die Ausschlussmethode anzusprechen.
Ich muss in einer veröffentlichten Mappe mittels eines Patches verschiedene Formeln ändern.
so etwa
If IsNot Sheet.Name("A","B","C").activate
Danke
J

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Tabellen mit unbekanntem Namen ansprechen
10.07.2003 00:36:41
Melanie
Hallo Jörg,
wenn die Blätter alle aus der selben Vorlage stammen,
kannst du doch über den Codenamen des Blattes an die Kopien kommen.
Jedes Blatt hat einen sichtbaren Registernamen und einen VBA-Codenamen.
Standardmäßig sind diese Identisch.
Man kann sie aber auch im Eigenschaftsfenster des Blattes ändern.
Wenn eine Kopie eines Blattes erzeugt wird, erhöht sie die nachstehende
Zahl des Codenamens jeweils um eine Zahl.
Du musst also nur nach dem Namen der Vorlage suchen.
In folgender Prozedur gehe ich davon aus, dass der Codename
deiner Vorlage "Vorlage" lautet.
Ersetzte diesen durch den tatsächlichen, z.B."Tabelle1"

Sub VorlagenKopienFinden()
Dim strVorlage As String
Dim intWs      As Integer
strVorlage = "Vorlage"
For intWs = 1 To Worksheets.Count
With Worksheets(intWs)
If .Name <> strVorlage Then
If Left(.CodeName, Len(strVorlage)) = strVorlage Then
MsgBox "Blatt '" & .Name & "' wurde aus Vorlag erstellt"
End If
End If
End With
Next intWs
End Sub

--
Mit freundlichen Grüßen
Melanie Breden
_____________________
[Microsoft MVP für Excel]

Anzeige
AW: Tabellen mit unbekanntem Namen ansprechen
08.07.2003 10:58:05
RAnton
Hallo Jörg,
verstehe zwar dein Problem nicht aber du kannst doch alle Namen durch die Anweisung
thisworkbook.worksheets(1).name
dir holen.
Mach dir ne loop drumrum und fertig
Gruß
RAnton

AW: Tabellen mit unbekanntem Namen ansprechen
08.07.2003 11:14:50
jörg
Hi RAnton!
In meiner Tabelle werden über Code mittels einer Vorlage vom Benutzer neue Tabellen angelegt und mit Namen versehen(über userform) Da ich aber nicht weiß, wie die user die Tabellennamen vergeben haben, der Fehler in den Formeln aber in der Vorlage liegt, breitet er sich über die Vorlage aus.
Ich möchte in einem Patch daher alle Tabellen, außer denen die nicht durch die Vorlage erstellt wuren, die Formeln in den entsprechenden Zellbeeichen ändern.
Vielleicht hilft die die beigelegte datei:
Über Schaltfl. "Lehrer erstellen" werden aus der ausgeblendeten Vorlage "Lehrer allgemein" die Tabelle erstellt. In dieser Vorlage "Lehrer allgemein" befindet sich der Fehler.
LG
Jörg

Anzeige
AW: Tabellen mit unbekanntem Namen ansprechen
08.07.2003 11:25:11
RAnton
Hallo Jörg,
leider ist keine Datei angehängt.
Aber versuch doch mal den Code

Sub test()
Dim ws As Worksheet
Dim s As Variant
Dim strWSListe(2) As String
strWSListe(0) = "Tabelle1"
strWSListe(1) = "Tabelle2"
strWSListe(2) = "Tabelle3"
For Each ws In ThisWorkbook.Worksheets
For Each s In strWSListe
If s = ws.Name Then
MsgBox ws.Name
End If
Next
Next
End Sub

Der müsste dich doch weiterbringen.
Gruß
RAnton

AW: Tabellen mit unbekanntem Namen ansprechen
08.07.2003 11:18:22
Jörg
Die datei heißt "lehrfächerverteilung leer".
LG jörg

AW: Tabellen mit unbekanntem Namen ansprechen
08.07.2003 11:33:02
RAnton
Hallo Jörg,
das nützt nichts, du must mir den Link geben.
Gruß
RAnton

Anzeige

17 Forumthreads zu ähnlichen Themen

VBA variables Tabellenblatt ansprechen
Stefan

Hallo zusammen,
ich möchte über Eingabe in Zelle A1 bestimmen aus welchem externen Tabellenblatt Daten eingelesen werden sollen. Leider schaffe ich es nicht die Zelle als Variable zu gestalten:
Public Sub data()
Dim objWB As Workbook, objWS As Worksheet, objWSImport As Worksheet, ob...
16.11.2009 16:14:31
Thread-ID: 1117681
8 Beiträge
Anzeige
VBA Zelle auf anderes Tabellenblatt kopieren
Timonski

Servus...
ich hätte gern beim aktivieren einer Tabelle einen bestimmten Teil eines Zellenwert auf einer anderen Tabelle stehen.
Quellezelle auf Tabellenblatt ABRECHNUNG H6
Ziel auf Tabellenblatt INDEX AY1
meine nicht funktionierende Formel :-)
Sheets("Index").Cells(1, 51) =...
20.03.2012 08:03:41
Thread-ID: 1255689
3 Beiträge
andere Mappe Tabellenblatt mit Codename ansprechen
Reinhard

Hallo Wissende,
ich habe gegoogelt, das hiesige Archiv benutzt und rumprobiert. Ergebnislos.
Bzw. Ergebnis ist, ich kam nicht weiter.
ich möchte mit einem direkten Befehl/Codezeile z.B. so
Workbooks("Mappe2").Tabelle3.Range("A1").Value="Huhu"
etwas in die Zelle eintragen, da...
12.06.2012 06:52:43
Thread-ID: 1266999
9 Beiträge
Anzeige
VBA variabilisierter Arbeitsblattname ansprechen
Lisa

Hallo Zusammen.
Ich bin schon kurz vor der Verzweiflung eines wahrscheinlich recht simplen Problems:
Ich hab bisher hinbekommen, dass, wenn das Datum Tag =1 ist, dass es ein neues Arbeitsblatt erstellt und es nach den neuen Monat erstellt.
allerdings hänge ich jett daran, das Blatt...
11.12.2014 15:02:33
Thread-ID: 1397426
3 Beiträge
Tabellen mit ihren Namen ansprechen
Torsten

Ich möchte gerne zwei Tabellenblätter gleichzeitig ansprechen.
Das klappt auch bereits mit folgenden Code: Sheets(Array("Blatt1", "Blatt2")).Select Sheets("Blatt1").Activate
Jedoch sind die Blattnamen vom Nutzer veränderbar, was zum Problem beim Markodurchlauf führt.
Ich möchte...
03.09.2016 15:47:42
Thread-ID: 1512765
4 Beiträge
VBA - Bereiche in anderes Tabellenblatt kopieren
Fred

Hallo VBA Experten,
ich bin mit vba noch nicht soweit, so das ich z.B. mehrere benannte Bereiche in ein anderes Tabellenblatt kopiere, mit der Bedingung, das die Bereiche nebeneinander eingefügt werden, beginnend ab der 2. Zeile.
Also, mal gelistet:
Ich bin in Tabelle „Center“
E...
19.11.2016 23:18:39
Thread-ID: 1525833
13 Beiträge
VBA Formeln in anderes Tabellenblatt schreiben und
Gesa

Hallo zusammen!
Ich benötige mal wieder euer Rudelwissen.
Ich habe eine Datei, in der in Tabelleblatt "Pivot" in den Feldern I4 bis N Zahlen per Formel rauskommen. Nun möchte ich diese Ergebnisse gerne in das Tabellenblatt "Ergebnis S. 1" ab B22 bis G kopieren. Allerdings nur, wenn in d...
21.08.2018 15:06:57
Thread-ID: 1640779
2 Beiträge
VBA - auf anderes Tabellenblatt beziehen
Andy1980

Hallo,
Ich habe eine Ampel mit Hilfe aus diesem Forum gebstalt und würde nun gerne ein Rechteck (auf dem die Farben angezeigt werden), das sich in Tabelle 2 befindet, auf Werte beziehen die sich in Tabelle 1 befinden.
Der VBA Code sieht folgendermaßen aus:
Private Sub Worksheet_Cha...
23.11.2004 17:42:01
Thread-ID: 522019
4 Beiträge

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
7
8
2
8
10
2
3
12
1
3
7
4
9
4
3
2
2