Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1212to1216
1212to1216
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

jede zeile um vier verschieben

Forumthread: jede zeile um vier verschieben

jede zeile um vier verschieben
amintire
Hallöchen alle zusammen,
wie kann ich am besten jede Zeile um vier Zeilen verschieben?
Klingt komisch aber benötige es dringend.
Danke Gruß Amina
Anzeige

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: jede zeile um vier verschieben
28.04.2011 15:08:52
Daniel
Hi
probiers mal mit
Range("1:4").Insert
wenn das nicht hilft, präzisier nochmal deine Problembeschreibung.
Gruß, Daniel
AW: jede zeile um vier verschieben
28.04.2011 15:10:24
amintire
Hallo Daniel,
wie gebe ich den code ein?
Sub versch()
range("1:4").insert
End 


Sub
Gruß Amina
Anzeige
AW: jede zeile um vier verschieben
28.04.2011 15:18:53
Daniel
ja, wenn du End Sub in eine Zeile schreibst.
Gruß, Daniel
AW: jede zeile um vier verschieben
28.04.2011 15:09:44
Uppe
Hallo Amina,
alles was verschoben werden soll markieren, Rand anfassen, um 4 Zeilen verschieben.
Gruß Uppe
AW: jede zeile um vier verschieben
28.04.2011 15:16:53
amintire
Hallo Uppe,
verstehe nicht so ganz was mit Rand anfassen gemeint ist, funktioniert irgendwie nicht.
Es müssen wirklich ab Zeile1 - Zeile 2737 jede Zeile um vier verschoben werden.
Was in Zeile 2 stand steht dann in Zeile 6, Zeile 3 steht dann in Zeile 11 usw.
Das mit dem Code funktioniert auch nicht, der macht mir nur die ersten vier Zeilen frei.
Gruß Amina
Anzeige
AW: jede zeile um vier verschieben
28.04.2011 15:38:40
Daniel
Hi
ok, jetzt ist auch klar, was du willst.
gehe mal so vor.
1. nimm die erste freie Spalte am Ende der Daten (z.B. Spalte X) und trage in die erste Zeile eine 1 ein
2. trage in die 2. Zeile der Spalte X eine 2 ein
3. markiere beide Zellen. in der unteren rechten Ecke der Markierung ist ein kleines Rechteck. Dieses Klickst du an und ziehst es bei gedrückter Maustaste bis zur letzten befüllten Zeile 2737.
wenn in der Spalte links daneben alle Zellen befüllt sind, reicht auch ein Doppelklick auf das kleine Rechteck des Markierungsrahmens.
jetzt sollte in der Spalte X in jeder Zelle die Zeilennummer stehen.
4. kopiere die Zellen X1-X2737 und füge sie direkt darunter wieder ein (in X2738).
das wiederholst du 4x, bis die Spalte X bis zur Zeile 13685 gefüllt ist (jede Zahl von 1-2737 sollte 5x vorkommen)
5. sortiere jetzt die ganze Tabelle nach der Spalte X
6. lösche die Spalte x wieder.
Gruß, Daniel
Anzeige
AW: jede zeile um vier verschieben
28.04.2011 15:15:53
Rudi
Hallo,
so? 
Sub yyyy()
Dim lngRow As Long
Application.ScreenUpdating = False
For lngRow = Cells(Rows.Count, 1).End(xlUp).Row To 2 Step -1
Cells(lngRow, 1).Resize(3).EntireRow.Insert
Next
End Sub

Gruß
Rudi
AW: Perfekt Rudi ;))
28.04.2011 15:18:02
amintire
Hallo Rudi,
perfekt, genau so. Vielen lieben Dank.
Hast mir echt geholfen.
Gruß Amina
Anzeige
;

Forumthreads zu verwandten Themen

Zeilen in Zellen suchen und löschen
Daniel

Hallo,
ich möchte in Excell mehrere Zelle suchen, die folgenden String in einer oder mehreren Zeilen enthalten: ----
Diese Zeilen möchte ich dann löschen. Nach diesem String sind noch weitere Zeichen vorhanden, die auch gelöscht werden sollen.
Weiß jemand wie ich am besten vorgehe?...
13.08.2008 12:52:02
Thread-ID: 1001495
9 Beiträge
Anzeige
Zeile ausblenden, wenn in einer Zelle ein bestimmt
Jakob

Hallo,
Ich habe folgendes Problem:
Ich möchte in den Tabellenblatt "Form3" die zeilen 39-50 ausblenden wenn die Zelle A37 ungleich "Pentax" und "Ciclox" ist. Der Wert der Zelle A37 kommt aus der Eingabe im Tabellenblatt "Eingabemaske" (B7).
Wie müßte der entsprechende VBA-Code ausse...
03.09.2008 17:24:21
Thread-ID: 1007176
6 Beiträge
Zeile kopieren wenn wert in Zelle
Andreas

hallo zusammen
in der recherche habe ich diesen code gefunden. da ich jedoch alle zeilen bei welchen in der zelle der spalte h ein "x" steht in ein anderes tabellenblatt kopieren möchte muss ich den code anpassen. nun weiss ich leider nicht was ich verändern muss. wäre super, wenn mir das j...
07.09.2008 20:32:00
Thread-ID: 1008007
3 Beiträge
Nicht leere Zellen in einer Zeile finden
Andreas

Hallo Zusammen,
Bisher kam ich ohne VBA zurecht, aber ich denke nun ...
Ich habe eine Tabelle mit folgendem Aufbau
Tabelle1:
ABCDEFG
115789
2__z_z
3zz___
4z__z_
Zeile 1: enthält eine Bezeichnung (hier als Zahl dargestellt)
z=Zahl
_=leer
in einem n...
29.09.2008 14:20:42
Thread-ID: 1013111
5 Beiträge
erzwungener zeilenumbruch in Zelle
Lars

Hallo,
obwohl ich schon viel mit Excel gemacht habe, tauchen doch immer wieder Fragen auf:
Gibt es eine Möglichkeit, in einer Zelle einen Zeilenumbruch manuell einzufügen, ohne dass man bereits am Zellenende ist?
Ich denke, dass ist eine eher dumme Frage, aber ich habe derzeit keine...
02.10.2008 15:40:00
Thread-ID: 1013906
4 Beiträge
Tasten während der Eingabe in einer Zelle abfragen
Arthur

Hallo.
Wie kann man in Excel auf die Eingabe in einer Zelle schon beim Tastendruck reagieren?
Beispiel: Schon während der Eingabe von Werten soll reagiert werden. Bspw. ist eine fünfstellige Bestelnummer einzutragen. Nachdem fünf Ziffern eingetragen sind soll automatisch in die nächste...
22.10.2008 11:44:52
Thread-ID: 1018286
4 Beiträge
Zeilen ausblenden, außer wenn in Zelle ...?
Selma

Hallo Leute,
ich möchte mit einem CommandButton ab Zeile 4 die Zeilen wie folgt ausblenden:
- wenn in Spalte M die Zelle diesen "plt" Inhalt hat, dann soll die Zeile nicht ausgeblendet werden
- wenn in Spalte M die Zelle die Füllfarbe 15 hat., dann soll die Zeile nicht ausgeblendet...
27.10.2008 18:13:00
Thread-ID: 1019700
10 Beiträge
Zweite Zeile Einfügen bis letztem Wert
Andreas

Hallo Zusammen
Das nachstehende Makro habe ich im Forum gefunden. Funktioniert einwandfrei. Nun möchte ich einfach, dass die jeweils zweite Zeile nur bis zum letzten Wert in Spalte R eingefügt wird.
Kann mir jemand helfen?
Vielen Dank
Andreas
Sub ZweiteZeilenEinfuegen() D...
05.11.2008 08:07:54
Thread-ID: 1021750
3 Beiträge
Zelleninhalt in Kopfzeile Seitenansicht zeigen?
Heiner

Hallo Forum,
ich bin Excel-Neueinsteiger habe ein grosses Problem...
In der Kopfzeile (Mitte) einer Seitenansicht soll automatisch der Eintrag aus Tabelle1 / Zelle B3 angezeigt werden.
Ist das möglich? Und wenn ja, wie kann das realisiert werden?
Wer kann mir mit einem Formel- o...
05.11.2008 12:10:35
Thread-ID: 1021845
2 Beiträge
jede zweite Zeile bearbeiten/löschen
Martin

Hallo zusammen,
ich muss bei einer recht umfangreichen Datei je zwei Zeilen zusammenfassen.
Dafür bei zweiter Zeile:
Kopieren der Werte von Spalte A bis Spalte J, die Werte in der vorigen Zeile ab Spalte K einfügen, so dass nachher die Zellen A-T belegt sind. Nicht jede Zelle ist hi...
15.11.2008 14:35:07
Thread-ID: 1024767
5 Beiträge
Zeilen kopieren wenn wert in Zelle
Andreas

hallo zusammen
finde für meine herausforderung nichts passendes in der recherche. :-(
ich habe eine tabelle1 mit diversen Einträgen. die Spalten AC, AD, AE enthalten jeweils ein Datum (ist jedoch nicht in jeder Zeile der Fall)
Nun möchte ich folgende Schritte automatisieren
Erst...
24.11.2008 17:08:00
Thread-ID: 1027397
3 Beiträge
hochzählen in einer Zelle
Tobias

Guten Morgen zusammen,
ich möchte in einer Zelle einen Wert "hochzählen" lassen. Also z.B. in Zelle A1 soll jeweils alles zusammen addiert werden was in Zelle B1 eingegeben wurde.
Ich hoffe das ist einigermaßen verständlich...
Vielen Dank im Voraus für Eure Tipps!
20.12.2008 10:26:00
Thread-ID: 1034350
12 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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