Codeoptimierung zur Vermeidung "Activate"
26.05.2008 14:31:59
David
da ich ja meine VBA-Kenntnisse weiter ausbauen will, eine kleine Frage.
Wie ich weiter unten in den 'No-Goes' gelesen habe, soll man Select und Activate weitestgehend vermeiden. Das mit Select bekomme ich schon ganz gut hin, nur das mit dem Activate umgehen klappt noch nicht so ganz.
Folgender einfacher Code:
Sub auto_close()
For i = 1 To 4
ActiveWorkbook.Sheets(i).Activate
Range("E1").Value = "TEAM"
Next
End Sub
Ich hatte es erst mit "With ActiveWorkbook..." versucht, aber da hat er immer nur das aktuell aktivierte Tabellenblatt genommen. Mit .Activate klappts nun zwar, aber es geht doch bestimmt noch "profihafter" - oder?
Gruß
David