Fremdrechnungen, ustva, etc.

2025-03-28 10:24:50 +01:00
parent 9a53d427f5
commit 19dc242ce6
3 changed files with 8 additions and 8 deletions
--- a/SDL/USTV/frmMDM_USTVAntrag.vb
+++ b/SDL/USTV/frmMDM_USTVAntrag.vb
@@ -1718,7 +1718,7 @@ Public Class frmMDM_USTVAntrag

            If dgvUSTVPositionen.SelectedRows.Count > 0 Then
                Dim nummerierung As Boolean = False
-                nummerierung = MsgBox("Soll eine Nummerierung auf den PDF Dokumenten angegeben werden?", vbYesNoCancel)
+                If vbYes = MsgBox("Soll eine Nummerierung auf den PDF Dokumenten angegeben werden?", vbYesNoCancel) Then nummerierung = True


                For Each row As DataGridViewRow In dgvUSTVPositionen.SelectedRows.Cast(Of DataGridViewRow)().OrderBy(Function(dgvr) dgvr.Index)