Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
796to800
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
796to800
796to800
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Sicherheitsabfrage: WIRKLICH LÖSCHEN?

Sicherheitsabfrage: WIRKLICH LÖSCHEN?
31.08.2006 00:31:54
Peter
Hallo zusammen,
ich benötige eure Hilfe bei diesem Problem:
Ich hab diesen Code zum Zeilen löschen...

Sub zeile_loeschen()
ActiveCell.EntireRow.Delete
End Sub

Wie erzeuge ich hierzu eine Sicherheitsabfrage,
die mit JA oder NEIN beantwortet werden kann,
um die Zeile zu löschen oder um die Zeile NICHT zu löschen?
Gruss
Peter

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Sicherheitsabfrage: WIRKLICH LÖSCHEN?
Orakel
Hallo Peter,
so?
Sub Abfrage_loeschen()
Dim i As Byte
    i = MsgBox("Möchten Sie wirklich die Einträge löschen ?", _
      vbYesNo + vbQuestion, _
      "Frage an " & Application.UserName & ":")
    If i <> vbYes Then Exit Sub
    ActiveCell.EntireRow.Delete
End Sub
Grüße
Orakel
Anzeige
AW: Sicherheitsabfrage: WIRKLICH LÖSCHEN?
31.08.2006 13:08:50
Peter
@ Orakel,
Danke schön, genau so!!!
Gruss
Peter
AW: freut mich 0.T.
Orakel

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige