wie kann ich von meiner tabelle die zeile 1 und 2 + die letzen zeilen meiner Tabelle Ausdrucken so das alles auf ein Blatt geht.
ich mochte aber vorher nichts markieren.
Könnt ihr mir weiterhelfen?
für jeden Tip wäre ich sehr dankbar.
mfg
erich
wie kann ich von meiner tabelle die zeile 1 und 2 + die letzen zeilen meiner Tabelle Ausdrucken so das alles auf ein Blatt geht.
ich mochte aber vorher nichts markieren.
Könnt ihr mir weiterhelfen?
für jeden Tip wäre ich sehr dankbar.
mfg
erich
zeichne mit dem Makrorekorder folgende Schritte auf:
Anlegen neues Blatt
Kopieren Zeilen 1 und 2 ins neue Blatt
Kopieren letzte Zeile ins neue Blatt
neuen Blatt Drucken
neuen Blatt löschen
Gruss Otto
danke für deine antwort, aber die letzten zeilen sind nich immer gleich da ständig neue datensätze dazukommen.
mfg
erich
mfg
erich
baue den Vorschlag von Otto aus.
Die letzte Zeile in der Tabelle ermittelst Du mit
Zeile= Worksheets("Tabelle1").UsedRange.SpecialCells(xlCellTypeLastCell).Row
Bei Fragen zu Code macht es sich immer gut, wenn man den vorhandenen Code mit postet. Dann brauchen die Antworten nicht bei Null beginnen.
Gruß Hajo
Danke für deine Antwort.
kannst du mir nochmals weiterhelfen, und den Code richtig zusammen bauen.
hier mein aufgezeichneter Code:
mfg
erich
der Code weicht aber erheblich von der ersten Aufgabenstellung ab. Dort Stand nur 1 und 2 und Letzte Zeile kopieren. Jetzt steht hier was von neuer Datei und kopieren. Wie lautet den die Aufgabe nun??
Gruß Hajo
mein aufgezeichneter Code:
wäre dir sehr dankbar wenn du mir weiterhelfen würdest.
mfg
erich
versuchs mal so
Gruß Hajo
Ich habe den Code in meine Datei kopiert, jetzt wird eine seite mit den Zeilen 1 und 2 gedruckt (10x das gleiche) aber der letze datensatz wird nicht gedruckt.
kannst du mir mochmals helfen, danke!
mfg
erich
wenn ich mich auch ein wenig in VBA auskenne solchen komplizierten Code teste ich bevor ich ihn in Forum stelle und bei mir läuft er Fehler frei.
Ist die dritte Zeile leer???
Dann drückke mal in Deiner Original Datei Strg+Ende, wird die letzte Zeile Zeile richtig erkannt.
Gruß Hajo
zuerst mal danke für deine antwort.
hatte in der zeile 3 keinen Eintrag und das ende war auch ganz ganz wo anders.
habe eine neue tabelle aufgebaut und den code eingetragen, funktioniert super, aber eine kleinigkeit hätte ich noch.
ist zustand:
zeile 1 und 2 + die letze zeile, aber das z.B x mal bis eine seite voll ist.
soll zustand:
zeile 1 und 2, dann die letzen zeilen bis das blatt voll ist z.B
zeile 1 und 2, dann zeile 55 - 56 - 57
ist das überhaupt möglich?
wenn ja könntest du mir nochmals weiterhelfen?
mfg
erich
das verstehe ich nicht???
Zeile 1 und 2 kopieren und dann die letzte Zeile so oft bis das Blatt voll ist ???
Gruß Hajo
zur aufklärung um was es in dieser datei geht.
in meiner tabelle befindet sich in der zeile 1 die Überberschrift.
in der zeile 2 befinden sich die spalten überschriften.
es kommen täglich 2 bis 5 neue datensätze in der tabelle hinzu.
um Papier zu sparen, will ich über eine Schaltfläche nur die letzte seite Drucken, das hatte ich schon, aber da fehlten mir die überschriften aus den zeilen 1 und 2.
deshalb möchte ich die zeile 1 und 2 und dann die letzten zeilen bis ein blatt voll ist.
kannst du mir nochmals weiterhelfen?
mfg
erich
so langsam lichtet sich der Nebel.
Wieviele Zeilen hast Du auf einer Druckseite???
Ich habe es jetz so Verstanden. Dein Orignal hat z.b 170 Zeilen. Deine Druckseite z.b. 60 Zeilen. Du möchtest nun eine Seite Drucken mit Zeile 1 und 2 und Zeilen 113 bis 170.
Gruß Hajo
jetzt sind wir beisammen ich habe maximal 6 Zeilen auf meiner Druckseite (inklv. zeile 1 und 2)
vielen dank das du noch nicht die geduld mit mir verloren hast!
mfg
erich
vielleicht ist es jetzt so wie Du es haben willst.
Gruß Hajo
noch nicht ganz, den der druckt den letzten datensatz 4 mal und nicht die letzen 4 datensätze.
kann man das noch hinbekommen?
wenn ja, das wäre super hajo_zi.
mfg
erich
das war ein Fehler auf meiner Seite. Ich hatte es richtig beschrieben aber falsch umgesetz.
Gruß Hajo
optimal super das wars was ich brauche.
Danke für deine Geduld und geniale hilfe, Dannnnke!!!!!!!!!!
Hochachtungsvoll
Erich