Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.04.2024 21:55:37
Preiserhöhung über mehrere Jahre berechnen
17.04.2024 20:19:32
Endzeitpunkt berechnen aus d:hh:mm errechnen
17.04.2024 18:57:33
Errinnerungsfunktion
17.04.2024 16:56:58
Stunden addieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
412to416
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
412to416
412to416
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Textformatierung aus Zelle in Fußzeile übernehmen

Textformatierung aus Zelle in Fußzeile übernehmen
Gunther
Guten Tag,
ich übernehme mit folgender Anweisung den Zelleintrag aus A2 in den rechten Bereich der Fußzeile:

Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.RightFooter = Range("A2").Value
End Sub

Wie ist es möglich neben des Inhalts der Zelle auch dessen Fromatierung in die Fußzeile zu übernehmen bzw. den Text in der Fußzeile entsprechend zu formatieren (mit Ausführung des Makros)?
Besten Dank für Eure Unterstützung.
Gunther
AW: Textformatierung aus Zelle in Fußzeile übernehmen
Werner
Grüezi Günther
x= "&14" & Range("A2")
ActiveSheet.PageSetup.RightFooter = (x)
&14 ist Schriftgrösse 14
Gruss Werner
AW: Textformatierung aus Zelle in Fußzeile übernehmen
16.04.2004 10:29:50
Gunther
Grüß Dich Werner,
Danke für die prompte Antwort. Habe den Code folgendermaßen adaptiert:


Private Sub Workbook_BeforePrint(Cancel As Boolean)
'ActiveSheet.PageSetup.RightFooter = Range("A2").Value
Dim x As String
x = "&20" & Range("A2")
ActiveSheet.PageSetup.RightFooter = (x)
End Sub

sobald ich jedoch das "&20" dabei habe, steht im rechten Teil der Fußzeile nichts mehr.
Hab ich da etwas falsch verstanden bzw. umgesetzt?
Beste Grüße
Gunther
Anzeige
AW: Textformatierung aus Zelle in Fußzeile übernehmen
Werner
Grüezi Gunther
Was steht denn in Deiner Zelle A1?
Du kannst aber auch y aus Range("A1") machen
y= Range("A1")
x= "&20" & y
Nicht getestet
Gruss Werner
AW: Textformatierung aus Zelle in Fußzeile übernehmen
16.04.2004 13:15:39
Gunther
Werner,
das hab ich jetzt getestet - das Ergebnis ist das selbe wie zuvor - kein Eintrag im rechten Teil der Fußzeile.
In der Zelle A2 steht einzig eine Zahl.
Beste Grüße
Gunther
AW: Textformatierung aus Zelle in Fußzeile übernehmen
Werner
Grüezi Gunther
Soeben getestet. Wenn nur eine Zahl in A1 steht, geht es wirklich nicht.
Ich habe dann einen * (Stern) vorangesetzt und siehe da, es klappt.
Ich habe auch den Code geändert, damit Du ev. mit Deiner Zahl auch normal rechnen kannst.

Private Sub Workbook_BeforePrint(Cancel As Boolean)
y = " " & Range("A1")
x = "&14" & y
ActiveSheet.PageSetup.RightFooter = (x)
End Sub

Das ist nur ein Leerschlag vor der Zahl
Gruss Werner
Anzeige
AW: Textformatierung aus Zelle in Fußzeile übernehmen
Gunther
Danke Werner, das funktioniert - hast Du vielleicht noch eine Idee, was man hinzufügt, sodaß die Zahl aus A2 in der Fußzeile fett erscheint?
War mir eine große Hilfe - Danke nochmal
Gunther
AW: Textformatierung aus Zelle in Fußzeile übernehmen
19.04.2004 09:29:00
Werner
Grüezi Gunther
x = "&""Arial,Fett""&14" & y
Das ist Schriftart 'Arial'. Bei einer anderen Schriftart, den Namen anpassen.
Gruss Werner

324 Forumthreads zu ähnlichen Themen

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
Anzeige
Text (Datum) aus Zeile mit Zeilenbruch auslesen
Iro

Hallo,
ih habe folgendes Problem: ich muss aus einem vorgegebenen Sheet einen bestimmten Zinssatz zu einem bestimmten (Jahr / Monat) auslesen.
1. Problem: das vorgegebene, gesuchte Datum hat das Format TT.MM.JJJJ, das andere Datum, mit dem ich es vergleichen muss wird mit "Monat Jahr"....
01.10.2008 23:00:06
Thread-ID: 1013778
4 Beiträge
Text aus einer Zelle in ein anderes Tabellenblatt
grigolet

Hallo,
ich erstelle gerade eine Arbeitsmappe in der auf verschiedenen Tabellenblättern die gleichen Namen erscheinen sollen (aus dem Blatt 'Verhandlungsergebnis' sollen die Personendaten der Beteiligten in ein erstelltes Vertragsformular übernommen werden). Ich habe das z.B. mit = gelöst. J...
09.10.2008 11:24:26
Thread-ID: 1015295
2 Beiträge
Anzeige
Inhalt einer Zelle in anderer Zelle als Formel
Elias

Guten Morgen,
ich bin auf der Suche nach einer Lösung für folgenden Sachverhalt.
In einer Tabelle wird aus dem Inhalt verschiedener Zellen über Verketten eine Zeichenfolge gebildet, die in einer anderen Tabelle als Formel herhalten soll.
(Kurzes) Beispiel, das Original ist furchtbar...
11.01.2009 06:01:22
Thread-ID: 1038572
6 Beiträge
Datum automatisch in andere Zelle kopieren
ThomasB

Hallo,
Nach langem möchte ich ein wenig in Excel wieder üben. Für meine Frau will ich eine Zuchttabelle für Kaninchen erstellen. soweit habe ich das auch in Griff. Nur mit dem Datum und der automatischen Kopierung gibt es ein kleines Problem. In der Celle C2 wird das erste Deckdatum eingetr...
15.01.2009 14:00:41
Thread-ID: 1040123
4 Beiträge
Text in Fußzeile aus Zelle ziehen
Sandra

Hallo zusammen!
Ich brauche mal wieder Eure Hilfe.
Meine Exceltabelle (ein Protokoll) soll im linken Teil der Fußzeile einen Text bekommen, der automatisch aus einer Zelle gezogen wird. So das sich die Fußzeile immer aktualisiert, wenn die Zelle geändert wird. Mit einer Formel geht es j...
29.01.2009 11:29:24
Thread-ID: 1044904
23 Beiträge
Zufällig einen Text ausgeben aus best. Zellen
Eddie

Hallo und Guten Abend.... habe mal wieder ein Problem...
Ich will gerne aus einer Anzahl von zellen (ca 100 Zeilen) .. wo bestimmte Sätze drin stehen diese Zufällig in einer Bestimmten zelle anzeigen lassen ....
Vielleicht hat ja jemand schon sowas gemacht ?
thx schon einmal
G...
15.02.2009 20:14:00
Thread-ID: 1050974
7 Beiträge
Inhalt einer Zelle in mehrere Zellen aufsplitten
Joerschi

Hallo liebe Excel-Community,
ich möchte den Inhalt einer Zelle (getrennt durch Leerzeichen) in andere Zellen aufsplitten bzw. in anderen Zellen getrennt anzeigen lassen. Die Leerzeichen aus der Herkunftszelle sollen dabei ignoriert werden.
Z. B. steht in Zelle A1: "1 2 3 4 5"
Jetzt...
04.03.2009 11:46:03
Thread-ID: 1056268
9 Beiträge

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