Anzeige
Archiv - Navigation
964to968
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
964to968
964to968
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Makro Zellen löschen

Makro Zellen löschen
10.04.2008 21:32:36
Sprekelmeyer
Hallo Excel Fans,
habe zwei Makros. Das eine startet über einen Button das andere Starte ich über Makro ausführen in Excel. Eigentlich sollten beide das Gleiche machen. (Selber Code). Das erste funktioniert das über Buttonstarten aber nicht. Wo ist mein Fehler?
Hier mal die beiden Makros.
Makro 1 funktioniert
Sub Makro2()
'
' Makro2 Makro
' Makro am 10.04.2008 von Privat Paula aufgezeichnet
'
'
Sheets("Tabelle2").Select
Range("A1").Select
Selection.ClearContents
Sheets("Tabelle3").Select
Range("A1").Select
Selection.ClearContents
Sheets("Tabelle1").Select
Range("B3").Select
Selection.ClearContents
Range("B5").Select
Selection.ClearContents
Range("B22").Select
End Sub


Makro 2 funktioniert nicht


Private Sub CommandButton1_Click()
Sheets("Tabelle2").Select
Range("A1").Select                                  (Ab hier Laufzeitfehler 1004)
Selection.ClearContents
Sheets("Tabelle3").Select
Range("A1").Select
Selection.ClearContents
Sheets("Tabelle1").Select
Range("B3").Select
Selection.ClearContents
Range("B5").Select
Selection.ClearContents
End Sub


Kann mir jemand das erklären ggf. lösen.
Danke schon mal.
MfG
Einzel

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Makro Zellen löschen
10.04.2008 21:49:00
Heinz
Hi,

Private Sub CommandButton1_Click()
Call Makro1
End Sub


mfg Heinz

AW: Makro Zellen löschen
10.04.2008 21:57:54
Sprekelmeyer
OK danke erstmal. So würde es klappen.
Aber wieso funktioniert es nicht direkt wie ich es geschrieben habe?
MfG

AW: Makro Zellen löschen
10.04.2008 22:30:00
Heinz
Hi,
select heißt das nicht erforderliche Übel:
Sheets("Tabelle2").Range("A1").ClearContents
Sheets("Tabelle3").Range("A1").ClearContents
Sheets("Tabelle1").Range("B3,B5").ClearContents
mfg Heinz

AW: Makro Zellen löschen
11.04.2008 22:03:02
Sprekelmeyer
Cool verstanden. Danke
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige