Live-Forum - Die aktuellen Beiträge
Datum
Titel
23.04.2024 17:00:22
Summe und Ausgabe
23.04.2024 16:27:34
Excel Starthinweis - Arbeitsmappenleistung überprüfen ...
23.04.2024 16:15:16
Mittels VBA vordefinierte Kommentare in Zellen einfügen?
23.04.2024 14:59:21
Zellformel in VBA
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
348to352
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
348to352
348to352
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Möchte graue Zellen bei Eingabe überspringen

Möchte graue Zellen bei Eingabe überspringen
08.12.2003 14:12:18
Scotty
Hallo alle zusammen,

Habe eine große Tabelle, welche über mehrere Seiten geht. Wie kann ich per Makro veranlassen, dass in der ersten Zeile jeder neuen Seite der Tabellenkopf der Seite 1 automatisch eingefügt wird? Da in die Tabelle schnell fortlaufend Daten eingegeben werden, wäre es von Vorteil, wenn bei der Eingabe automatisch der Tabellenkopf auf jeder Seite erkannt und übersprungen würde. Der Tabellenkopf ist hellgrau, vielleicht kann man das über die Farbe realisieren?

Danke an alle die bei der Lösung behilflich sind
Gruß Scotty

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Möchte graue Zellen bei Eingabe überspringen
08.12.2003 14:17:12
Kl@us-M.
Hallo Scotty,
bei welchem Ereignis soll der Tabellenkopf "automatisch eingefügt" werden ?
Beim Drucken ? Dann über die Seiteneinrichtung Wiederholungszeilen / -spalten !
Beim Erfassen ? Dann über Fenster - Fenster fixieren !
Beim ... ? Mehr Infos nötig !
Gruss aus dem Hunsrück
Klaus-Martin
AW: Möchte graue Zellen bei Eingabe überspringen
08.12.2003 14:28:11
Scotty
Hi Klaus,

schreibe fortlaufend in die Tabelle. Sobald ich nach dem Seitenende weiterschreibe (also auf Seite 2 auch Daten eingebe, wäre es schön, wenn der Tabellenkopf von Seite 1 in der ersten Zeile der neuen Seite stehen würde. Also irgendwie, das, egal was und wieviel auf einer Seite steht, in der ersten Zeile´der Tabellenkopf eingefügt wird.

Gruß Scotty
Anzeige
AW: Möchte graue Zellen bei Eingabe überspringen
08.12.2003 14:43:24
Kl@us-M.
Hallo Scotty,
wenn ich ehrlich bin, verstehe ich den Sinn Deines Wunsches nicht ganz: Wenn es darum geht, dass die Überschriften in Deinem Tabellenkopf nicht "nach oben weggescrollt" werden, ist doch FENSTER - FENSTER FIXIEREN das Richtige.
Wenn die Überschriften auf jeder neuen Seite GEDRUCKT werden sollen, ist WIEDERHOLUNGSZEILEN in der Seiteneinrichtung das Geeignete.
Warum Platz verschwenden und die "Überschriften" auf jeder Tabellenblattseite ???
Gruss aus dem Hunsrück
Klaus-Martin
AW: Möchte graue Zellen bei Eingabe überspringen
08.12.2003 14:56:51
Scotty
Hi Klaus,

Hintergrund für mein Anliegen. Das Blatt ist Querformat. Die Tabelle umfasst 6 schmale Spalten. Die Tab. passt zweimal auf eine Seite (Blattersparnis beim Ausdrucken) Mit folgenden Makro wird die Tabelle von Seite 2 vor dem Audruck rechts neben die Tab. von Seite 1 kopiert usw.


Sub MultiSpaltenDruck()
Dim TB1 As Worksheet, TB2 As Worksheet
Dim x%, y%, s%, lZeile%
Set TB1 = Worksheets("Tabelle1")
Set TB2 = Worksheets.Add
TB2.Columns("A:M").ColumnWidth = 9
lZeile = TB1.Cells(Rows.Count, 1).End(xlUp).Row
y = 1: x = 1: s = 1
Do While y <= lZeile
For s = 1 To 8 Step 7
TB1.Range(TB1.Cells(y, 1), TB1.Cells(y + 36, 6)).Copy
TB2.Paste Destination:=TB2.Range(TB2.Cells(x, s), TB2.Cells(x + 36, s + 5))
y = y + 36
Next s
x = x + 36
TB2.Rows(x).PageBreak = xlManual
Loop
ActiveSheet.PageSetup.Orientation = xlLandscape
TB2.PrintPreview
Application.DisplayAlerts = False
TB2.Delete
Application.DisplayAlerts = True
End Sub


Das Makro funktioniert prima, nur der Tabellenkopf bei der jeweils rechten Tab. fehlt. Wäre zwecks Übersichtlichkeit idealer, wenn der Tab.Kopf da wäre.

Hoffe mein Anliegen wird jetzt verständlicher.

Scotty
Anzeige
NOCH OFFEN !!!
08.12.2003 15:27:49
Kl@us-M.
Hallo Scotty,
im Moment fehlt mir leider die Zeit, mich intensiver mit Deinem Code zu befassen, aber vielleicht hat ein anderer Helfer ´ne Idee ...
Gruss
Klaus-Martin
Für den Ausdruck und/oder die Bildschirmanzeige
08.12.2003 14:20:53
Günther Abel
hi Scotty,

für den Ausdruck kann Excel das im Standard:
Datei/Seite einrichten/Tabelle/Wiederholungszeilen oben

für die Ansicht in der Tabelle dann,
wenn die Daten untereinander stehen:
Fenster/teilen und den/die Trennbalken
mit der Maus positionieren und Fenster/Fenster fixieren.

Viel Erfolg

Günther
AW: Für den Ausdruck und/oder die Bildschirmanzeige
08.12.2003 14:33:44
Scotty
Hi Günther,

schreibe fortlaufend in die Tabelle. Sobald ich nach dem Seitenende weiterschreibe (also auf Seite 2 auch Daten eingebe, wäre es schön, wenn der Tabellenkopf von Seite 1 in der ersten Zeile der neuen Seite stehen würde. Also irgendwie, das, egal was und wieviel auf einer Seite steht, in der ersten Zeile´der Tabellenkopf eingefügt wird. Diese Zeile muß dann bei der Eingabe übersprungen werden und erst in der zweiten Zeile soll die Eingabe fortgeführt werden.

Gruß Scotty
Anzeige

300 Forumthreads zu ähnlichen Themen

Zellen farbig markieren
chrisss

Hallo,
ist es eigentlich bei Excel 2007 nun möglich, dass bei einer Wenn-Funktion eine Zelle farbig ausgefüllt wird. Beispiel: Wenn in Tabelle 1 in A1 ein U steht, soll die Zelle A1 in Tabelle 2 rot ausgefüllt werden.
Ich hatte die Frage schonmal gepostet und die Antwort erhalten, dass...
21.08.2008 13:20:00
Thread-ID: 1003455
8 Beiträge
Anzeige
trotz INDIREKT verknüpfte zellen farbig markieren
merlin

Hallo,
gibt es eine Möglichkeit trotz der Verwendung von INDIREKT die verknüpften Zellen markieren zu lassen?
https://www.herber.de/bbs/user/60118.xls
Viele Grüße, vielen Dank.
09.03.2009 11:14:37
Thread-ID: 1058088
3 Beiträge
VBA Zelle einfärben
Tom

Hi Leute,
ich weis zwar wie man ne Zelle einfärbt leider nicht beim objektorientierter Schreibweise kann mir da vll. jemand weiterhelfen?
Es soll einfach die Zeile Grün werden die Kopiert wurde, bzw. die Zelle. Private Sub CSearch_Click() Dim Dat1, Dat2, TB1_Comp, TB2_Comp, TB1_Paste, T...
03.08.2009 08:38:53
Thread-ID: 1093112
2 Beiträge
Anzeige
VBA Text suchen > Zeile durch Zelle markieren
Steffen

Hi Zusammen,
ich habe ein Tabellenblatt in dem in den Spalten A bis X jede einzelne Zelle nach einem bestimmten Begriff
durchsucht werden soll. Wenn der Begriff (Text) in einer Zeile vorhanden ist soll in Spalte Y in der entsprechenden Zeile ein "x" gesetzt werden.
Soweit bin ich...
24.09.2009 15:26:22
Thread-ID: 1105312
3 Beiträge
VBA: Gültigkeit für eine Zelle zuweisen
André

Moin zusammen,
ich möchte per VBA einer Zelle eine Gültigkeit zuweisen, und zwar eine Liste von Werten, die dann per Dropdown ausgewählt werden können.
Um den hierzu notwendigen Code zu erhalten, habe ich die Gültigkeit manuell zugewiesen und per Makrorekorder aufzeichnen lassen. Dabei...
22.03.2010 14:10:36
Thread-ID: 1147568
3 Beiträge
Zelle farbig ausfüllen über Formel / bedingte Form
Jim

Hallo Forum,
ich habe eien Frage bzgl. einer Zellformatierung.
Mit welcher Formel oder bedingten Formatierung kann ich einer Zelle eine Füllfarbe unter Randbedingungen zuweisen
Z.B steht in der Zelle A1 die Zahl 1, 2, 3, 4 oder 5. Nun soll die Zelle A2 farbig sein (ohne das ich ein...
22.07.2010 22:07:47
Thread-ID: 1168460
3 Beiträge
VBA Zellen je nach Inhalt einfärben
jens

Hallo Excel-Profis,
ich habe ein Makro das mir einen Bereich durchgeht und die Zellen je nach inhalt färbt:
Sub Worksheet_SelectionChange(ByVal Target As Excel.Range) Sheets("Reservierung (3)").Select Dim RaBereich As Range, RaZelle As Range Set RaBereich = Range("B8:P48") 'Set RaBereic...
28.10.2010 12:00:06
Thread-ID: 1184257
7 Beiträge
Formatieren von Zellen per VBA
Zellen

Guten Tag
habe bereits eine Ergänzungsfrage zu einem Projekt bei welchem mir hier via Forum schon sehr sehr gut geholfen wurde....
und zwar:
mittels folgendem Code schreibe ich in eine Spalte ein Datum:
Cells(j, 10).Value = CDate(MyDatStrg)
Wie müsste ich diese Zeile erweite...
07.12.2010 10:53:17
Thread-ID: 1190357
18 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
7
6
2
1
3
2
2
2
6
17
4
4
2
5
7
2
7
2
5
2
2
2
3
8
2