Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 12:09:19
Unique (Application.WorksheetFunction.Unique)
19.04.2024 11:51:37
Nächsten identischen Treffer suchen
19.04.2024 11:45:34
Feld im SAP auslesen
19.04.2024 10:59:29
Datei Auswählen und öffnen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1436to1440
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
1436to1440
1436to1440
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Liste

Liste
27.07.2015 16:51:52
Patrik
Hallo liebes Forum,
ich möchte wissen, ob es eine Möglichkeit gibt, den Cursor per VBA in einer Spalte zur nächsten Zelle mit ungleichem Inhalt springen zu lassen und dort dann zB. 2 Leerzeilen einzufügen. Das Ganze ist natürlich variabel.
A
1 AAA - also von hier
2 AAA
3 AAA
4 BBB - nach hier :)
5 BBB
Im Voraus vielen Dank für eure Hilfe!
Gruß
Patrik

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Liste
27.07.2015 17:02:48
Daniel
Hi
nein, diese Möglichkeit gibt es nicht.
wenn die Liste nach spalte A nicht nur Gruppiert, sondern auch sortiert ist, dann kannst du auch so vorgehen:
1. Spalte A in die nächste und übernächste freie Spalte kopieren (du hast zwei kopien von A)
2. in der zweiten kopie die Duplikate entfernen (da muss ich einem Profi hoffentlich nicht erklären wie das geht)
3. jetzt die Werte aus der zweiten Spalte unter die erste Spalte kopieren und das ganze so oft wiederholen, wie du leerspalten haben willst.
deine Tabelle sollte jetzt so aussehen:
AAA AAA AAA
AAA AAA BBB
AAA AAA
BBB BBB
BBB BBB
___ AAA
___ BBB
___ AAA
___ BBB
4. jetzt sortierst du die ganze tabelle nach der ersten Hilfsspalte (also nach der unter der du die Werte aus der 2. Hilfsspalte eingefügt hast
5. Lösche dann die beiden Hilfsspalten.
Per VBA kann man das dann genauso machen.
Da das ganze ja nur eine Abfolge von Excelfunktionen ist, kann man sich zum Grossen Teil vom Recorder bei der der Erstellung des codes helfen lassen.
Gruß Daniel

Anzeige
AW: Liste
27.07.2015 17:31:02
Michael
Hi Patrik,
programmieren kann man viel, aber in dem Fall ist die Frage, wie das zu bedienen sein soll.
Die simpelste Variante ist ein Tastenkürzel, wobei das hinterlegte Makro dann von der gerade aktiven Zelle aus den nächsten, anderen Wert sucht und dorthin springt.
Hier das Makro:
Sub springen()
Dim wert As Variant
Dim c As Range
Dim z As Long
z = Cells(Rows.Count, ActiveCell.Column).End(xlUp).Row
wert = ActiveCell.Value
Set c = ActiveCell
While c.Value = wert And c.Row
Happy Exceling,
Michael
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige