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

ohne Select - aber wie

ohne Select - aber wie
06.03.2003 09:40:36
Peter Feustel
Hallo Excel Gemeinde,

wenn ich in eier oder mehreren Zellen Formeln und oder Formate erfasse und diese auf die darunterliegenden Zellen weitergeben möchte, liefert mir der Makro-Rekorder z. B folgendes:

Range("C14:D14").Select
Selection.AutoFill Destination:=Range("C14:D" & intZeile_Ende), Type:=xlFillDefault
Range("C14:D" & intZeile_Ende).Select

Wie kann ich das ohne Select zu verwenden umschreiben?

Für gute Hinweise schon jetzt vielen Dank im voraus.

Gruß, Peter

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: ohne Select - aber wie
06.03.2003 09:46:14
Hajo_Zi

Hallo Peter

wozu das letzte Select da ist hast Du nicht geschrieben.
Range("C14:D14").AutoFill Destination:=Range("C14:D25"), Type:=xlFillDefault


Gruß Hajo

Re: ohne Select - aber wie
06.03.2003 09:46:54
Nepumuk

Hallo Peter,
so:

Range("C14:D14").Copy Range("C15:D" & intZeile_Ende)

Gruß
Nepumuk

Re: ohne Select - aber wie
06.03.2003 09:48:56
MikeS

Hi Peter,

mit Activate anstatt Select gehts auch.

In größeren Bereichen kommst Du aber an einer Schleife nicht vorbei.

Ciao MikeS



Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige