Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 19:29:30
Formel filter
24.04.2024 18:49:56
merge & select
24.04.2024 17:19:09
Formel mit Index-Funktion
24.04.2024 16:19:42
SummeWenn / SummeWenns mit Bedingung wenn kleiner als dann
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1536to1540
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
1536to1540
1536to1540
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Daten aus Zelle in Kopfzeile

Daten aus Zelle in Kopfzeile
03.02.2017 22:11:31
Robert
Hallo,
ich möchte gerne von aus der Tabelle 1 Zelle E1 den Inhalt in die Kopfzeile der Tabelle 3 übertragen.
Ich versehe nicht so recht wie ich das mit dem VBA Code funktioniert.
Wenn ich den Code eingebe, zeigt es den Inhalt in der Kopfzeile dann gleich an oder erst beim Drucken?
Was muss ich denn als Code eingeben?
Vielen Dank für eure Hilfe.
PS: Ich nutze Excel 2010

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Daten aus Zelle in Kopfzeile
04.02.2017 08:36:29
fcs
Hallo Robert,
es hängt davon ab wie der Wert in Tabelle1 Zelle E1 geändert wird.
Wird er von Hand eingegeben, dann kann man direkt die die Kopfzeile in Tabelle3 anpassen. 
'Makro unter unter Code-Modul von Tabellenblatt "Tabelle1"
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
Select Case Target.Address(False, False, xlA1)
Case "E1" 'Zelle mit Wertänderung
With ThisWorkbook.Worksheets("Tabelle3")
.PageSetup.CenterHeader = Me.Range("E1").Text
End With
End Select
End Sub
Wird der Wert in Zelle E1 per Formel berechnet dann muss man anders vorgehen. Dann wird die Kopfzeile nach jeder Neuberechnung aktualisiert, wenn sich das Zellergebnis ändert. 
'Makro unter unter Code-Modul von Tabellenblatt "Tabelle1"
Option Explicit
Private strKopfTab3 As String
Private Sub Worksheet_Calculate()
With Me.Range("E1")
If strKopfTab3  .Text Then
strKopfTab3 = .Text
With ThisWorkbook.Worksheets("Tabelle3")
.PageSetup.CenterHeader = strKopfTab3
End With
End If
End With
End Sub
LG
Franz
Anzeige

300 Forumthreads zu ähnlichen Themen

Zellen mit Werten aus darüberliegender Zelle fülle
Andreas

Guten Morgen!
Ich hätte folgendes Problem: Ich erhalte automatisiert Exceltabellen, bei denen nicht alle Zellen einer Zeile gefüllt werden, wenn dort der Inhalt einer darüberliegenden Zeile stehen sollte. Zur Weiterverarbeitung muss ich aber diese Zellen mit den dazugehörigen Werten füllen....
11.08.2008 08:59:25
Thread-ID: 1000713
4 Beiträge
Anzeige
x ersetzen durch wert aus bestimmter zelle
Ingolf

hallo,
ich muß eine liste erstellen. die werte unten will ich nicht immer eingeben müssen, sondern nur dort wo ein wert stehen soll ein x machen. excel soll mir dann für jedes x den wert aus der zeile 2 der gleichen spalte eintragen. mache ich in eine zelle 2 x, dann muß der wert auch 2 mal...
22.08.2008 09:08:22
Thread-ID: 1003727
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
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
bedingte Formati. Formel m.Bezug auf aktive Zelle
Peter

Guten Tag
Ich will in der bedingten Formatierung den Wert der zu formatierenden Zelle abfragen,
z.b. in Zelle C3:
Bedingung 1
=CODE(C3)=230
Bedingung 2
=CODE(C3)=226
Bedingung 3
=CODE(C3)=232
Könnte ich die Zelle C3, also die zu formatierende Zelle, auch a...
10.10.2008 16:06:59
Thread-ID: 1015631
5 Beiträge
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
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

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