Welcher Code wird schneller verarbeitet

Forumthread: Welcher Code wird schneller verarbeitet
2 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Welcher Code wird schneller verarbeitet

chandler

Hallo,
mich beschaeftigt eine grundsaetzliche Frage: Welch der beiden Codes wird schneller verarbeitet?

Private Sub ldl_color ()
lbl1.ForeColor = vbBlack
lbl2.ForeColor = vbBlack
lbl3.ForeColor = vbBlack
lbl48.ForeColor = vbBlack
End Sub

oder

Private Sub ldl_color ()
With ActiveSheet
For l = 1 To 48
Me.Controls("lbl" & l).ForeColor = vbBlack
Next l
End With
End Sub

Sind die beiden Codes gleichwertig?
Welchen von den beiden sollte ich nehmen?
Vorab vielen Dank. Gruesse chandler

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Benutzer

AW: Welcher Code wird schneller verarbeitet

ransi
AW: Welcher Code wird schneller verarbeitet

chandler

AW: Welcher Code wird schneller verarbeitet

27.12.2011 23:31:37

ransi

Hallo
Probiers mal aus ;-)

Option Explicit

Public Sub machs()
    Dim t As Double
    t = Timer
    lbl1.ForeColor = vbBlack
    lbl2.ForeColor = vbBlack
    lbl3.ForeColor = vbBlack
    '...
    '....
    '....
    lbl48.ForeColor = vbBlack
    MsgBox Timer - t
End Sub

Private Sub ldl_color()
    Dim t As Double
    t = Timer
    With ActiveSheet
        For l = 1 To 48
            Me.Controls("lbl" & l).ForeColor = vbBlack
        Next l
    End With
    MsgBox Timer - t
End Sub

ransi

AW: Welcher Code wird schneller verarbeitet

28.12.2011 12:32:36

chandler

Hallo ransi,
ist voll Jacke wie Hose von der Zeit.
Vielen Dank. Gruesse Chandler