Gruppen
- Top Gruppen
- Betriebsysteme
- Windows classik
- Linux
- BS-Sonstige
- Software
- Datenbanken
- Bildbearbeitung
- Audio/mp3/Video
- Security/Viren
- SW-Sonstige
- Hardware
- Mainboard/CPU
- Grafikkarten
- Peripherie
- Laptop/Notebook
- HW-Sonstiges
- Netzwerk
- Telefon,ISDN,Modem
- W-Lan
- NW-Sonstiges
- Programmierung
- PHP,ASP,Perl...
- Java,C++...
- Webseiten/HTML
- Sonstiges
- PC-Sonstiges
- Plauderecke
- SN Intern
- Test
/ Forum / Skripte(PHP,ASP,Perl...)
Skripte(PHP,ASP,Perl...)
Fragevon snailhouse vom 02.08.2019, 19:10 Options
Seitenumbrüche in Excel-sheet einfügen per VBA
Hallo zusammen,
ich habe eine Tabelle, die in verschiedenen Varianten gedruckt werden soll. Dazu blende ich aus der Gesamtliste per VBA die entsprechenden Zeilen aus, leider "passen" die Zeilenumbrüche anschließend nicht mehr.
Wie kann ich in VBA manuell zuerst alle Zeilenumbrüche
entfernen
und anschließend (an einer gewünschten Stelle)
neue einfügen?
Für Eure Mühe im voraus vielen Dank!
Gruß
Jürgen
ich habe eine Tabelle, die in verschiedenen Varianten gedruckt werden soll. Dazu blende ich aus der Gesamtliste per VBA die entsprechenden Zeilen aus, leider "passen" die Zeilenumbrüche anschließend nicht mehr.
Wie kann ich in VBA manuell zuerst alle Zeilenumbrüche
entfernen
und anschließend (an einer gewünschten Stelle)
neue einfügen?
Für Eure Mühe im voraus vielen Dank!
Gruß
Jürgen
Antwort 1 von snailhouse vom 03.08.2019, 20:10 Options
Hallo nochmal,
ich habe es mittlerweile geschafft, Seitenumbrüche einzufügen mit [/i](oWsListe ist das betreffende Worksheet)[/i]
Leider habe ich es noch nicht geschafft,
zuvor alle Zeilenumbrüche zu löschen ....
Wenn ich zuvor das Blatt auf 1Seitehoch/breit formatiere mit
werden die eingefügten Zeilenumbrüche nicht angenommen, sondern es bleibt bei der Darstellung 1Seite hhoch/breit.
Vielleicht hat ja noch jemand einen Tipp?
Vielen Dank im voraus!
Jürgen
ich habe es mittlerweile geschafft, Seitenumbrüche einzufügen mit [/i](oWsListe ist das betreffende Worksheet)[/i]
oWsListe.Rows(Zaehler).PageBreak = xlPageBreakManual
Leider habe ich es noch nicht geschafft,
zuvor alle Zeilenumbrüche zu löschen ....
Wenn ich zuvor das Blatt auf 1Seitehoch/breit formatiere mit
With oWsListe.PageSetup
.FitToPagesWide=1
.FitToPagesTall=1
End With
werden die eingefügten Zeilenumbrüche nicht angenommen, sondern es bleibt bei der Darstellung 1Seite hhoch/breit.
Vielleicht hat ja noch jemand einen Tipp?
Vielen Dank im voraus!
Jürgen
Antwort 2 von snailhouse vom 04.08.2019, 17:37 Options
...hat niemand eine Idee?
Antwort 3 von snailhouse vom 06.08.2019, 07:45 Options
...hat niemand eine Idee?
Antwort 4 von DukeNT vom 06.08.2019, 10:55 Options
Hallo snailhouse,
warum das mit 1Seite Hoch/Breit nicht geht kein Plan aber
mit Verkleinern/Vergrößern auf 100% geht das.
Damit funktionieren auch die Manuellen Seitenumbrüche.
With oWsListe.PageSetup
.Zoom = 100
End With
Um Zeilenumbrüche innerhalb einer Zelle zu löschen bzw. zu ersetzen suchst du einfach nach CHR(10) in der Zelle und ersetzt es z.B. mit einem leerzeichen.
Selection.Replace what:=Chr(10), replacement:=" "
Anschliessend noch die Zelle auf Zeilenumbruch False setzen.
Selection.WrapText = False
Um alle Seitenumbrüche zu entfernen:
Cells.Select
ActiveSheet.ResetAllPageBreaks
Gruß Niels
warum das mit 1Seite Hoch/Breit nicht geht kein Plan aber
mit Verkleinern/Vergrößern auf 100% geht das.
Damit funktionieren auch die Manuellen Seitenumbrüche.
With oWsListe.PageSetup
.Zoom = 100
End With
Um Zeilenumbrüche innerhalb einer Zelle zu löschen bzw. zu ersetzen suchst du einfach nach CHR(10) in der Zelle und ersetzt es z.B. mit einem leerzeichen.
Selection.Replace what:=Chr(10), replacement:=" "
Anschliessend noch die Zelle auf Zeilenumbruch False setzen.
Selection.WrapText = False
Um alle Seitenumbrüche zu entfernen:
Cells.Select
ActiveSheet.ResetAllPageBreaks
Gruß Niels
Antwort 5 von snailhouse vom 06.08.2019, 20:24 Options
Hallo Niels,
vielen Dank für den Tipp!
Gruß
Jürgen
vielen Dank für den Tipp!
Gruß
Jürgen
Ähnliche Themen
Excel Bild in Zelle einfügen
Gorrif 18.11.2007 - 1474 Hits - 9 Antworten
Excel, suche nach Wert in einer Zelle und Kopieren des Wertes der 24.Zeile darunter
mistermo 06.12.2007 - 102 Hits - 7 Antworten
Schnellreferenz Excel VBA
Joshuan 23.05.2008 - 219 Hits - 3 Antworten
VBA-Excel
mentosbasi 28.05.2008 - 349 Hits - 3 Antworten
access abfrage in excel integrieren
dipl 22.06.2008 - 225 Hits - 1 Antwort
Hinweis
Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..
Neue Einträge
