Forums Neueste Beiträge
 

Direktbereich löschen

08/11/2008 - 19:46 von Heinz Müller | Report spam
Hi,

blöde Frage:

Gibt es VBA-Code zum Löschen des Direktbereiches?
Habe keine Lust den jedesmal vor einem Makrolauf manuell zu löschen :-)

Danke!

Gruß
Heinz
 

Lesen sie die antworten

#1 Claus Busch
08/11/2008 - 20:04 | Warnen spam
Hallo Heinz,

Am Sat, 8 Nov 2008 19:46:34 +0100 schrieb Heinz Müller:

Gibt es VBA-Code zum Löschen des Direktbereiches?
Habe keine Lust den jedesmal vor einem Makrolauf manuell zu löschen :-)



den Direktbereich kannst du manuell löschen mit STRG+a+Entf.
Wenn du dies per Makro machen willst, bleibt nur SendKeys.
Sub DirektbereichLoeschen()

With Application.VBE.Windows("Direktbereich")
.Visible = True
.SetFocus
SendKeys "^a{DEL}"
End With

End Sub

Wenn du vor dem endgültigen Löschen den Inhalt des Direktbereiches noch
einmal kontrollieren willst, füge eine Stop-Anweisung vor SetFocus ein.
Mit F5 kannst du dann das Makro weiterlaufen lassen.


Mit freundlichen Grüssen
Claus Busch
Win XP Prof SP3 / Vista Ultimate
Office 2003 SP3 / 2007 Ultimate SP1

Ähnliche fragen