Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 18:04:29
18.04.2024 16:33:24
Anzeige
Archiv - Navigation
632to636
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
632to636
632to636
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Löschen bestätigen (Makro)
05.07.2005 14:38:55
Mike
Hallo!
Ich hab folgendes Makro, das auf Knopfdruck einen Bereich in einer Tabelle löschen soll:

Private Sub CommandButton1_Click()
' Löschen Makro
' Makro am 05.07.2005 von XX aufgezeichnet
Range("A7:R103").Select
ActiveWindow.SmallScroll Down:=-111
Selection.ClearContents
Range("A7").Select
End Sub

ICh möchte nun, dass vor dem Löschen per Dialogbox eine Bestätigung angefodert wird, nach dem Motto "Wirklich löschen?" und einem OK / Abbrechen Button!
Konnte das früher selbst mal...aber 's ist zu lang her... ;-)
Danke und Gruß
M

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

Betreff
Datum
Anwender
Anzeige
AW: Löschen bestätigen (Makro)
05.07.2005 14:46:38
Matthias
Hallo Mike,
Private Sub CommandButton1_Click()
' Löschen Makro
' Makro am 05.07.2005 von XX aufgezeichnet
If MsgBox("Wirklich löschen?", vbQuestion + vbYesNo, "Bereich löschen") = vbYes Then
Range("A7:R103").ClearContents
Range("A7").Select 'kannst du eigentlich weglassen
End If
End Sub

Gruß Matthias
Thanx a lot!
05.07.2005 14:52:42
Mike
Oh....so einfach - aber lang, lang ists her!
Trotzdem 1000 Dank
M
Anzeige

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige