fix buttons for app.alert() on VBA/remote

xlwings · Aug 22, 2022 · 5d8bb28 · 5d8bb28
1 parent 6642f78
commit 5d8bb28
Show file tree

Hide file tree

Showing 2 changed files with 1 addition and 1 deletion.
diff --git a/xlwings/addin/Remote.bas b/xlwings/addin/Remote.bas
@@ -515,7 +515,7 @@ Sub alert(wb As Workbook, action As Dictionary)
 
     Select Case myButtons
     Case "ok"
-        myStyle = VBA.vbOK
+        myStyle = VBA.vbOKOnly
     Case "ok_cancel"
         myStyle = VBA.vbOKCancel
     Case "yes_no"

diff --git a/xlwings/addin/xlwings.xlam b/xlwings/addin/xlwings.xlam