Mam przycisk w moim formularzu, który czyści cały skoroszyt 8-arkuszowy. Chciałbym to od czasu do czasu oczyścić, ale nie chciałbym tego zrobić przez przypadek. Próbowałem googling, ale każdy wynik, który znalazłem zakłada, że mam dużo mocniejsze zrozumienie VBA niż ja. Jak mogę to zrobić po kliknięciu przycisku Otworzy się okno dialogowe z napisem "To wszystko wymazuje! Czy na pewno? [Kontynuuj] [Anuluj]"? Dzięki.Dodaj "Czy na pewno?" do mojego przycisku Excel, jak mogę?
17
A
Odpowiedz
53
Na istniejącego kodu przycisku, wystarczy włożyć tę linię przed zabiegiem:
If MsgBox("This will erase everything! Are you sure?", vbYesNo) = vbNo Then Exit Sub
To zmusi go rzucić wtedy, gdy użytkownik nie ma.
0
Po prostu utwórz niestandardową postać użytkową, która jest wyświetlana po naciśnięciu przycisku "usuń", a następnie połącz przycisk kontynuacji z rzeczywistym kodem usuwającym. Ustaw przycisk Anuluj, aby ukryć formularz użytkownika.
9
Utwórz nowy okręt podwodny z następującym kodem i przypisz go do przycisku. Zmień "DeleteProcess" na nazwę swojego kodu, aby dokonać usunięcia. Spowoduje to wyświetlenie okienka z OK lub Anuluj i zadzwoni do skasowania sub, jeśli trafisz ok, a nie jeśli naciśniesz anuluj.
Sub AreYouSure()
Dim Sure As Integer
Sure = MsgBox("Are you sure?", vbOKCancel)
If Sure = 1 Then Call DeleteProcess
End Sub
Jesse
Powiązane problemy
- 1. Czy na pewno chcesz nawigować?
- 2. Dlaczego nie mogę zmniejszyć szerokości mojego przycisku?
- 3. Dodaj do Laravelcollective ikona przycisku
- 4. Jak ustalić na pewno, czy odpowiedź serwera Node.js została zatrzymana?
- 5. Excel: Naprawiono pozycję przycisku
- 6. Jak dodać urządzenie do mojego profilu informacyjnego?
- 7. VBA Excel: Dodaj jedną sekundę do czasu
- 8. Ominięcie podpowiedzi synchronizacji "Czy na pewno chcesz kontynuować połączenie"
- 9. Dlaczego nie mogę ustawić koloru cienia mojego przycisku?
- 10. Jak mogę użyć vima do konwersji mojego pliku na utf8?
- 11. Jak zwiększyć szybkość mojego przycisku Ajaxa (Jquery + PHP)
- 12. Czy mogę używać wiązań Cocoa do mojego najnowszego projektu?
- 13. Czy mogę użyć mojego ssh-public-key do odszyfrowania pliku?
- 14. Dodaj grafikę w przycisku WPF
- 15. Czy mogę warunkowo dodać klauzulę where() do mojego zapytania knex?
- 16. Wyświetlanie formularza użytkownika programu Excel jako przycisku na pasku zadań
- 17. Czy mogę użyć danych z JTable do mojego raportu Jaspera
- 18. Dodaj dostawcę/zasoby/javascripts do mojego ważnego atutowego szlaku
- 19. Python pandy: Dodaj kolumnę do mojego dataframe że liczy zmienny
- 20. Dodaj funkcję zdefiniowaną przez użytkownika do dodatku Visual Studio Excel
- 21. Dynamicznie zmienia etykietę przycisku wstążki Excel
- 22. Zatrzymaj kursor myszy Excel z migotania na przycisku
- 23. Czy mogę używać Julii do programowania mojego GPU i procesora?
- 24. Czy mogę zmienić tytuł mojego folderu FolderBrowserDialog?
- 25. "Czy na pewno chcesz wydrukować strony X?" okno dialogowe przed faktycznym drukowaniem ... (dla dowolnej aplikacji)
- 26. Dodaj skrót do aplikacji na Androida Do ekranu głównego Na przycisku kliknij
- 27. ręczne wywoływanie kliknięcia() na przycisku, czy mogę przekazać dowolne parametry?
- 28. Jak pominąć "czy na pewno T/N" podczas usuwania plików w plikach wsadowych
- 29. Jak mogę dodać kartę aplikacji do mojej strony na Facebooku?
- 30. Czy mogę utworzyć szablon przycisku Androida?
+1 dokładniej do pracy z wbudowanymi stałymi – brettdj
+1 Zgadzam się z @brettdj. Generalnie lepiej jest używać stałych, aby zapewnić czytelność i łatwość konserwacji. –
+1 Podoba mi się ta odpowiedź, ale mówiąc ściśle: "Jeśli MsgBox (" To wszystko wymazuje, czy jesteś pewien? ", VbOKCancel) = vbOK Wtedy' byłoby bliżej, ponieważ poprosił o przyciski 'Kontynuuj' i' Anuluj' . – JimmyPena