Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 17:40:39
16.10.2025 17:25:38
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Von Spalte x bis y kopieren

Forumthread: Von Spalte x bis y kopieren

Von Spalte x bis y kopieren
05.12.2002 10:33:46
Denise
Hallo
Ich habe folgendes Problem.
Ich möchte einen Wert suchen und wenn der Wert in Spalte B gefunden wird soll in der Zeile die Zellen A bis F kopiert werden.
In meinen Programm wird leider immer nur die ganze Zeile kopiert.

Private Sub CommandButton1_Click()

Dim zeile As Integer, ausgabezeile As Integer
ausgabezeile = 2
Sheets("Tabelle2").Select
With Sheets("Tabelle1")
For zeile = 2 To .Range("B65536:C65536").End(xlUp).Offset(1, 0).Row
If .Cells(zeile, 2).Value = "Wert1" And .Cells(zeile, 3).Value = "Wert2" Then
!!! .Cells(zeile, 2).EntireRow.Copy !!!
ActiveSheet.Range("A" & CStr(ausgabezeile)).Select
ActiveSheet.Paste
ausgabezeile = ausgabezeile + 1
End If
Next zeile
End With
End Sub

Meine Frage: Was muss zwischen den !!! stehen damit nicht die ganze Zeile sondern nur von Sp alte A bis G die Werte kopiert werden.
Um einen Tipp wäre ich euch sehr dankbar.
Mit freundlichen Grüßen
Denise

Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Von Spalte x bis y kopieren
05.12.2002 10:40:59
Hajo_Zi
Hallo Denise
Range(Cells(Zeile, 1), Cells(Zeile, 6)).Copy

Gruß Hajo

Re: Von Spalte x bis y kopieren
05.12.2002 10:47:37
Heinz A. Wankmüller
Hallo Denise,

z.B.so:

Gruß
Heinz

Anzeige
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige