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

2.Versuch Kopieren/Einfügen

2.Versuch Kopieren/Einfügen
20.01.2004 16:39:00
Rainer Löffler
Mit einem CommandButten soll unter anderem ein Zellbereich (A55:I64) in ein Blatt
("Ereignisprotokoll") in der selben Arbeitsmappe kopiert werden.
Bedingung:
1. Wenn der Zellbereich leer ist - nicht kopieren
2. Das einfügen muß mit dem aktuellen Datum und Zeit versehen sein
3. Das Einfügen soll in chronologischer Reihenfolge erfolgen
und immer in Spalte "A" erfolgen

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

Betreff
Datum
Anwender
Anzeige
AW: 2.Versuch Kopieren/Einfügen
20.01.2004 17:02:06
Beni
Hallo Rainer,
versuche es mit diesem Code.
Gruss Beni

For i = 55 To 64
If Cells(i, 1) <> "" Then
With Sheets("Ereignisprotokoll")
r = .Cells(Rows.Count, 1).End(xlUp).Row + 1
Range(Cells(i, 1), Cells(i, 9)).Copy Destination:=.Cells(r, 1)
End With
End If
Next i
AW: an Benni
20.01.2004 17:24:11
Rainer
Danke für schnelle Antwort,
läuft noch nicht
In der ersten Zeile "For i=55To64"
kommt Fehler beim Kompilieren Erwarte: To
Hab ich was falsch gemacht ?
AW: an Benni
20.01.2004 17:39:57
Beni
Hallo Rainer,
bei mir läuft problemlos, Du versuchen
Dim i As Long
voranzustellen.
Gruss Beni
AW: an Benni
20.01.2004 17:46:25
y
hi Rainer,
In der ersten Zeile "For i=55To64" <--for i = 55 to 64
leezeichen vergessen
cu Micha
Anzeige
AW: 2an Benni
20.01.2004 18:00:57
Rainer Löffler
Nächstes Problem ( ich weiß, das ich nerve)
Kompilierungsfehler bei
"r = .Cells...
AW: an cuMicha
20.01.2004 18:03:44
Rainer Löffler
Danke Micha
habs geffressen,lief aber trotzdem nicht
AW: an cuMicha
20.01.2004 18:10:10
y
hi Rainer,
ich gehe mal davon aus die zeilen
Dim i as Integer
Dim r as Integer
fehlen noch
cu Micha
p.s. cu ist eine verballhornung des englischen "see you"
AW: an cuMicha
21.01.2004 07:59:29
Rainer Löffler
Danke cuMicha,
leider kann ich es nicht mehr testen, da ich für 8 Tage weg bin.
Wenns klappt hast Du was gut.
Gruß
Rainer

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige