24. februar 2002 - 17:54Der er
3 kommentarer og 1 løsning
Ændre knap fra en med ja og nej, til en med "cancel only"
Er ved at lave et regneark, har en knap med programkoden:
Private Sub CommandButton1_Click()
Dim sti As String, Navn As String, Måned As String
sti = ActiveWorkbook.Path Måned = MonthName(Month(Date), False) Navn = "Timeregistrering " & Cells(2, 4).Value & " " & Måned
If Cells(2, 4).Value = "" Then If vbNo = MsgBox("Der er ikke angivet et navn!", vbYesNo) Then MsgBox "Fil ikke gemt"
Exit Sub End If End If ActiveWorkbook.SaveAs Filename:=sti & "\" & Navn MsgBox "Fil gemt som " & Navn & " i mappen " & sti Application.Quit End Sub
Jeg har selv prøvet at ændre knappen fra "vbyesno" til "vbcancelonly", men det hjalp ikke. Man må ikke kunne trykke ok/ja/prøv igen/ignorer. Kun Annuller/cancel
De fleste virksomheder har efterhånden bevist, at AI virker.
Pilotprojekter leverer resultater. Medarbejdere bruger generative AI-værktøjer. Nye use cases dukker op på tværs af organisationen.
Udfra det jeg kan læse i programmet, så r der ikke ret meget brugeren kan gøre i den givne situation, hvorfor jeg ville nøjes med følgende stykke kode :
If Cells(2, 4).Value = "" Then MsgBox "Der er ikke angivet et navn!",vbCritical Exit Sub End If
Eftersom brugerene alligevel skal afbryde programmet for at angive et filnavn, så vil det være mest rigtigt på denne måde.
/Xelor
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.