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

Makro - für allen Tabellenblätter gültig

Forumthread: Makro - für allen Tabellenblätter gültig

Makro - für allen Tabellenblätter gültig
14.11.2012 16:54:04
Herbert
Hallo,
wie kann man dieses Makro abändern, dass auf es nicht nur auf dem aktuellen Tabellenblatt sondern auf allen Blättern der Datei ausgeführt wird?
Sub spalte_c_ausblenden()
' spalte_c_ausblenden Makro
Columns("C:C").Select
Selection.EntireColumn.Hidden = True
End Sub
vielen Dank im voraus.

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Makro - für allen Tabellenblätter gültig
14.11.2012 17:09:24
Tobias
Hi,
versuch das mal:
Sub eintragen()
Dim wks As Worksheet
For Each wks In ActiveWorkbook.Worksheets
wks.Columns(3).EntireColumn.Hidden = True
Next wks
End Sub
beste tobi

AW: Makro - für allen Tabellenblätter gültig
14.11.2012 20:04:27
Herbert
Hallo Tobi,
vielen Dank. Klappt einwandfrei.
Auch mit abgewandeltem Makro die Spalten wieder einblenden.
Aber jetzt hab ich noch eine Frage.
Wie lautet denn die Formel, wenn ich z. B. in allen Tabellenblättern außerdem die Zelle D1 gelb einfärben will?
Das bekomm ich leider nicht hin.
viele Grüße

Anzeige
Interior.Color = vbYellow ...
14.11.2012 21:52:55
Matthias
Hallo
Probiers mal so:
Sub eintragen()
Dim wks As Worksheet
For Each wks In ActiveWorkbook.Worksheets
With wks
.Columns(3).EntireColumn.Hidden = True
.Range("D1").Interior.Color = vbYellow
End With
Next wks
End Sub
Gruß Matthias

Anzeige
AW: Interior.Color = vbYellow ...
15.11.2012 08:07:54
Herbert
Hallo Matthias, vielen Dank, klappt einwandfrei.
jetzt hätte ich noch eine Frage?
Wie kann ich, wenn ich z.b. die Tabellenblatter 1, 2, 3, 4, und 5 habe,
die Blätter 1 und 3 von diesem Makro ausschließen? Geht das?
viele Grüße

AW: Interior.Color = vbYellow ...
15.11.2012 15:41:06
Matthias
Hallo
Bau ne Schleife drum so wie hier
Hier wird also Tabelle2 und Tabelle4 ausgelassen
Sub eintragen()
Dim wks As Worksheet
For Each wks In ActiveWorkbook.Worksheets
With wks
If .Name  "Tabelle2" And .Name  "Tabelle4" Then
.Columns(3).EntireColumn.Hidden = True
.Range("D1").Interior.Color = vbYellow
End If
End With
Next wks
End Sub
RegisterblattNamen bitte anpassen!
Gruß Matthias

Anzeige
AW: Interior.Color = vbYellow ...
15.11.2012 16:05:43
Herbert
Hallo Matthias,
passt genau.
vielen Dank für deine schnelle Hilfe.
viele Grüße

Forumthreads zu verwandten Themen

VBA Kennwortschutz aufheben & setzen Problem
Andreas

Hallo Herber Fans,
ich habe hier schon im Forum gesucht und auch einen Code gefunden. Es geht um das temporäre Aufheben des VBA Kennwortes im VBA Editor. Das Kennwort in der Beispieldatei ist „test“.
Die Datei wird geöffnet, ein Button wird kreiert. Wenn ich auf diesen Button klicke, er...
03.07.2009 21:26:13
Thread-ID: 1086309
7 Beiträge
Sortierungs-Makro über allen Tabellenblätter
Luke

Hi!
Mein Thema wurde hier schon öfters behandelt, doch es scheint als sei ich nicht Fähig das hinzukriegen. Ich möchte gerne mit einem Makro mehrere Tabellenblätter ansprechen. Ziel: Beim Klick auf den Button sollten sich 13 Tabellenblätter (simultan) absteigend (nach Spalten E und F) sorti...
27.08.2009 15:43:30
Thread-ID: 1099010
3 Beiträge
Anzeige
Blatt schützen in Verbindung mit Sortieren
Toby76

Hallo beisammen,
ich habe große Datenmengen aus SAP ausgelesen und will sie zur Bearbeitung an Kollegen weitergeben (siehe Musterdatei anbei). Die Kollegen sollen aber nur die gelb markierten Felder bearbeiten können, den Rest habe ich über Blatt schützen geschützt. Beim Schützen habe ich i...
08.09.2009 14:52:03
Thread-ID: 1101273
6 Beiträge
Makro für alle Arbeitsblätter
Basti

Guten Morgen zusammen,
am frühen Morgen macht VBA mal wieder nicht das, was ich möchte.
Folgendes Problem:
Ich habe ein Makro in einem Arbeitsblatt aufgezeichnet und möchte nun, dass dieses Makro in allen Arbeitsblättern ausgeführt wird. (Die Anzahl der Arbeitsblätter sind in mehrer...
27.08.2010 08:50:58
Thread-ID: 1174432
8 Beiträge
@Luschi:Aufheben des Vba-Kennwort-Schutzes per API
Andre´

Hallo Luschi,
habe den Beitrag Makro per VBA ändern vom 06.01.2011 verfolgt.
https://www.herber.de/forum/archiv/1192to1196/t1194138.htm
Dort hattest Du geschrieben,
PS: für jeden Interessierten zeige ich die Lösung in 3 Tagen; brauche noch ein paar Tests! Hast Du dies schon...
16.01.2011 10:48:43
Thread-ID: 1195787
9 Beiträge
Anzeige
Makro auf alle Tabellenblätter laufen lassen
Teggnodd

Hallo,
ich habe ein digitales Oszilloskop mit dem ich alle paar Minuten Werte aufnehmen will, dazu benutze ich Excel. Ich habe mir schon ein kleines Makro zum auslesen der Werte erstellt, hat auch ganz gut Funktioniert. Nun möchte ich aber auch ein Diagramm zu den Werten haben. Dazu habe ic...
13.12.2011 11:19:06
Thread-ID: 1241841
7 Beiträge
Anzeige
Makro für alle Tabellenblätter (Filter,ausblenden.
Maggie

Hallo
ich habe 3 Makros welche nur auf dem aktiven Tabellenblatt laufen, bräuchte sie aber so das sie gleichzeitig in allen Tabellenblättern laufen... habe Null-Ahnung wie ich das hin bekommen soll...
kann mir bitte jemand dabei helfen?
Gruß
Maggie
hier die 3 Makros
---...
06.05.2012 15:13:47
Thread-ID: 1262489
9 Beiträge
Abfrage ob Blattschutz mit Passwort gesetzt wurde
DominikHH

Hallo zusammen,
ich muss in einem Arbeitsblatt überprüfen, ob ein Blattschutz gesetzt wurde und - wenn das der Fall ist - ob auch ein Passwort vergeben wurde.
Im Fall, dass zusätzlich ein Passwort gesetzt wurde, muss ich anders reagieren, als wenn nur das Blatt geschützt wurde (dann kan...
22.11.2012 15:49:32
Thread-ID: 1287706
2 Beiträge
VBA Code Tabellenschutz mit Passwort
Max

Hallo zusammen,
hat jemand ein Standard VBA Code um ein Tabellenblatt ("Tabelle1") einzublenden. Das Einblenden der Tabelle soll über ein CommandButton inklusive einer Passwortabfrage erfolgen. Ebenso soll das spätere Ausblenden der Tabelle über einen CommandButton erfolgen.
Danke im vo...
28.12.2012 11:37:27
Thread-ID: 1292225
5 Beiträge
Makro auf alle Blätter anwenden
Marco#

Hallo,
ich beschäftige mich erst seit sehr kurzer Zeit mit tiefergehend mit Excel und bin noch gänzlich unerleuchtet.
Ich habe ein Makro, das ich auf alle Arbeitsblätter anwenden möchte. Es handelt sich dabei um exportierte Datensätze bei denen die Zahlen als Text formatiert sind. Die r...
28.12.2012 15:44:43
Thread-ID: 1292259
3 Beiträge
VBA - "Aus dem Web" mit Passwort
Timonski

Servus...
ich muss mich bei einer Internetseite mit Benutzer und Passwort einloggen.
nach dem einloggen, wollte ich gerne die Seite/n nach Excel importieren.
das Problem ist, er loggt sich nicht ein...
bei den ersten Schritten (FETT) loggt er sich auf der Seite ein... funktionie...
08.05.2014 15:23:16
Thread-ID: 1360536
5 Beiträge
Anzeige
Vor Makro Blattschutz aufheben: Sicherheitsabfrage
Michael Kl.

Hallo zusammen,
ich habe ein Makro zur Aufhebung des Blattschutzes erstellt.
Vor der endgültigen Deaktivierung des Schutzes soll eine Abfrage erscheinen, ob der Schutz wirklich deaktiiert werden soll. Ihr kennt diese Abfragen mit Sicherheit von Windows. Dort hat man die Möglichkeit, bei i...
17.07.2002 12:39:18
Thread-ID: 137441
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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