Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.04.2024 19:22:16
Von exceltabelle in word per steuerelement temarker
16.04.2024 18:50:53
Fehlermeldung bei Code - Excel speichern mit Bez. aus Zelle
16.04.2024 17:18:01
Projektplan-Tabelle oder Gantt ohne Balken
16.04.2024 17:05:25
formatierten Text direkt in Zelle einfügen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
912to916
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
912to916
912to916
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Blatt mit aktuellem Zellennamen einblenden

Blatt mit aktuellem Zellennamen einblenden
10.10.2007 21:44:20
Rötti
Hallo Forum,
ich möchte gerne das Blatt mit dem Namen der aktuellen Zelle einblenden. Also ungefähr sowas:

Sheets(ActiveCell.Value).visible = true


Aber da klappt leider nicht...kann mir jemand helfen?
Vielen Dank und beste Grüße,
Rötti

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

Betreff
Datum
Anwender
Anzeige
Müsste eigentlich klappen...
10.10.2007 21:59:00
{Boris}
Hi,
...wenn tatsächlich die ActiveCell den exakten Blattnamen enthält.
Solltest Du Deinen Blättern hingegen numerische Namen gegeben haben - z.B. 1 - dann funktioniert die Value-Eigenschaft nicht, weil die Sheet-Bezeichnung einen String erwartet.
In diesem Fall - und auch für die anderen Fälle - ist es dann besser, die Text-Eigenschaft zu verwenden:
Sheets(ActiveCell.Text).Visible = True
Grüße Boris

Sheets erwartet nicht unbedingt einen String
10.10.2007 22:07:00
NoNet
Hey {Boris},
m.E. erwartet Sheets() alsArgument nicht unbedingt einen STRING, sondern eher einen VARIANT, denn auch Sheets(1).Visible=TRUE funktioniert ja !
Bei mir (EXCEL 2003) funktioniert Sheets(Activecell.Value).visible=true übrigens auch dann, wenn die aktive Zelle einen numerischen Wert (z.B. 2) enthält !
Gruß, NoNet

Anzeige
Ich hab auch xl2003...
10.10.2007 22:14:00
{Boris}
Hi Nonet,
...und ich muss die Text-Eigenschaft verwenden!?
Grüße Boris

Neee, oder ? - Ich fass' es nicht...
10.10.2007 22:26:00
NoNet
Hey {Boris},
installierte Excel-Versionen gleichen sich anscheinend "wie ein Ei dem anderen" : Auf den ersten Blick GLEICH, aber bei genauem Hinschauen doch sehr verschieden ;-)
Teste das bitte mal mit dieser Mappe (bei mir klappt das damit einwandfrei) :
https://www.herber.de/bbs/user/46671.xls
Gruß, NoNet
PS : Habe Excel 2003 SP2, das kürzlich erschienene SP3 noch nicht installiert....

Da haben wir uns falsch verstanden...
10.10.2007 22:35:17
{Boris}
Hi Nonet,
es ging mir nicht um den Index des Blattes, sondern um den Blattnamen.
Heißt das Blatt zum Beispiel 12345 und in der ActiveCell steht die Zahl 12345, dann funktioniert
Sheets(ActiveCell.Value).Visible = True
nicht. Es geht dann nur
Sheets(ActiveCell.Text).Visible = True
Über den Index geht´s natürlich auch bei mir mit .Value.
Grüße Boris

Anzeige
AW: Blatt mit aktuellem Zellennamen einblenden
10.10.2007 22:05:03
Daniel
Hi
ganz einfach.
für das Sheet hat die Eigenschaft VISIBLE 3 mögliche zustände.
daher wird .VISIBLE nicht über die boolschen Werte TRUE/FALSE gesteuert, sondern über normale Zahlen.
dh. du brauchst folgenden Code:

Einblenden: Sheets(ActiveCell.Value).visible = -1
Ausblenden: Sheets(ActiveCell.Value).visible = 0


TRUE/FALSE entsprechen zwar diesen Werten, werden aber nur in Berechnungen als Zahl erkannt, dh. 


Sheets(ActiveCell.Value).visible = true*1


funktioniert dann auch, weil TRUE * 1 durch die Multiplikation mit 1 von einer boolschen in eine Ganzahl gewandelt wird. (ist halt so, wer hier nach dem Sinn fragt, wende sich bitte an den nicht aufblasbaren BillyBoy)
Was ist jetzt der 3. Zustand der Visible-Eigenschaft?
das ist das VERYHIDDEN mit dem Wert 2 und bedeutet, daß das Sheet nicht mehr über FORMAT-BLATT sichtbar gemacht werden kann, sondern nur über Makros oder das Eigenschaftsfenster im VBA-Editor (dort bekommst du dann auch die 3 möglichkeiten aufgelistet).
Gruß, Daniel

Anzeige
AW: Blatt mit aktuellem Zellennamen einblenden
10.10.2007 22:17:55
Rötti
Richtig,
die Zelle enthält meine Reisekostennummer!! Dankeschön!
Da hätte ich mich dumm und dämlich gesucht.... :)
Vielen vielen Dank!!! Super Forum!
Gruß,
Rötti

221 Forumthreads zu ähnlichen Themen

Text_Zahlenwert suchen und Zahlen "ablegen"
Lemmi

Hallo zusammen,
ich möchte aus einer drei spaltigen Tabelle Zahlen auslesen, die dann Monatsweise abgelegt werden sollen!
Es soll immer nach einem " Schlüsselwort" (...kann auch eine x beliebige Zahlfolge in der Benennungsliste sein) die Auslesung der Zahlenwerte durchgeführt werden.
03.01.2009 22:11:00
Thread-ID: 1036655
4 Beiträge
Anzeige
Suchen und Zählen
TOM

Guten Morgen zusammen
Kann mir jemand sagen ob ich per VBA den Gesamtzählwert der Suche auslesen kann wie es im Fenster Suchen und Ersetzen unten links nach dem drücken von alles suchen angezeigt wird.

Besten Dank für die Hilfe und einen Tipp
Gruss
TOM
06.08.2009 11:54:43
Thread-ID: 1093996
2 Beiträge
Wortteil in Tabelle suchen und Zelle markieren
Elmar

Hallo zusammen,
ich bräuchte mal Hilfe... ich krieg´s irgenwie selbst nicht hin.
Ich möchte ein Makro, das mir Suchbegriffe aus einer Liste ausliest (Liste z.B. in Tabelle 2 von A1 bis A10) und damit (mit den Suchbegriffen) eine andere Tabelle dann durchsucht. Wenn der Begriff (das ist...
17.08.2009 22:44:22
Thread-ID: 1096582
8 Beiträge
Anzeige
Wort in Zelle suchen und ersetzten
Maris

Hallo,
wie kann ich per VBA einen Text in einem Tabellenblatt suchen...z.B.: Sport-Tv und ändern in Sport-TV
Danke im Vorraus!
Gruß
Maris
28.10.2010 12:15:07
Thread-ID: 1184264
3 Beiträge
Namen suchen und Zählen
Lemmi

Hallo zusammen,
Ich möchte in einer Liste Namen Suchen und Zählen!
Die Namensliste ist zum Beispiel in Spalte E; F; G und H entahlten (ab Zeile 6 bis Zeile 1000).
Kann man das mit einer Fromel umsetzten?
Also ich gebe einen Namen ein z. B. AA6 ein und in AB6 wird die Anzahl der...
11.01.2011 20:48:47
Thread-ID: 1195106
4 Beiträge
Anzahl Ausführen eines Makros zählen
Fritz_W

Hallo VBA-Experten,
ich würde gerne ermitteln, wie oft die Prozedur 'Probe' aufgerufen wurde. Die jeweils aktuelle Anzahl sollte im Tabellenblatt Tabelle1 in der Zelle K15 stehen. Es müsste also bei der erstmaligen Ausführung der Prozedur in K15 die Zahl 1 eingetragen werden und diese sich...
18.01.2011 13:30:27
Thread-ID: 1196170
6 Beiträge
zahlen aus excel in wordtabelle farbig einfügen
preusbep

hallo ich würde gerne zahlen die ich aus excel lese in eine wordtabelle farbig einfügen. Leider werden die Zahlen nicht farbig sondern bleiben schwarz !
Danke für die Hilfe Sub farbe3() Dim Farbe(1 To 3, 1 To 1) As Single Set Word = CreateObject("word.Application") For i = 1 To 3 Farbe(i, 1...
27.09.2011 15:29:42
Thread-ID: 1231690
4 Beiträge
ganze Wörter in string suchen und löschen
Beffen

Tacho an Alle!
Ich habe eine kleine Frage:
Ich möchte aus einem String (Variable "satz") Wörter herausfiltern, die in der ersten Spalte von Zeile 1 bis 200 stehen. Darin sind besonders häufig verwendete Wörter der deutschen Sprache aufgeführt.
Ziel ist es am Ende ein Schlagwort aus...
19.04.2012 10:58:12
Thread-ID: 1260063
4 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
3
5
1
7
3
2
3
5
3
3
5
4
1
2
6
3
12
3
11
10
2
4
9
9
23