MS office vs open office compatible

**Mladjone** · 07-14-2011, 06:49 AM

Why this doesn't work in open office, but works in ms office....? Need help to start working in both or just in open office.

 n = Application.Max(Range("C61:C90"))
    M = 60
    Do
        M = M + 1
    Loop Until Cells(M, 3) = n

**royUK** · 07-14-2011, 07:03 AM

In my experience the two versions of VBA are never the same. Basically, you get what you pay for.

This would be more efficient

Dim rCl As Range
Dim n As Long

 n = Application.Max(Range("C61:C90"))
  Set rCl = Range("C61:C90").Find(n, LookIn:=xlValues)
  MsgBox rCl.Address

**Whizbang** · 07-14-2011, 08:23 AM

I found this link that looks promising.

http://www.linux.com/archive/feed/58348

**Edit**
I just realized the link I gave is a few years old. Here is the Wiki from the OOo website that discusses the issue and provides a way to enable VBA Interoperability.

http://wiki.services.openoffice.org/wiki/VBA