Anmelden
Anmelden
Registrieren
Supportnet Forum
Alle Aktivitäten
Alle Fragen
Beliebt!
Unbeantwortet
Themen
Kategorien
Benutzer
Frage stellen
Frage stellen
Kopfzeile aus Zelle und Formatierung
3k
Aufrufe
Gefragt
23, Jan 2013
in
Tabellenkalkulation
von
ingale
Mitglied
(
131
Punkte)
Hallo,
ich möchte für ein Tabellenblatt die Kopfzeile aus einer Zelle übernehmen und zusätzlich diese Kopfzeile in Arial/10/Fett formatieren.
Mein Code hierzu:
Sub KopfzeilePlanliste0()
Sheets("Planliste0").Select
With ActiveSheet.PageSetup
.LeftHeader = "&""Arial,Fett" & Sheets("Daten").Range("B21").Value
End With
Sheets("Daten").Select
Range("C15").Select
End Sub
Ohne Formatierung wird der Text übernommen, mit aber nicht.
Kann mir jemand helfen?
Gruß Inge
6
Antworten
0
Punkte
Beantwortet
23, Jan 2013
von
hajo_zi
Experte
(
9.1k
Punkte)
Hallo Inge,
benutze doch mal den Makrorecorder, hätte ich jetzt auch nur gemacht.
Gruß Hajo
0
Punkte
Beantwortet
23, Jan 2013
von
ingale
Mitglied
(
131
Punkte)
Hallo Hajo,
wie willst du denn bei der Makroaufzeichnung die Formel für den Zellbezug in die Kopfzeile einbauen?
Gruß Inge
0
Punkte
Beantwortet
23, Jan 2013
von
hajo_zi
Experte
(
9.1k
Punkte)
hallo Inge,
den Teil hast du doch schon, es geht doch nur noch um Formatierung von Text.
Gruß Hajo
0
Punkte
Beantwortet
23, Jan 2013
von
ingale
Mitglied
(
131
Punkte)
Hallo Hajo,
was die reine Formatierung betrifft, kommt bei der Aufzeichnung das raus, was ich auch in meinem Code stehen habe.
Aber in Verbindung mit dem Zellbezug muß noch ein Haken an der Sache sein.
Gruß Inge
0
Punkte
Beantwortet
23, Jan 2013
von
hajo_zi
Experte
(
9.1k
Punkte)
Halo Inge,
mein Makrorecorder zeichnet was anders auf#
"&""Bodoni MT,Fett""&20 131313"
also
"&""Bodoni MT,Fett""&20 " & Sheets("Daten").Range("B21")
Arial ist bei mir Standard, darum eine andere.
Gruß Hajo
0
Punkte
Beantwortet
23, Jan 2013
von
ingale
Mitglied
(
131
Punkte)
Hallo Hajo,
war ein kleiner Fehler mit großer Wirkung:
mir fehlte die Leerstelle nach der Schriftgröße
"&""Arial,Fett""&10 "
Jetzt kappt es.
Vielen Danke!
Gruß Inge
Deine Antwort
Dein angezeigter Name (optional):
Ich möchte eine Email an folgende Adresse erhalten, wenn meine Antwort ausgewählt oder kommentiert wird:
Ich möchte eine Email erhalten, wenn meine Antwort ausgewählt oder kommentiert wird
Datenschutz: Deine Email-Adresse benutzen wir ausschließlich, um dir Benachrichtigungen zu schicken. Es gilt unsere Datenschutzerklärung.
Anti-Spam-Captcha:
Bitte
logge dich ein
oder
melde dich neu an
, um das Anti-Spam-Captcha zu vermeiden.
58.4k
Fragen
249k
Antworten
7k
Nutzer
Alle Kategorien
Windows 11
(77)
Windows 10
(1.8k)
Windows 8
(648)
Windows 7
(5.8k)
WindowsVista
(2.8k)
WindowsXP
(8.8k)
Windows2000
(239)
Windows NT
(29)
WindowsME
(77)
Windows98
(342)
Windows95
(29)
BS-Sonstige
(531)
Linux
(757)
Textverarbeitung
(1.3k)
Tabellenkalkulation
(7.3k)
Datenbanken
(985)
Bildbearbeitung
(648)
Security Viren
(823)
E-Mail Outlook
(2.4k)
Präsentation
(226)
Internet Browser
(1.9k)
SW-Sonstige
(1.6k)
Mainboard CPU RAM
(1.6k)
Grafikkarten
(980)
Peripherie
(1k)
Smartphone
(475)
DigitalKameras
(182)
HW-Sonstiges
(2.6k)
DSL
(674)
ISDN
(138)
W-LAN
(1.2k)
Modem
(205)
Telekommunikation
(894)
NW-Sonstiges
(724)
Skripte(PHP,ASP,Perl...)
(607)
Webseiten HTML
(871)
Anwendungen(Java,C++...)
(500)
PC-Sonstiges
(2.7k)
Plauderecke
(3.4k)
SN Intern
(394)
Test
(238)
temp
(0)
Beliebteste Themen
excel
vba
windows
windows10
10
makro
outlook
android
word
vba-excel
formel
google
pc
access
update
bedingte_formatierung
e-mail
wlan
makros
drucker
...