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 / Tabellenkalkulation
Tabellenkalkulation
Fragevon little-key vom 05.09.2021, 16:51 Options
Excel VBA: Seitenumbruch bei bestimmtem Wert.
Hallo an Alle,
hier kurz und bündig mein Problem:
Ich habe eine Tabelle mit ca. 900 Zeilen.
In Spalte D gibt es in unregelmäßige Abständen (mal nach 5 Zeilen, mal nach 60 Zeilen) einen Feldeintrag: -99.
Diese "-99" sagt mir, ab hier müsste eine neue Seite beginnen.
Wie lautet der Makroeintrag dazu?
Was noch wichtig wäre: Nachdem die Seitenumbüche dann vollzogen wären, wird die Spalte D gelöscht. D. h. der Bezug -99 existiert dann nicht mehr, die Seitenumbüche müssen aber erhalten bleiben.
Hoffe, habe mich glücklich ausgedrückt.
Benötige dringend Hilfe dazu.
Vielen Dank im voraus.
hier kurz und bündig mein Problem:
Ich habe eine Tabelle mit ca. 900 Zeilen.
In Spalte D gibt es in unregelmäßige Abständen (mal nach 5 Zeilen, mal nach 60 Zeilen) einen Feldeintrag: -99.
Diese "-99" sagt mir, ab hier müsste eine neue Seite beginnen.
Wie lautet der Makroeintrag dazu?
Was noch wichtig wäre: Nachdem die Seitenumbüche dann vollzogen wären, wird die Spalte D gelöscht. D. h. der Bezug -99 existiert dann nicht mehr, die Seitenumbüche müssen aber erhalten bleiben.
Hoffe, habe mich glücklich ausgedrückt.
Benötige dringend Hilfe dazu.
Vielen Dank im voraus.
Antwort 1 von coros vom 05.09.2021, 17:04 OptionsLösung
Hallo little-key,
das geht z.B. mit nachfolgendem Makro. Das Makro fügt Dir immer unterhalb des Wertes "-99" einen Seitenumbruch ein.
Kopiere das Makro in ein StandardModul und starte es z.B. über eine Befehlsschaltfläche
Teste das Makro aber bitte in einer Testdatei und nicht gleich in Deiner Originaldatei.
Solltest Du nicht wissen, wie Du den Code in Deine Datei bekommst, dann schau mal auf meiner HP in der Rubrik Anleitungen und dort dann in der Anleitungsnummer 3 nach. Dort stelle ich dazu eine bebilderte Anleitung zur Verfügung, die Dir sicherlich helfen wird.
Bei Fragen melde Dich.
MfG,
Oliver
Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du
ein Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.
das geht z.B. mit nachfolgendem Makro. Das Makro fügt Dir immer unterhalb des Wertes "-99" einen Seitenumbruch ein.
Kopiere das Makro in ein StandardModul und starte es z.B. über eine Befehlsschaltfläche
Teste das Makro aber bitte in einer Testdatei und nicht gleich in Deiner Originaldatei.
Option Explicit
Sub Seitenumbruch_einfuegen()
Dim lngRow As Long
For lngRow = 1 To ActiveSheet.Cells(Rows.Count, 4).End(xlUp).Row
If Cells(lngRow, 4) = "-99" Then _
ActiveWindow.SelectedSheets.HPageBreaks.Add Before:=Cells(lngRow + 1, 1)
Next
End SubSolltest Du nicht wissen, wie Du den Code in Deine Datei bekommst, dann schau mal auf meiner HP in der Rubrik Anleitungen und dort dann in der Anleitungsnummer 3 nach. Dort stelle ich dazu eine bebilderte Anleitung zur Verfügung, die Dir sicherlich helfen wird.
Bei Fragen melde Dich.
MfG,
Oliver
Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du
ein Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.
Antwort 2 von little-key vom 05.09.2021, 17:18 Options
Man, so schnell hatte ich ja keine Lösung erwartet.
Ganz dollen Dank an Oliver dafür und es funktionierte auf Anhieb.
Ganz dollen Dank an Oliver dafür und es funktionierte auf Anhieb.
Ähnliche Themen
VBA + Bereichsabfrage (wert)
seebaer_1 29.02.2008 - 54 Hits - 4 Antworten
VBA Makro bei best. Wert ganze Zeile färben
timodeere 01.09.2008 - 40 Hits - 5 Antworten
Excel: einen Wert entsprechend eines Suchkriteriums suchen und einen in der jeweiligen Spalte darunter liegen Wert darstellen
walfon 20.10.2008 - 68 Hits - 5 Antworten
VBA ganauen Wert suchen
fedjo 01.02.2009 - 228 Hits - 12 Antworten
VBA - Inhalt (Wert) per Shortcut einfügen
Tomschi 04.03.2009 - 273 Hits - 2 Antworten
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
