Page 1 of 1

Excell to OpenOffice

Posted: Sat Feb 06, 2016 6:30 pm
by MatthewDavies
Hi
I have an excel formula that i would like to work in open office.
Can send the excel file obviously.
happy to pay
many thanks

Re: excell to open office

Posted: Sat Feb 06, 2016 6:52 pm
by FJCC
If you need a single formula translated, then I suggest you post it, or better yet a small example file, here to see if someone can help you. Fixing many formulas in a complicated file is less likely to get a free response.

Re: excell to open office

Posted: Sat Feb 06, 2016 6:57 pm
by MatthewDavies
Probably be easier to post the sheet, but it is 872kb zipped which is to big i think. Happy to pay

Re: Excell to OpenOffice

Posted: Sat Feb 06, 2016 8:00 pm
by Zizi64
You can upload to a free file sharing service, and then link it here (google drive, or other)

Or delete the non-related parts from a COPY of your file...

Or you can copy the formula (formulas) here (use the CODE TAGs)

Re: Excell to OpenOffice

Posted: Sat Feb 06, 2016 8:47 pm
by MatthewDavies

Re: Excell to OpenOffice

Posted: Sat Feb 06, 2016 9:44 pm
by Zizi64
We have not permission to download the file from the attached link...

Re: Excell to OpenOffice

Posted: Sat Feb 06, 2016 9:58 pm
by MatthewDavies

Re: Excell to OpenOffice

Posted: Sat Feb 06, 2016 10:17 pm
by Zizi64
It is a huge MS .xlsm file. I do not see _any_ cell formula on the first sheet, and there are _one_ (repeated) formula in the second sheet. It works, but the result is not wisible in the too narrow cell.

Otherwise the file contains some VBA macros. The VBA is not compatible with Starbasic and API. You need REWRITE all of your VBA macros.

Or you can try the LibreOffice: it has better combatiblity with the foreign formats.

Re: Excell to OpenOffice

Posted: Sat Feb 06, 2016 10:30 pm
by MatthewDavies
So is it possible for open office to do the same thing as the file i have ?

Re: Excell to OpenOffice

Posted: Sat Feb 06, 2016 10:33 pm
by Zizi64
So is it possible for open office to do the same thing
What thing do yo mean?

The formula?
Yes, the formula

Code: Select all

=COLUMNS($A$1:A$1)
works fine in my Libreoffice 4.4.7.

The macro?
Yes, you can write macros in AOO or LO. But you can rewrite those VBA macros.

Re: Excell to OpenOffice

Posted: Sat Feb 06, 2016 10:47 pm
by MatthewDavies
HI, Just tried libre and wont work. If you type to numbers in the first two colums, say 6 and then 8 then click create black cells. It fills those cell on the implentation tab. Accordingly if you fill cells in the implentation tab and click "extract values" on the cat 5 tab it will fill it with numbers. Theese are measurements in cm an mm

Re: Excell to OpenOffice

Posted: Sat Feb 06, 2016 11:15 pm
by Zizi64
I see now: there is a hidden sheet, named 'cat5hidden'.

But i do not understand (because I do not have Excel) what is the task of this spreadheet file, and what is expected from the working of the macros.

The macro code assigned to the Button 'Redistribute':

Code: Select all

Rem Attribute VBA_ModuleType=VBAModule
Option VBASupport 1
Sub redistribute()
Dim ws1 As Worksheet, ws2 As Worksheet, ws3 As Worksheet
Dim i As Long, LR As Long

Set ws1 = Sheets("cat5")
Set ws2 = Sheets("Implementation")
Set ws3 = Sheets("cat5hidden")

LR = ws1.Range("A65536").End(xlUp).Row

For i = LR To 3 Step -1
    If ws1.Range("A1").Offset(i).Value Mod 2 = 0 Then
    If WorksheetFunction.CountA(ws1.Range("B1:IV1").Offset(i)) > 0 Then
      ws1.Range("B1:IV1").Offset(i).Copy Destination:=ws1.Range("A1").Offset(i - 1, 1 + WorksheetFunction.CountA(ws1.Range("B1:IV1").Offset(i - 1)))
        ws1.Range("B1:IV1").Offset(i).ClearContents
    End If
    End If

Next i
End Sub
This code will modify the sheet "cat5" only: there is some Copy, and Clear feature in this code...