https://bugs.documentfoundation.org/show_bug.cgi?id=166232

--- Comment #10 from Cameron <[email protected]> ---
(In reply to Mike Kaganski from comment #9)

Friend, your first comment was made obsolete for good reasons, I was not
expecting another helpless comment like this one from you.

Obviously I searched the internet and the Document Foundation's resources for
an answer and even posted on forums. If, despite my best efforts to find an
error in my work (which is sourced from the available theory), I still get an
error, then considering a bug in the LibreOffice app would not be
inappropriate.

But I shall remain polite and answer your comment without repeating things
already written which would make the whole thing confusing.

1- comment #0 provides a complete description of the bug and includes my
detailed arguments about why simplifying the use of punctuation in LibreOffice
would be welcomed.

2- comment #4 details how the bug occurs, alongside the GIF that adds a visual
aid to better understand the issue at hand.

3- Testing is an art and should follow strict guidelines in order to understand
the issue at hand. If I changed environment between these tests then I would
have added that information. So yes, I'm still using 24.8.6.2 for now.

4- Here is a simplified version of the script as requested:

'//----------------------------------------------------//
Sub Macro
        '--DECLARING VARIABLES
        Dim MyDoc As Object
        Dim MySheet As Object
        Dim FieldA_string As String
        Dim FieldB_string As String
        MyDoc = ThisComponent
        MySheet = MyDoc.Sheets.getByName("SHEET")

        '--RETRIEVING DATA FROM DIALOGBOX. "FieldA" & "FieldB" ARE THE NAMES OF
TWO TEXTFIELDS IN MY DIALOGBOX.
        FieldA_string = ActivationInterface.getControl("FieldA").Text
        FieldB_string = ActivationInterface.getControl("FieldB").Text

        '--CONVERSION STEP. CONVERTING STRING VALUE FROM DIALOGBOX INTO DECIMAL
VALUE ONTO SHEET, COMPATIBLE WITH DECIMAL SEPARATOR.
        MySheet.getCellByPosition(1, 1).Value = CDec(FieldA_string) /
CDec(FieldB_string)

End Sub
'//----------------------------------------------------//

-- 
You are receiving this mail because:
You are the assignee for the bug.

Reply via email to