Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 21:51:33
Idee für Grafik
26.04.2024 21:29:07
PQ zufällige Reihenfolge
26.04.2024 17:18:47
Große Datenmenge in komplexes Diagramm verpacken
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1548to1552
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
1548to1552
1548to1552
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Worksheetnamen ermitteln - nur eine benannte Zelle

Worksheetnamen ermitteln - nur eine benannte Zelle
27.03.2017 12:33:56
Burkhard
Hallo miteinander,
ich möchte von einem beliebigen Tabellenblatt aus den Namen eines anderen Tabellenblattes ermitteln. Alles, was ich von dieser "Ziel"-Tabelle weiß, ist, dass es dort eine benannte Zelle "Eingabe" gibt.
Nun wollte ich also zuerst diese Zelle anspringen/aktivieren, dann hätte ich mit ActiveSheet.Name das Ergebnis ja auf dem Präsentierteller. Nur: mit Application.Goto "Eingabe" oder Range("Eingabe").Parent.Activate bekomme ich VBA-Fehler.
Wie kann ich eine benannte Zelle in einem unbekannten Arbeitsblatt aktivieren?
Grüße
Burkhard

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Worksheetnamen ermitteln - nur eine benannte Zelle
27.03.2017 12:53:03
ChrisL
Hi Burkhard
z.B. so...
Sub t()
With Range("EinName")
Worksheets(.Parent.Name).Activate
Range(.Address).Select
End With
End Sub
cu
Chris
AW: Worksheetnamen ermitteln - nur eine benannte Zelle
27.03.2017 16:31:32
Burkhard
Hallo Chris,
ich fürchte, ich kann auf das Range-Objekt nicht zugreifen, ohne VORHER das zugehörige Worksheet benannt zu haben - die "With Range"-Zeile bringt sofort einen Fehler.
(Der Code wird in einem Modul ausgeführt; es ist ein anderes als das gesuchte sheet aktiv. Wenn das gesuchte sheet aktiv ist, funktionieren alle möglichen Varianten, auch die, die ich eingangs erwähnt hatte.)
Eigentlich wollte ich vermeiden, alle worksheets durchzunudeln, um dasjenige herauszufinden, in dem diese benannte Zelle vorkommt, um dann den Namen zu bekommen. Scheint wohl nicht anders zu gehen ... :-(
Sonst noch irgendwelche Ideen?
Grüße
Burkhard
Anzeige
AW: Worksheetnamen ermitteln - nur eine benannte Zelle
27.03.2017 17:29:26
ChrisL
Hi Burkhard
Bei mir funktioniert es (in XL2007) ohne Probleme.
Vermutlich kommt es drauf an, wie du den Namen definiert hast. Bei mir steht da z.B.
=Tabelle2!A1
Wenn du nur =A1 machst, dann besteht natürlich kein Bezug zur Tabelle.
Ansonsten lade eine Beispieldatei und gib deine Excel-Version an.
cu
Chris
AW: Worksheetnamen ermitteln - nur eine benannte Zelle
27.03.2017 18:33:37
Burkhard
Hallo Chris,
der Name hat im Namens-Manager durchaus einen Bezug (User-Gruppen ist die Tabelle und A314 ist die Zelle) - allerdings nicht im Namen selber, oder wie ist das gemeint? Ich kann an den Namen übrigens nix mehr ändern, die habe ich "geerbt".
Userbild
Ich habe inzwischen auch eine ganz passable Schleife über die worksheets, da wird nix aktiviert oder selektiert, das müsste also ganz flott gehen. Auch wenn mir die Sprungmarke (aus Prinzip) nicht so doll gefällt - es funktioniert:
Public Function getSheetName() As String
Dim wks As Worksheet
getSheetName= ""
On Error GoTo NextFor
For Each wks In ThisWorkbook.Worksheets
If wks.Range("Eingabe").Cells = "Eingabe" Then
getSheetName= wks.Name
Exit For
End If
NextFor:
Next
End Function
Grüße
Burkhard
Anzeige
AW: Worksheetnamen ermitteln - nur eine benannte Zelle
28.03.2017 08:34:03
ChrisL
Hi Burkhard
Im grauen Feld Bereich, hast du "User-Gruppen" stehen. Mit "Arbeitsmappe" ginge es.
cu
Chris
AW: Worksheetnamen ermitteln - nur eine benannte Zelle
28.03.2017 09:25:15
Burkhard
Hallo Chris,
oh sh...! Aber, wie gesagt, ich kann an den Namen nichts mehr ändern, und mein "Workaround" funktioniert ganz passabel.
Trotzdem vielen Dank für deine Hilfe!
Grüße
Burkhard
AW: Worksheetnamen ermitteln - nur eine benannte Zelle
27.03.2017 13:03:33
Nilo
Moin Burkhard,
Suchbegriff in "A1"
Ausgabe Tabellenblatt "B1"
oder anpassen!
Sub Schaltfläche1_Klicken()
Dim raZelle As Range
Dim inZeile As Integer
Dim strTabellen As String
Dim wsTabelle As Worksheet
For inZeile = 1 To IIf(IsEmpty(Cells(Rows.Count, 1)), Cells(Rows.Count, 1).End(xlUp).Row, _
Rows.Count)
For Each wsTabelle In ThisWorkbook.Worksheets
If wsTabelle.Name  "Tabelle1" Then
With wsTabelle
Set raZelle = .UsedRange.Find(Cells(inZeile, 1), , , xlWhole, , xlNext)
If Not raZelle Is Nothing Then strTabellen = strTabellen & ", " & wsTabelle. _
_
Name
End With
End If
Next wsTabelle
Cells(inZeile, 2) = Mid(strTabellen, 3)
strTabellen = ""
Next inZeile
Set raZelle = Nothing
End Sub

Anzeige

315 Forumthreads zu ähnlichen Themen

per Makro passwortgeschützes PDF erstellen
Frank

Hallo!
Ich hoffe mal wieder aud fachkundige Hilfe. Bei meinem aktuellen Projekt müssen aus Excel heraus täglich viele passwortgeschützte PDF-Doumente erstellt werden. Das Passwort ist immer gleich. Es geht lediglich darum die Dateien vor unautorisiertem Zugriff zu schützen, falls jemand das...
15.08.2008 09:20:00
Thread-ID: 1002042
3 Beiträge
Anzeige
Inhalt einer Zelle im Windows Infobereich anzeigen
Thomas

Hallo,
kann ich den Inhalt einer Zelle im Windows Infobereich anzeigen lassen?
Ich habe eine VBA-Anwendung, die mir den Verarbeitungsstatus in einer Zelle anzeigt.
Weil die Verarbeitung sehr lange dauert möchte ich zwischendurch mit anderen Anwendungen arbeiten und unten rechts nebe...
27.08.2008 17:50:23
Thread-ID: 1005163
3 Beiträge
Formel immer nur in bestimmter Zelle
Katrin

Hallo Zusammen!
Folgendes Problem würde ich gerne lösen, weiß aber nicht wie :)
Ich habe in Spalte A in jeder Zeile Uhrzeiten stehen:
00:15:00
00:30:00
00:45:00
01:00:00
01:15:00
01:30:00
01:45:00
02:00:00
02:15:00
02:30:00
02:45:00
...
02.09.2008 10:30:00
Thread-ID: 1006672
3 Beiträge
Anzeige
Kommenare beim Klick in die leere Zelle anzeigen?
Selma

Hallo Leute,
ich möchte in Zellen der Spalte E und Spalte F die Kommmentare als errechnete Werte beim Klick in die Zelle anzeigen, wenn diese Zelle leer sind. Sind die Zelle gefüllt, dann soll der Kommentar nicht angezeigt werden.
Die Voraussetzung ist, dass in Zelle der Spalte D die Za...
11.10.2008 12:17:00
Thread-ID: 1015730
8 Beiträge
Makro nur in bestimmten Zellen
TomTom

Hi,
der folgende Code soll in der Spalte Q das Datum umformatieren. Nun habe ich aber auch in der Spalte Q auch leere Zellen drin und der Code schreibt dann in die leeren Zellen immer 01.01.1900 rein, obwohl sie eigentlich leer bleiben sollen.
Wie kann man den Code ändern, dass leere Ze...
13.11.2008 08:56:51
Thread-ID: 1024041
5 Beiträge
zählenwenn nur auf Teil einer Zelle basierend?
Sascha

Hallöchen,
folgendes Problem,
ich habe eine Artikelerfolgsauflistung (Alpha-Numerisch gefüllte Zellen) über den Bereich Tabelle3!A2-G99.
Über eine Lagerbestandsliste in Tabelle1!B2-B99, die ich per copy/paste täglich aktualisieren kann zählt mir das Programm automatisch die Menge, i...
13.11.2008 12:08:25
Thread-ID: 1024134
10 Beiträge
Zahl 1 bis 7 nur in Zelle eintragen dürfen
Korl

Hallo,
ich möchte in einem Zellbereich z.B. "B7:BI103" in den jeweiligen Zellen nur die Zahlen von "1 bis"7 eintragen dürfen und sofort den Cursor in der jeweiligen Zeile um eine Zelle nach rechts setzen lassen ohne "Enter" tippen zu müssen.
Den Bereich könnte ich mit Gültigkeitskriteri...
17.11.2008 19:55:00
Thread-ID: 1025380
8 Beiträge
Makro: PDF-Drucken automatischer Dateiname
Stewie

Hallo,
ich habe ein Makro erstellt, mit welchem ich meine Tabellenblatt mittels PDF-Maker "drucken" kann.
Funktioniert soweit auch ganz gut, nur muss ich den Dateinamen noch von Hand eingeben.
Ich möchte gerne, dass mir der Text von 2 Zellen in meiner Tabelle als Dateiname benutzt w...
18.11.2008 11:14:00
Thread-ID: 1025556
3 Beiträge
Anzeige

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
2
3
2
2
5
7
4
9
7
2
2
2
2
1
5
3
5
4
3
1
8
3
13
3
2