Thema: Zeilen- und Spaltenüberschriften


Seite durchsuchen:
Home


zurück zur Übersicht

Diskussionsgruppe: Tabellenkalkulation

Hallo Leute,

ich habe mal wieder ein Problemchen.

Und zwar möchte ich mit dem unten stehenden Makro in jedes Arbeitsblatt die Zeilen- und Spaltenüberschriften einfügen.

'Zeilen- und Spaltenüberschriften aufbauen
For intab = 1 To Worksheets.Count
Windows(intab).Activate
ActiveWindow.DisplayHeadings = True
Next intab

Das Makro macht dies aber nur im aktiven Blatt.

Könntet Ihr mir bitte weiterhelfen?

Gruß

Peter

 Von: Peter3011 Datum: 27.06.2007, 09:39

alle Antworten zu dieser Frage


Antwort 1 von Arno_Nym vom 27.06.2007, 10:37
Ersetze:

. . .
Sheets(intab).Activate
. . .

Arno

Antwort 2 von Peter3011 vom 27.06.2007, 13:04
Hallo Arno,

ich glaub, ich pack's nicht mehr.

Er arbeitet mit Deinem Code auch nur dann korrekt, wenn ich ihn via Einzelschritt durchlaufen lasse.

Sonst macht der es einfach nicht.

Keine Fehlermeldung, nichts.

Woran kann das denn nur liegen?

Gruß

Peter

Antwort 3 von Arno_Nym vom 27.06.2007, 13:29
Hmm, keine Ahnung.

Bei mir gehts jedenfalls problemlos. Egal ob Ausführen im Codefenster oder über Extras - Makros oder mit einem eigenen Command-Button ...

Arno

Antworten der Gruppe: Tabellenkalkulation
www.supportnet.de



Office 365 stellt vertraute Microsoft Office-Tools für die Zusammenarbeit und Produktivität über die Cloud bereit. So können alle ganz einfach von nahezu überall zusammenarbeiten und auf E-Mails, Webkonferenzen, Dokumente und Kalender zugreifen.