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

Wert aus einer Zelle in Kopfzeile schreiben

Forumthread: Wert aus einer Zelle in Kopfzeile schreiben

Wert aus einer Zelle in Kopfzeile schreiben
24.02.2005 14:18:51
Manuel
Hallo!
Wie kann ich bei Excel in die Kopfzeile einen Wert aus einer Zelle schreiben? Hab es auch schon versucht, die Zelle mit einem Namen zu definieren, weiss nur nicht wie man sie in die Kopfzeile schreibt!
Anzeige

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Wert aus einer Zelle in Kopfzeile schreiben
24.02.2005 14:29:28
Dominic
Hallo,
So:
ActiveSheet.PageSetup.LeftHeader = Cells(1, 1).Value
Gruß
Dominic
AW: Wert aus einer Zelle in Kopfzeile schreiben
Manuel
wo muss ich das denn eintragen? Ich nehme den Wert aus einer anderen Tabelle der Arbeitsmappe!
AW: Wert aus einer Zelle in Kopfzeile schreiben
24.02.2005 14:38:49
Dominic
Jetzt?
Worksheets("Name der Tabelle mit der Kopfzeile").PageSetup.LeftHeader =Worksheets("Wo der Wert steht").cells(Zeile,Spalte).Value
Gruß
Dominic
Anzeige
AW: Wert aus einer Zelle in Kopfzeile schreiben
Manuel
wo muss ich das denn eintragen im vba editor? oder wie wird das aufgerufen?
AW: Wert aus einer Zelle in Kopfzeile schreiben
24.02.2005 14:51:20
Dominic
In ein Standard Modul (Einfügen / Modul), oder wenn der Eintrag immer sich ändert dann unter Excel Objekt den Blatt auswählen und oben Worksheet und Change auswählen.
Gruß
Dominic
AW: Wert aus einer Zelle in Kopfzeile schreiben
24.02.2005 14:32:28
Bernd 

Private Sub Worksheet_Activate()
With ActiveSheet.PageSetup
.LeftHeader = Range("A1")
.CenterHeader = Range("B1")
.RightHeader = Range("C1")
End With
End Sub

Bei mir funktioniert´s jedenfalls, obwohl ich VBA-Laie bin.
Anzeige
AW: Wert aus einer Zelle in Kopfzeile schreiben
Manuel
Wo muss ich das denn eintragen? So dass man es nciht von Hand aufrufen muss, sondern immer automatisch aufgerufen wird?
AW: Wert aus einer Zelle in Kopfzeile schreiben
24.02.2005 14:56:34
Bernd
https://www.herber.de/bbs/user/18684.xls
Schaußs Dir mal an. Mit ALT+F11 kannst Du die Zellbezüge ändern oder auch LeftHeader (Kopfzeile) in LeftFooter (Fußzeile) ändern.
Anzeige

Forumthreads zu verwandten Themen

Gültigkeitsprüfung in Bezug auf andere Zelle
Erwin

Geschätztes Forum!
Ich möchte in Zelle A1 eine Gültigkeitsprüfung einfügen.
Die Gültigkeit soll mir dort Eingaben bis zur Höchstzahl der in A2 vorhandenen Zahl erlauben.
zB. Wenn in A2 die Zahl 5 steht, soll die Eingabe in A1 bis höchstens bis zur Zahl 5 (also 1,2,3,4,5) erlaubt sei...
14.08.2008 14:06:00
Thread-ID: 1001854
5 Beiträge
Blätter Zusammenfassen mit Bezug auf Ursprungzelle
Peter

Hallo liebe Exel und VBA Fangemeinde
nachdem ich nun mehrere Tage durch die Tiefen dieses sensationellen Forum gewühlt habe,
und nicht weiter komme, versuche ich es mit meinem ersten Posting.
In einer Excelliste habe ich eine unbestimmte Anzahl Arbeitsblätter und möchte diese auf e...
22.08.2008 23:37:54
Thread-ID: 1004040
10 Beiträge
Anzeige
Zellen ausblenden mit Wert 0 in Zelle
Ulrich

Hallo zusammen,
wie kann ich einem Tabellenblatt alle Zeilen ausblenden, bei denen in der ersten Zelle eine 0 (null) steht? Geht sowas überhaupt?
Viele Grüße,
Ulrich
01.09.2008 11:08:49
Thread-ID: 1006360
6 Beiträge
Bestimmte Werte aus einer Zelle herausfiltern
G_G

Hallo zusammen.
Ich habe in einer Zelle einen etwas längeren Text (mit Zahlen und Buchstaben). Ich würde jetzt gerne hieraus den Wert rausfiltern (in separate Spalte), der neben der Buchstabenkombination "AT" steht.
Hört sich einfach an. Da gibt es aber noch einige Sonderfälle.
Ich...
15.09.2008 12:03:00
Thread-ID: 1009747
5 Beiträge
Wert aus Zelle holen für VBA
Oliver

Hallo eine kleine Frage,
wollte folgendes umsetzen, ein Benutzer fügt in der Excelobelfläche im ersten Blatt eine Zahl ein. Diese soll jetzt wie folgt verwendet werden:
falls ... größer als dem Zellinhalt, dann ...
meine Idee:
Dim Wert As Integer
Wert = cells(20, 2)
If.....
25.09.2008 10:06:31
Thread-ID: 1012241
6 Beiträge
Anzeige
Drei Zellen auswerten
Hanspeter

Hallo zusammen,
Wie kann ich Werte aus drei Zellen kombinieren und auswerten.
Beispiel
In der Zelle A1 können 6 mögliche Farben stehen. (rot, blau, grün, ….)
In der Zelle B1 können 6 mögliche Formen stehen (rund, oval, …….)
In der Zelle C1 können 5 mögliche Materialien stehe...
20.10.2008 09:31:03
Thread-ID: 1017582
9 Beiträge
Anzeige
Zelleninhalt in Kopfzeile Seitenansicht zeigen?
Heiner

Hallo Forum,
ich bin Excel-Neueinsteiger habe ein grosses Problem...
In der Kopfzeile (Mitte) einer Seitenansicht soll automatisch der Eintrag aus Tabelle1 / Zelle B3 angezeigt werden.
Ist das möglich? Und wenn ja, wie kann das realisiert werden?
Wer kann mir mit einem Formel- o...
05.11.2008 12:10:35
Thread-ID: 1021845
2 Beiträge
Anzeige
Wert aus Zelle übernehmen und behalten
Martin

Hallo Zusammen
Folgende Situation:
Habe eine Liste aus 4 x 2200 Zeilen mit Zahlenwerten die zum Teil auch via Formel berechnet werden.
Nun habe ich festgestell, dass ich bei einer Spalte leider einen falschen Wert erfasst habe.
Kann ich via Makro oder mit einer Formel einen Zel...
07.11.2008 09:59:13
Thread-ID: 1022545
3 Beiträge
Sverweis auf darüberliegende Zelle
Matthias

Hallo,
ich suche eine Formelergänzung für den sverweis, damit dich den darüberliegenden Wert aus
Spalte X widergeben kann.
z.B.
Er sucht in Spalte A nach dem Wert "x" und gibt mir den Wert aus Spalte B "17.10.2008" zurück
von jetzt an soll er mir aber den darüberliegenden We...
24.11.2008 11:22:54
Thread-ID: 1027230
3 Beiträge
Wert vom ausgewählten Filter in Zelle
Kurt

Hallo nochmal,
ich möchte gern den Wert vom Filter in die Zelle N1 setzen.
Hatte dies
Selection.AutoFilter Field:=4, Criteria1:=wert
ActiveSheet.Range("N1").Select = wert
mfg Kurt P
01.12.2008 15:41:00
Thread-ID: 1029285
3 Beiträge
Zellen auswerten
volker

Hai Excels,
ich hab eine Tabelle mit Zahlenwerten in Spalte "B" ~ 10000 Zeilen.
Wie kann ich Auswerten wie viele unterschiedliche ZAhlenwerte sich darin befinden?
(es sind viel doppel Zahlen vorhanden)
Danke Viele Grüsse und einen schönen Advent volker
03.12.2008 09:02:00
Thread-ID: 1029685
5 Beiträge
Werte aus einer Zelle auf mehrere verteilen
Bernd

Hallo,
Tabelle1

 ABCDEF1so bekomme ich es:    2      3Bleistifte Kulis Blöcke Marker Minen Scheren 100 50 150 20 30 104      5so soll es sein:    6     &...
12.12.2008 22:22:00
Thread-ID: 1032536
5 Beiträge
Anzeige
Anzeige

Infobox / Tutorial

Wert aus einer Zelle in die Kopfzeile einfügen

Schritt-für-Schritt-Anleitung

Um einen Wert aus einer Zelle in die Kopfzeile deiner Excel-Tabelle zu übernehmen, folge diesen Schritten:

  1. VBA-Editor öffnen: Drücke ALT + F11, um den Visual Basic for Applications (VBA) Editor zu öffnen.

  2. Modul einfügen: Klicke auf Einfügen -> Modul, um ein neues Modul zu erstellen.

  3. Code eingeben: Füge folgenden Code ein, um den Zelleninhalt in die Kopfzeile zu übernehmen:

    Sub KopfzeileEinfügen()
   Worksheets("Name der Tabelle mit der Kopfzeile").PageSetup.LeftHeader = Worksheets("Wo der Wert steht").Cells(1, 1).Value
End Sub

  4. Anpassungen vornehmen: Ersetze "Name der Tabelle mit der Kopfzeile" und "Wo der Wert steht" durch die tatsächlichen Namen deiner Tabellen. Stelle sicher, dass die Zellenreferenz (1, 1) auf die gewünschte Zelle zeigt.

  5. Makro ausführen: Schließe den VBA-Editor und führe das Makro aus, um den Wert in die Kopfzeile einzufügen.

Häufige Fehler und Lösungen

  • Fehler: "Objekt nicht gefunden"

    • Lösung: Überprüfe, ob die Tabellennamen korrekt eingegeben wurden.

  • Fehler: Kopfzeile bleibt leer

    • Lösung: Stelle sicher, dass die Zelle, die du referenzierst, nicht leer ist.

Alternative Methoden

Wenn du den Zelleninhalt in die Kopfzeile einfügen möchtest, ohne VBA zu verwenden, kannst du Folgendes tun:

  1. Manuelles Einfügen:

    • Gehe zu Seitenlayout -> Kopf- und Fußzeile.
    • Wähle die Kopfzeile aus und füge den gewünschten Text manuell ein.

  2. Verknüpfung mit Zelle:

    • Verwende eine Formel in einer Zelle, um den Inhalt dynamisch zu ändern, und kopiere dann den Inhalt manuell in die Kopfzeile.

Praktische Beispiele

  • Beispiel 1: Wenn du den Wert aus Zelle A1 in die Kopfzeile übernehmen möchtest, lautet der VBA-Code:

    Sub KopfzeileA1()
   ActiveSheet.PageSetup.LeftHeader = Range("A1").Value
End Sub

  • Beispiel 2: Um den Inhalt aus Zelle B2 in die Kopfzeile zu übernehmen:

    Sub KopfzeileB2()
   ActiveSheet.PageSetup.CenterHeader = Range("B2").Value
End Sub

Tipps für Profis

  • Zelleninhalt in Kopfzeile automatisch aktualisieren: Um die Kopfzeile automatisch bei Änderungen in der Zelle zu aktualisieren, nutze das Worksheet_Change-Ereignis im VBA-Editor.

    Private Sub Worksheet_Change(ByVal Target As Range)
   If Not Intersect(Target, Range("A1")) Is Nothing Then
       ActiveSheet.PageSetup.LeftHeader = Range("A1").Value
   End If
End Sub

  • Verwendung von Formeln: Du kannst auch Excel-Formeln in einer Zelle verwenden, um den Wert zu generieren, der dann in die Kopfzeile eingefügt wird.

FAQ: Häufige Fragen

1. Wie kann ich den Zelleninhalt in die Fußzeile übernehmen? Du kannst den gleichen VBA-Code verwenden, indem du LeftFooter, CenterFooter oder RightFooter anstelle von LeftHeader verwendest.

2. Funktioniert das auch in älteren Excel-Versionen? Ja, die beschriebenen Methoden funktionieren in den meisten Excel-Versionen, die VBA unterstützen, wie Excel 2010 und neuer.

Beliebteste Forumthreads (12 Monate)

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