Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1324to1328
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Blätter markieren ausser, dann Inhalte löschen

Blätter markieren ausser, dann Inhalte löschen
21.08.2013 09:28:36
Conny
Guten Tag
in meiner Arbeitsmappe sind zwischen 20 und 40 Tabellen.
Ich suche ein Makro (leider im Archiv nix passendes gefunden) das folgendes macht.
Alle Blätter ausser Info, Total und Text markieren, dann von D9:E17 markieren,
die Inhalte löschen, dann alle Blätter wieder DE-markieren.
Ich habe es versucht mit dem Makrorekorder geht das nicht so richtig.
Conny

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Blätter markieren ausser, dann Inhalte löschen
21.08.2013 09:41:48
Matthias
Hallo
Option Explicit
Sub conny()
Dim wks As Worksheet
For Each wks In ThisWorkbook.Worksheets
If wks.Name  "Info" And wks.Name  "Total" And wks.Name  "Text" Then
With wks
.Range("D9:E17").ClearContents
End With
End If
Next
End Sub
dann alle Blätter wieder DE-markieren.
versteh ich nicht.
Gruß Matthias
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige