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

Zellen auf anderes Tabellenblatt übertragen

Zellen auf anderes Tabellenblatt übertragen
11.07.2003 10:24:42
Johan
Hallo,
ich kann ganze Zeilen in einem Tabellenblatt, welche als Kürzel den Buchstaben A haben, mit folg. Zeichen auf ein anderes Tabellenblatt übertragen. (Schleifen):
If ActiveCell.Value = "a" Then selection.Entirerow.copy
usw.
Ich möchte jedoch, nur bestimmte Zellen aus der ganzen Zeile kopieren!
Kann mir jemand helfen?
Johan

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zellen auf anderes Tabellenblatt übertragen
11.07.2003 11:17:06
RAnton
Hallo Johan,
wenn du alle markierten Zellen z.B. in das Tabellenblatt "Tabelle1" kopieren willst geht das so.

Sub kopiere()
Dim r As Range
Dim i As Integer
i = 1
For Each r In Selection
Sheets("Tabelle1").Cells(i, 1).Value = r.Value
i = i + 1
Next
End Sub

Die Werte werden dann hintereinander in Spalte A eingefügt.
Gruß
RAnton

Anzeige

336 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige