beim makro start möchte ich die frage stellen: wollen sie löschen ja nein bei ja weiter - bei nein abbruch
Office - Word, Excel und Co. 9.702 Themen, 40.796 Beiträge
user_244412 
REPI „Und Deine konkrete Frage ist ? Wie sieht Dein bisheriger Script aus ?“
Hallo, mein Makro startet beim kliken auf einen Button. Ich möchte absichern, daß zuerst die Frage kommt: wirklich löschen ?? es gehen alle Daten in diesem Arbeitsblatt verloren!!!! "ja" "nein" - Wenn ja, weiter - wenn nein Abbruch, kein Makrostart.
Danke
mfg Alfred
Sub Lö()
'
' Lö Makro
'
'
Rows("10:36").Select
ActiveWorkbook.Worksheets("MB").Sort.SortFields.Clear
ActiveWorkbook.Worksheets("MB").Sort.SortFields.Add Key:=Range("A10:A36"), _
SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
With ActiveWorkbook.Worksheets("MB").Sort
.SetRange Range("A10:AK36")
.Header = xlGuess
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With
ExecuteExcel4Macro "PRINT(1,,,1,,,,,,,,2,,,TRUE,,FALSE)"
Range("H5:N5").Select
Selection.ClearContents
Range("A10:A36").Select
Selection.ClearContents
Range("F10:AJ36").Select
Selection.ClearContents
End Sub
