Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.04.2024 20:05:21
CreateObject auf MacOS
28.04.2024 18:33:31
Excel Fenster fixieren
28.04.2024 18:25:12
Excel Aufbauende Summe
28.04.2024 14:18:05
Einfügen ohne Select
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1940to1944
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
1940to1944
1940to1944
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Farbe Fusszeile der ersten Seite mittels vba ändern

Farbe Fusszeile der ersten Seite mittels vba ändern
11.08.2023 07:33:33
Stelu
Hallo und vorab schon einmal danke für ein Feedback bzw. sorry sollte es die Lösung schon einmal geben.
Ich habe bisher leider jedoch nichts gefunden.

Ich möchte mir die Fußzeile der zu druckenden Datei eine Fußzeile per vba einfügen und brauche dafür eine vorgegebene Formatierung.

Da die erste Seite jedoch unterschiedlich ist, funktioniert mein code nicht für die erste seite

mein versuch:
Sheets("test").Select
With ActiveSheet.PageSetup
.LeftFooter = "&""Calibri,Standard""&9&KE30713" & datum
.FirstPage.LeftFooter.Text = "&""Calibri,Standard""&9&KE30713" & datum
End With

der erste teil funktioniert einwandfrei,
bei firstpage... wird der Text ab K einfach angedruckt, jedoch nicht formatiert.

Gibt es hierfür eine Lösung?

DANKE

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

Betreff
Datum
Anwender
Anzeige
AW: Farbe Fusszeile der ersten Seite mittels vba ändern
11.08.2023 09:16:15
Luschi
Hallo Stelu,

scheinbar liegen die Einstellung für .LeftFooter (1) und .FirstPage.LeftFooter.Text (2) im Clinch . Stellt man die Farbe für (1) ein , geht sie für (2) verloren, macht man es für (2) verliert (1) seine Farbeinstellung und der Zahlencode wird sichtbar - schon verrückt!
Der Makrorecorder hat für die 1. Seite übrigens diesen Code für die rote Farbe geliefert:
.FirstPage.LeftFooter.Text = "&""Calibri,Standard""&9 &KC0000011.08.2023" und nicht KE30713

Gruß von Luschi
aus klein-Paris

PS: meine Excelversion: 2019 ProPlus



Anzeige
AW: Farbe Fusszeile der ersten Seite mittels vba ändern
11.08.2023 09:50:56
Stelu
Hallo Luschi,

vielen Dank für deine Rückmeldung.

Ich habe es auch über den Rekorder probiert um zu sehen was prinzipiell für Einstellungen notwendig sind.
Nach Übernahme des Codes aus der Aufzeichnung hat firstpage... auch nicht funktioniert.

Hoffe, dass doch noch jemand eine Lösung für mich hat!

Der Farbcode ist übrigens für ein spezielles rot.

Danke noch einmal.



AW: Farbe Fusszeile der ersten Seite mittels vba ändern
11.08.2023 21:12:05
Ulf
Have a try 


Public Sub Schriftart()

    Dim ps As PageSetup

    Set ps = ActiveSheet.PageSetup

    ps.DifferentFirstPageHeaderFooter = True

    ps.LeftFooter = "&""Calibri,Standard""&9&MC00000&D"

    ps.LeftFooter = Replace(ps.LeftFooter, "MC00000", "KE30713")

    ps.FirstPage.LeftFooter.Text = "&""Calibri,Standard""&9&MC00000&D"

End Sub

hth
Ulf
Anzeige
AW: Farbe Fusszeile der ersten Seite mittels vba ändern
14.08.2023 12:13:37
stelu
Hallo Ulf,

auch dir herzlichen Dank für deine Bemühungen, leider hat mich dein Vorschlag auch nicht weitergebracht.
Der Farbcode (KE30713) wird auf der ersten Seite (FirstPage.LeftFooter) einfach nicht übernommen, sondern lediglich als Text angedruckt.
Ich hoffe wirklich, dass mir wer eine entsprechende Hilfestellung geben kann.

LG
stelu
AW: Farbe Fusszeile der ersten Seite mittels vba ändern
14.08.2023 14:14:59
Stelu
Hallo Ulf,
nachdem ich mit deiner Hilfestellung noch etwas 'gespielt' habe, habe ich den für mich richtigen code erstellen können.

VIELEN DANK für den input

LG
stelu
AW: Farbe Fusszeile der ersten Seite mittels vba ändern
14.08.2023 20:46:04
Luschi
Hallo Stelu,

wenn unsere Tipps Dir geholfen haben, eine vernünftige Lösung zu finden, fände ich es echt fair, diese hier bekannt zugeben:
Denn von Leechern, die nur Absahnen, aber nix zum Erfolg beitragen, daß hilft hier Niemanden.

Gruß von Luschi
aus klein-Paris
Anzeige

27 Forumthreads zu ähnlichen Themen

VBA erste leere Zeile - Übertragen
Hansjörg
Hallo Excelprofis, brauche wieder einmal EURE HILFE.
Habe ein Tabellenblatt (Wochenplan) in welchem in dem Zellenbereich N32:V37 Daten eingetragen sind.
Diese Daten sollten samt Ihrer bestehenden Formatierung in das Tabellenblatt Übersicht übertragen werden.
Bei jedem erneuten Übertra...
04.10.2014 13:43:16
Thread-ID: 1384789
5 Beiträge
Anzeige
VBA Tabelle erste Zeile schützen
FUMOS

Hallo,
kann mir jemand helfen.
Wenn Werte in der Tabelle vorhanden sind und ich einen neuen Eintrag anlege, dann wird dieser in die erste frei Zeile geschrieben. soweit so gut....
Wenn die Tabelle leer und nur die erste Zeile (Spaltenbeschriftung (A1-M1)) ausgefüllt ist, wird A1-M1...
26.09.2017 18:24:39
Thread-ID: 1582713
4 Beiträge
VBA Tabelle erste Zeile schützen
FUMOS

Hallo,
kann mir jemand helfen.
Wenn Werte in der Tabelle vorhanden sind und ich einen neuen Eintrag anlege, dann wird dieser in die erste frei Zeile geschrieben. soweit so gut....
Wenn die Tabelle leer und nur die erste Zeile (Spaltenbeschriftung (A1-M1)) ausgefüllt ist, wird A1-M1...
10.10.2017 18:54:03
Thread-ID: 1585123
3 Beiträge
Anzeige
Zeilen durchsuchen, bis auf erste Zeile vba
Marc
Hallo,

ich weiß, dass ich das Thema weiter unten schon einmal angesprochen hatte, aber ich bin fast am verzweifeln.
Mit dem unten stehen code will ich aus einer Liste von Geburtsdaten den Ältesten herausfinden. Nun habe ich das Problem, dass in der ersten Zeile Geburtsdatum steht. Diese...
09.12.2003 20:33:24
Thread-ID: 349775
6 Beiträge
kopierte Zeile in erste freie Zeile schreiben VBA
der

Hallo!
Gibt es mit VBA eine Möglichkeit, dass man eine Zeile, die man aus einem Tabellenblatt kopiert und in eine andere einfügen will, in die erste freie zeile unter den bereits bestehenden einträgen des zieltabellenblattes schreibt?
Danke!
der alex
10.06.2004 10:33:05
Thread-ID: 439698
2 Beiträge
Prosa in vba. Erste freie Zeile.offset
Harald

Hallo zusammen,
Problemstellung:
Ich möchte verschiedene Bereiche kopieren und in einem zweiten Blatt einfügen.
1. kopierte Zelle in zweites Blatt in die Zelle links neben der ersten freien Zelle von Spalte B
2. kopierte Zelle in zweites Blatt wie in Punkt 1 nur 24 Spalten weite...
22.11.2004 11:34:04
Thread-ID: 521072
4 Beiträge
(VBA): Zellmarkierung Nummer erste/letzte Zeile
Dieter

Hallo!
Ich trete im Moment bei einem kleinen Problem auf der Stelle:
In einer Tabelle wird ein bestimmter Bereich vom Anwender markiert. Bei der folgenden Verarbeitung durch ein Makro brauche ich nun die erste und die letzte Zeilennummer der Markierung, sozusagen ein lower/upper-Value v...
21.02.2005 11:03:47
Thread-ID: 572649
5 Beiträge
VBA: Text in erste freie Zeile im Zellbereich
Fritz

Hallo Forumsbesucher,
zunächst möchte ich allen hier im Forum ein gesundes und glückliches Neues Jahr wünschen und mich gleichzeitig bei allen Helfern für die Unterstützung im vergangenen Jahr bedanken.
Dann brauche ich schon wieder Hilfe der VBA-Kundigen wie folgt.
1. Ich benötige...
01.01.2020 14:37:40
Thread-ID: 1731447
7 Beiträge
Anzeige

Links zu Excel-Dialogen

Frame

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
4
7
3
2
12
5
1
3
4
6
4
5
8
3
4
7
3
2
12
5
1
3
4
6
4