Ausmasszeile mit Tausendertrennzeichen ausdrucken, Variable anpassen

1) Im Format bearbeiten, die Variable "MENGE" aufrufen und den Menüpunkt: VBA-Code ausführen

2) VBA-Editor Fenster geht auf, sämtlichen Code rauslöschen

3) Diesen Code einfügen:

Sub Main
            Dim db as New sbodb
            Dim Value As String
            Value = db.ReportVarValueGet("MENGE")
            Value = Trim(Value)      'Leerstellen entfernen
db.ReportDCTextOutEx2(140,-1,0,0,2,0,Value,0,False,False)       
End Sub

-> auf der Zeile db-ReportDCTextOutEx2(140 kann die XPos angepasst werden, hier ist die XPos 140... 

 

Haben Sie Fragen? Anfrage einreichen