12. februar 2009 - 15:49
Der er
7 kommentarer og 1 løsning
Excel opret pop-up advarsel Ja/Nej
Hej alle Kloge hoveder med lidt tid i overskud. Jeg har brug for en hjælpende hånd. En knap aktiverer en makro, men jeg vil gerne lige give folk mulighed for at være helt sikre inden makroen kører. Så knap 1 aktiverer først MsgBox = " Er du nu helt sikker?" Ja eller Nej?, hvis Ja aktiver Makro, hvis nej luk MsgBox. Jeg har prøvet med: Private Sub Knap1_klik() svar = MsgBox("Er du nu helt sikker"vbYesNo) If svar = vbYes Then Run (Macro5) End If End Sub Meeen det svinger sgu ikke helt. Mvh Morten
Annonceindlæg tema
12. februar 2009 - 16:07
#1
Prøv med If svar = 6
12. februar 2009 - 16:17
#2
Hej Nyhavn 18, Den skal hedde: svar = MsgBox("Er du nu helt sikker", vbYesNo) If svar = vbYes Then Du har ikke komma efter din sætning Mvh Dali
13. februar 2009 - 09:21
#3
Hej Dali Nu har jeg følgende stående tilknyttet knap1 Før stod det som programkode i fanen. Sub Knap_klik1() svar = MsgBox("er du sikker på at du vil slette alt!", vbYesNo) If svar = vbYes Then Run Macro5 End If End Sub Nu kører MSGBox'en men selvom jeg trykker Yes så kører makroen ikke (Makro5) Er jeg tæt på at være der? Morten PS skal der ikke stå noget om hvad der sker hvis man trykker Nej
13. februar 2009 - 09:21
#4
Hej Dali Nu har jeg følgende stående tilknyttet knap1 Før stod det som programkode i fanen. Sub Knap_klik1() svar = MsgBox("er du sikker på at du vil slette alt!", vbYesNo) If svar = vbYes Then Run Macro5 End If End Sub Nu kører MSGBox'en men selvom jeg trykker Yes så kører makroen ikke (Makro5) Er jeg tæt på at være der? Morten PS skal der ikke stå noget om hvad der sker hvis man trykker Nej
13. februar 2009 - 09:22
#5
Hej Dali Nu har jeg følgende stående tilknyttet knap1 Før stod det som programkode i fanen. Sub Knap_klik1() svar = MsgBox("er du sikker på at du vil slette alt!", vbYesNo) If svar = vbYes Then Run Macro5 End If End Sub Nu kører MSGBox'en men selvom jeg trykker Yes så kører makroen ikke (Makro5) Er jeg tæt på at være der? Morten PS skal der ikke stå noget om hvad der sker hvis man trykker Nej
13. februar 2009 - 10:10
#6
Hvorfor ikke skrive det hele3 sammen? Altså koden ind i knappen. Først msgbox'en. Hvis svaret er Ja, kører du de næste linjer, ellers forlader du makroen.
13. februar 2009 - 13:27
#7
Du har helt ret - der mangler lige lidt ekstra, men du er meget tæt på at være der :o) Sub Knap_klik1() svar = MsgBox("er du sikker på at du vil slette alt!", vbYesNo) If svar = vbYes Then Macro5 Else Exit sub End If End Sub Mvh
27. februar 2009 - 12:24
#8
Hej Nyhavn18 - kunne du få det til at virke?
Excel kurser for alle niveauer og behov – find det kursus, der passer til dig