von mike6 » Mi, 08.03.2006 07:53
Hallo,
ich habe noch eine Nachfrage.
Mit dem Makro :
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Sub Daten_in_Vordruck_uebernehmen
Dim oSheet as Object
' Sheet Seite1 oSheet zuweisen
oSheet = ThisComponent.Sheets.getByName("Seite1")
' Daten eintragen in Zelle E59 1 VORSCHUSS ***** Die Daten werden als "Zahl" übernommen *****
oSheet.getCellbyPosition(4,58).Value = Int(oDialog.GetControl ("NumericField9").getText())
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Das Numeric Feld ist formatiert:
Min.Wert = 0,00
Max.Wert = 100.000,00
Wenn ich in das Basic Fenster 30.000,00 eingebe und das Makro starte,
steht in der Zelle E 59 statt 30.000,00 nur 30.
Es wird also das Zahlenformat geändert.
Kann ich das Zahlenformat noch im o.a. Makro unterbringen ""
mfg
mike6
Hallo,
ich habe noch eine Nachfrage.
Mit dem Makro :
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Sub Daten_in_Vordruck_uebernehmen
Dim oSheet as Object
' Sheet Seite1 oSheet zuweisen
oSheet = ThisComponent.Sheets.getByName("Seite1")
' Daten eintragen in Zelle E59 1 VORSCHUSS ***** Die Daten werden als "Zahl" übernommen *****
oSheet.getCellbyPosition(4,58).Value = Int(oDialog.GetControl ("NumericField9").getText())
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Das Numeric Feld ist formatiert:
Min.Wert = 0,00
Max.Wert = 100.000,00
Wenn ich in das Basic Fenster 30.000,00 eingebe und das Makro starte,
steht in der Zelle E 59 statt 30.000,00 nur 30.
Es wird also das Zahlenformat geändert.
Kann ich das Zahlenformat noch im o.a. Makro unterbringen ""
mfg
mike6