Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
680to684
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
680to684
680to684
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Im bestehenden Makro einen Bereich eingrenzen

Im bestehenden Makro einen Bereich eingrenzen
19.10.2005 10:04:42
Thomas
Hallo Excel Freunde,
ich brauche eure Hilfe.
Das untenstehende Makro kopiert und fügt mir die komplette Zeile ein.
Wie und wo muss ich was einstellen, damit mir nur ein bestimmter Bereich der Zeile kopiert und eingefügt wird.

Sub Schleife()
aRow = [E57].End(xlUp).Row
With Rows(aRow)
.Copy Rows(aRow + 1)
.Copy
.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
End With
Application.CutCopyMode = False
End Sub

Danke für eure Hilfe
Mit freundlichen Grüßen
Thomas

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Im bestehenden Makro einen Bereich eingrenzen
19.10.2005 10:10:00
u_
Hallo,
Für Spalten A:D

Sub Schleife()
aRow = [E57].End(xlUp).Row
With Range(Cells(aRow,1),Cells(aRow,4)
.Copy Cells(aRow,1)
.Copy
.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
End With
Application.CutCopyMode = False
End Sub

Gruß
Geist ist geil!
Danke funktioniert super
19.10.2005 10:18:10
Thomas
Hallo,
danke für die Hilfe.
Die Formel funktioniert super.
MfG
Thomas
Syntaxfehler
19.10.2005 10:28:53
Thomas
Hallo nochmal,
ich hatte gedacht das Makro funktioniert sofort einwandfrei.
Dem war leider nicht so.
Ich bekomme jetzt eine Fehlermeldung mit Syntaxfehler.
Kannst Du da nochmal nachschauen wo der Fehler ist?
Danke für die Hilfe. Ich habe leider keine Ahnung von Makros.
Nochmals Danke für die Hilfe.
MfG
Thomas
Anzeige
AW: Syntaxfehler
19.10.2005 10:48:48
u_
Hallo,
hier
With Range(Cells(aRow, 1), Cells(aRow, 4))
fehlte eine schlißende Klammer.
Gruß
Geist ist geil!
Danke
19.10.2005 11:08:18
Thomas
Danke

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige