Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Anzeige
Inhaltsverzeichnis

Activate vermeiden ?

Forumthread: Activate vermeiden ?

Activate vermeiden ?
03.07.2008 12:45:00
David
Hallo zusammen.
In einem Makro verwende ich folgenden (Teil)Code:

Worksheets("Balance actual").Activate
Columns("H:K").Replace What:="-" & old_month, Replacement:="-" & new_month, LookAt:=xlPart,  _
_
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Columns("L").Replace What:="P" & old_month, Replacement:="P" & new_month, LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False


Kann man das so umschreiben, dass man ohne das Activate auskommt? Alle meine Versuche endeten bisher mit Fehlermeldungen, z. Bsp. das Einbetten innerhalb
with Worksheets("Balance actual").
...
end with
Danke.
Gruß
David

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Activate vermeiden ?
03.07.2008 12:51:00
Hajo_Zi
Hallo David,

Option Explicit
Sub David()
With Worksheets("Balance actual")
.Columns("H:K").Replace What:="-" & old_month, Replacement:="-" & new_month, _
LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
.Columns("L").Replace What:="P" & old_month, Replacement:="P" & new_month, LookAt:= _
xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
End With
End Sub



Anzeige
AW: Activate vermeiden ?
03.07.2008 12:53:21
David
Danke.
Was so ein kleiner Punkt doch ausmachen kann... ;-)
Gruß
David
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
14.05.2026 09:50:42
13.05.2026 19:14:18