Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1252to1256
1252to1256
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zellenname und Sheetname vergleichen

Forumthread: Zellenname und Sheetname vergleichen

Zellenname und Sheetname vergleichen
Marco
Liebe Excel - Gemeinde,
ich habe ca. 150 Sheets in einer Arbeitsmappe und möchte das der Sheetname gleich dem Inhalt
in Zelle B1 ist. Kann mir hier jemand helfen?
vielen Dank und viele Grüße
Marco
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Zellenname und Sheetname vergleichen
09.03.2012 07:58:30
Erich
Hi Marco,
es wird nocht so ganz klar, was du möchtest.
Willst du nur prüfen, ob in B1 der Blattname steht?
Oder willst du dafür sorgen, dass in B1 immer der Blattname steht?
Hier kannst du beides sehen:
myName

 BC
1myName 
2  
3 WAHR
4 Der Text in B1 ist der Blattname.

Formeln der Tabelle
ZelleFormel
B1=TEIL(ZELLE("Filename";$A$1); FINDEN("]";ZELLE("Filename";$A$1))+1;31)
C3=B1=TEIL(ZELLE("Filename";$A$1); FINDEN("]";ZELLE("Filename";$A$1))+1;31)
C4="Der Text in B1 ist"&WENN(B1=TEIL(ZELLE("Filename";$A$1); FINDEN("]";ZELLE("Filename";$A$1))+1;31); "";" nicht")&" der Blattname."


Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4
Nebenbei: Der Zellenname von B1 ist: B1
Rückmeldung wäre nett! - Grüße aus Kamp-Lintfort von Erich
Anzeige
AW: Zellenname und Sheetname vergleichen
09.03.2012 08:31:59
Marco
Hallo Erich,
Du hast völlig recht ich habe mich wieder zu schnell und zu undeutlich ausgedrückt.
Ich möchte gern, daß der Blattname der Zellinhalt von B1 des jeweiligen Sheets ist.
Noch viel schöner wäre es, wenn sich der Inhalt in B1 ändert sich auch sofort der Blattname anpaßt.
Vielen Dank für Deine Hilfe
Marco
Anzeige
AW: Zellenname und Sheetname vergleichen
09.03.2012 08:37:22
fcs
Hallo Marco,
so eine Umbenennung geh nur manuell oder per Makro.
Gruß
Franz Sub TabName_gleich_ZelleB1() Dim strTabname As String, wks As Worksheet, wks2 As Worksheet Dim iIndex As Integer, iZusatz As Integer For iIndex = 1 To ActiveWorkbook.Worksheets.Count Set wks = ActiveWorkbook.Worksheets(iIndex) strTabname = wks.Range("B1").Text If strTabname "" Then If LCase(wks.Name) LCase(strTabname) Then 'Prüfen, ob Blattname schon vorhanden If fncCheckSheet(strTabname) = True Then Set wks2 = Worksheets(strTabname) If wks.Index strTabname Then wks.Name = strTabname End If Else MsgBox wks.Name & ": Zelle B1 ist leer, Blatt kann nicht umbenannt werden!", _ vbInformation + vbOKOnly, "Tabellenblätter umbenennen" End If Next End Sub Function fncCheckSheet(varBlatt, Optional wb As Workbook) As Boolean 'Prüft ob Blatt in Arbeitsmappe vorhanden Dim objSheet As Object On Error GoTo Fehler If wb Is Nothing Then Set wb = ActiveWorkbook fncCheckSheet = True Set objSheet = wb.Sheets(varBlatt) Fehler: With Err Select Case .Number Case 0 'Alles ok Case Else fncCheckSheet = False End Select End With End Function
Anzeige
AW: Zellenname und Sheetname vergleichen
09.03.2012 08:43:35
Marco
Hallo Franz,
das ist genau das was ich gesucht habe.
Habe eben getestet und es funktioniert hervorragend.
vielen vielen Dank für Deine Hilfe
ein schönes Wochenende
Marco
AW: Zellenname und Sheetname vergleichen
09.03.2012 10:08:15
Marco
Hallo Franz,
das ist genau das was ich gesucht habe.
Habe eben getestet und es funktioniert hervorragend.
vielen vielen Dank für Deine Hilfe
ein schönes Wochenende
Marco
Anzeige
;

Forumthreads zu verwandten Themen

7 a in eine Zelle schreiben
Kai

Hallo zusammen,
wie bekomme ich es hin, in eine Zelle "7 a" (7 Leerzeichen a) zu schreiben? Excel macht mir dann immer 7:00 AM daraus oder 0,29...
Danke
07.08.2008 16:45:31
Thread-ID: 1000024
6 Beiträge
Anzeige
Userform Textboxinhalte in Zellen schreiben
Gerd

Guten Tag zusammen!
Bitte helft mir bei folgendem Problem:
In einer Userform habe ich eine ganze Reihe Textboxen, in die zum größten Teil Zahlen eingegeben werden.
Nun ist ja bekannt, dass beim Schreiben in Zellen der Inhalt der Textboxen als Text interpretiert wird. Mit der Anweisu...
11.08.2008 14:33:59
Thread-ID: 1000866
3 Beiträge
Userform Textboxinhalte in Zellen schreiben
Gerd

Guten Tag zusammen!
Bitte helft mir bei folgendem Problem:
In einer Userform habe ich eine ganze Reihe Textboxen, in die zum größten Teil Zahlen eingegeben werden.
Nun ist ja bekannt, dass beim Schreiben in Zellen der Inhalt der Textboxen als Text interpretiert wird. Mit der Anweisu...
11.08.2008 14:34:08
Thread-ID: 1000867
5 Beiträge
Anzeige
unterschiedliche Buchstaben in Textzellen finden
Rob

Liebe xls-Profis,
ich muss Kunden-Stammdaten von 2 Datenbanken vergleichen u habe folgende Aufgabe:
2 Textzellen miteinander vergleichen und Unterschiede finden und markieren.
Einfache Beispiele:
A1 B1
Huber Hubber hier sollte in der Zelle B1 z.B. mit be...
20.08.2008 10:26:10
Thread-ID: 1003114
8 Beiträge
Mit VBA In Zelle Excelformel schreiben
Gho-Reg

Hi Leute
Ich habe hier diesen netten VBA Code geschrieben und leider wie solls auch anders sein kommt dauernd eine Fehlermeldung :)
CODE:
rowbeforeinteger = 2
Dim text As String
text = "=IF(" & epsoldcolumn & rowbeforeinteger & "=""x"";1;0)+IF(" & emailsoldco...
25.08.2008 11:08:33
Thread-ID: 1004403
6 Beiträge
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
Worksheet über Codename ein/ausblenden
Reinhard

Hallo Wissende,
geht es auch direkt ein Worksheet anhand des Codenamen ein/auszublenden?
Eine Schleife kriege ich hin, die alle Blätter durchläuft und wenn der gesuchte Codename gefunden ist dieses Blatt/Worksheet aus/einblendet.
Meine Frage ist also, geht das auch ohne Schleife?
28.08.2008 16:28:02
Thread-ID: 1005518
6 Beiträge
Anzeige
Arbeitsblattnamen in Zelle auslesen
Lemmi

Hallo zusammen,
ich möchte ein Arbeitsblatt auf das vorher gehende Arbeitsblatt referenzieren!
Meine Datei ist folgendermaßen Strukturiert:
Arbeitsblatt 1 : Tabelle A
Arbeitsblatt 2 : Tabelle A+ Adressen
Arbeitsblatt 3 : Tabelle B
Arbeitsblatt 4 : Tabelle B+ Adressen
30.08.2008 07:38:00
Thread-ID: 1006010
6 Beiträge
Sheet-Name einer Variablen zuweisen
TommiH

Hallöchen,
hmm, bei dieser Variante bekomme ich eine Fehlermeldung, die mir allerdings nicht wirklich hilft, den Fehler zu finden. Was mache ich da falsch?
Dim v1 As String
v1 = ActiveSheet.Name
Sheets.Add After:=v1
ActiveSheet.Name = "Dummy"
Worksheets(v1).Activate
...
01.09.2008 11:04:00
Thread-ID: 1006356
4 Beiträge
Anzeige
Tabellenblattname in Zelle eintragen
obelix-xxl

Hallo,
ich habe mir eine Tabellenblatt als Vorlage erarbeitet und dieser Tabelle auch den Namen Vorlage gegeben.
Mit einem Makro kann ich nun über die zugewiesene Tastenkombination diese Tabelle an das Ende der Arbeitsmappe kopieren. Dabei fragt das Makro nach dem Tabellenblattnamen. Di...
04.09.2008 21:27:29
Thread-ID: 1007526
3 Beiträge
Zellinhalt aufgrund Sheetname und Zelle ermitteln
Peter

Guten Tag
Wahrscheinlich stehe ich mir selbst auf der Leitung.
Mit Hilfe der String-Variablen strTab (enhaltend der Worksheet-Name) und strZelle (enthaltend die Zelladresse, z.B. A3) möchte ich den Wert der entsprechenden Zelle (Text) ermitteln und der Variable strContent zuweisen.
...
11.09.2008 10:31:00
Thread-ID: 1009001
3 Beiträge
Namen anderer Excel-Datei in Zelle übernehmen
alphaomega

Hallo,
ich habe hier Excel 2002 und 12 Excel-Dateien mit den Namen 2008-01, 2008-02, ..., 2008-12.xls.
Nun möchte ich eine weitere Excel-Datei als Übersicht anlegen, wo einige Daten aus den o.g. Zellen übernommen werden sollen. Wie das geht, weiß ich bereits: Das geht manuell durch copy...
19.09.2008 10:33:37
Thread-ID: 1010950
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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