Werte löschen ohne Blatt anzuzeigen

[o0Julia0o]

hi, wie kann ich in Tabelle2 die Felder B3:B5 löschen, ohne dass das Tabellenblatt angezeigt wird?

So wird ja Tabelle2 angezeigt:

Code:

Worksheets("Tabelle2").Select
Range("B3:B5").Select
Selection.ClearContents

[Käpt'n Blaubär]

Hallo Julia,

die einfachste Möglichkeit, mit Application.ScreenUpdating. Wie das funktioniert,
habe ich Dir eigentlich soeben in Deinem Nachbarthread erklärt  :19:  Da komme
ich nämlich gerade her  :05:
Probiere es mal aus.

[WillWissen]

Hi Julia,

Code:

Option Explicit

Sub LoeschenWS2()
   With Worksheets("Tabelle2")
   .Range("B3:B5").ClearContents
   End With
End Sub

Code in 'Diese Arbeitsmappe'. Egal in welchem Blatt du bist; es werden die angegebenen Bereich gelöscht, ohne Tabelle2 zu zeigen (es sei denn, du bist gerade in diesem Blatt).

[Steffl]

Hallo Günter,

Code:

Option Explicit

Sub LoeschenWS2()
   With Worksheets("Tabelle2")
   .Range("B3:B5").ClearContents
   End With
End Sub

Code in 'Diese Arbeitsmappe'.

Ich würde deinen Code in ein allgemeines Modul einfügen, denn in diese Arbeitsmappe hat er eigentlich nichts zu suchen.

[WillWissen]

Hi Stefan,

danke für deine Verbesserung (du weißt ja, VBA und ich...  :32:)
Kannst du mir bitte noch erklären, warum der Code in einem allg. Modul besser aufgehoben ist? Danke dir schon mal.

[RPP63]

Moin Günter!
Bin zwar nicht der Stefan, aber:
In Objekt-Klassen wie Tabelle, Workbook, UserForm sollte auch nur Code stehen, der Bezug zum Objekt hat.
Dazu gehören vor allem Ereignis-Makros.

Hier mal eine korrekte Referenzierung zum Problem des TE:

Code:

Application.ThisWorkbook.Worksheets("Tabelle2").Range("B3:B5").ClearContents

Was im linken Bereich weggelassen werden kann, muss im Zweifel überprüft werden.
Hier reicht sicherlich:

Code:

Worksheets("Tabelle2").Range("B3:B5").ClearContents

Gruß Ralf

[WillWissen]

Hi Ralf,

vielen Dank für die prima Erklärung; das hilft mir sehr.

[o0Julia0o]

jo, danke euch!