Anzeige
Archiv - Navigation
216to220
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
216to220
216to220
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Makro Ablauf beschleunigen

Makro Ablauf beschleunigen
11.02.2003 13:29:42
Jörg
hallo
ich hhabe leider verdrängt wie ich meine Makros vereinfache
damit ich weniger Zeilen habe und auch nebenbei noch den Ablauf beschleunige.

z.B

Rows("1:1").Select
Selection.Delete Shift:=xlUp

kann ich doch auch in einer Zeile ohne den select part machen.
aber wie gesagt ich weiss auf die schnelle nicht mehr wie;-(


unten noch einige beispiele mehr, damit es deutlicher wird

thanx
Jörg



Range("I10:J10").Select
Selection.Merge


For lauf = start_row To ende_row
Range(Cells(lauf, 9), Cells(lauf, 10)).Select
Selection.Merge
Next lauf

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

Betreff
Datum
Anwender
Anzeige
Re: Makro Ablauf beschleunigen
11.02.2003 13:42:50
Michael Scheffler

Hallo,

immer aufs "Select" verzichten!

Gruß

Micha

Re: Makro Ablauf beschleunigen
11.02.2003 13:48:06
Steffen D

Hi,

das geht einfach:

aus:
Rows("1:1").Select
Selection.Delete Shift:=xlUp

wird:
Rows("1:1").Delete Shift:=xlUp

aus:
Range("I10:J10").Select
Selection.Merge

wird:
Range("I10:J10").Merge

aus:
For lauf = start_row To ende_row
Range(Cells(lauf, 9), Cells(lauf, 10)).Select
Selection.Merge
Next lauf

wird:
For lauf = start_row To ende_row
Range(Cells(lauf, 9), Cells(lauf, 10)).Merge
Next lauf

Gruß
Steffen D

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige