VBA atbalsts OpenOffice.org Calc

Iesūtīts gada 21. Okt, 2009 ar in Engineering un HOWTO un OpenOffice.org un padomi

Daudzus gadiem līdz vakar, es zināju par OpenOffice.org Calc. Šodien, es esmu satraukti par to.

Es mēģināju OpenOffice pirms daudziem gadiem. Tā varētu darīt dažas lietas, toreiz, bet es uzreiz noraidīt kā pietiekami manām vajadzībām. Es vienmēr esmu bijusi ventilatoru no kāda VBA varētu darīt Excel.

Pagājušajā nedēļā, es pabeidzis vissarežģītākajiem gabals VBA piemērošanas es gribētu kādreiz rakstisku. Es esmu VBA Newbie, un tas aizveda mani nedēļu, lai pabeigtu manu kodu, kas varētu būt drukāts uz 28 A4 formāta lappusēm. Mans izklājlapu līdz dienai darbojas nevainojami uz 2003 XP / Biroja līdzīgi kā tas ir paredzēts, bet es rakstīju lielākā daļa manu kodu Vista / Office 2007.

Kad es modernizētas uz Debian izspiest, Openoffice.org 3.1.1 nāca ar to. Es paņemts jauno versiju un biju pārsteigts, ka viens varētu uzrakstīt makro Python, JavaScript, BeanShell papildus BASIC.

Es mēģināju atvērt savu vissarežģītākajiem gabals VBA koda OpenOffice.org un man bija bombarded ar simtiem atkārtotas kļūdas ziņojumu, kas man bija, lai nogalinātu izklājlapu no komandrindas. Es biju pārliecināts, ka VBA un OOoCalc nav saderīgi, līdz es atklāju šo vietni nejauši, mēģinot iemācīties rakstīt Javascript makro OOO.

Labi. Viss, ko es nepieciešama, lai pievienotu bija "risinājums VBA atbalsts 1". Ka nav skaņu pārāk grūti, tāpēc es mēģināju atvērt savu izklājlapu atkal un nācās atkal nogalināt visu, sākot no komandrindas.

Zināma lieta nebija taisnība, un es nespēju vadīt VBA neskatoties uz apsolīto saderību.

Tāpēc es izlēmu iet lēni. Nav svarīgi, cik reizes, es nevarēju palaist makro, kad es atvēru dzimtā Excel failu. Tāpēc es nolēmu atvērt Excel failu ar invaliditāti makro. Ka man atvērt izklājlapu, bet nekas strādāja. Es atklāju, ka OOoCalc automātiski bija pievienota "Option VBA atbalsts 1" Lai man moduļiem.

Es saglabājis failu kā. ONV un turpināja atkļūdot ļaujot makro vēlreiz. Šoreiz kļūdas nebija nonāk flood.They nāca pa vienai, un tā bija vieglāk atkļūdot.

Pirmos kļūdas saistībā ar mainīgajiem lielumiem, kam nav skaidra Dim paziņojumu. VBA Excel šķita vairāk piedot, izskatot varaibles bez pienācīgas Dim pārskatos. Bet OOO Calc nepatika. Tāpēc es beidzās pievienojot dažus Dim paziņojumus par dažiem mainīgajiem lielumiem.

Nākamais komplekts kļūdām bija ar Excel UDF nosaukumiem. OOO Calc patīk redzēt funkcijas tiek piesaukto ar lielajiem burtiem. Tātad, ja jūs vēlaties lietot burtus Excel, tie parādīsies kā kļūdas. To varētu viegli noteikt, izmantojot atrastu un aizstātu līdzekli.

Tikai šīm divām lietām, fiksēts mans jaunais. ONV fails strādāja perfekti. Tad es saglabātas to kā. XLS un jauna aplūkoja. XLS un viss vēl strādā. Gan OOO Calc dokumentācija joprojām saka, ka ne visi VBA funkcijas tiek atbalstītas, VBA darbojas arī uz OOoCalc par visiem praktiskajiem inženieru aprēķinos. Tāpēc tagad ir man laiks veikt pāreju.

Tagad, ja jums ir grūtības, jo iegūt jūsu VBA kodu strādāt OOO calc, dont atmest drīz.

Related posts:

  1. Excel Howtos
  2. vieta 2010-06-30

3 Atbildes uz "VBA atbalsta OpenOffice.org Calc"

  1. Rakesh

    07. Nov, 2009

    Hi,
    Es esmu mēģinājis darīt to, ko u ir minēts, bet tomēr tas nedarbojas.
    ja SHEET1.CELLS panta 7, 4) = "" Vai SHEET1.CELLS (9, 4) = "" Vai SHEET1.CELLS (10, 4) = ""

    Šajā pozīcijā es esmu kļūst īpašumu vai metode nav atrasta.

  2. Krishnan

    09. Nov, 2009

    Sintakse ir acīmredzami kļūdains, jo es redzu.

    Ja, Tad Else ir atslēgvārdi, kas jāizmanto. Ne Or.

  3. james

    07. Feb, 2010

    ingnoring par "remiem"
    Kā jūs labi tas OOO? i aprunāt darbu veic OOO - PLS saņemt mani sākās?
    REM Sub Vārdi ()
    Rem "
    Rem vārdos Makro
    Lietu par Macro ierakstīts 07/02/2010 kurus īpašnieks
    Rem "
    Rem Tieši Tastatūras saīsne: Ctrl + W
    Rem "
    Rem Dim NumWords Kā Integer
    Rem Dim WordLength Kā Integer
    Rem Dim Count Kā Integer
    Rem Dim Count2 Kā Integer
    Rem Dim Lcase Kā Integer
    REM
    Rem Dim Word Kā String
    Rem Dim MixedWord Kā String
    Rem Dim burtu virknes
    REM
    Rem Tieši Darblapas ("Vārdi"). Aktivizēt
    REM
    Rem komplekts wordRange = Darblapas ("Vārdi") Range ("A1: A500").
    Rem NumWords = Application.WorksheetFunction.CountA (wordRange)
    REM
    Rem grāfam = 1 Lai NumWords
    REM WordLength = LEN (Cells (skaits, 1))
    REM
    REM
    Rem Tieši Application.EnableSound = False
    REM
    Rem Tieši Application.EnableSound = True
    REM vārdu = šūnu skaits (Count, 1)
    Rem Tieši šūnu skaits (Count, 1). Aktivizēt
    Rem Tieši ActiveCell.Characters (1, 3) PhoneticCharacters =. Vārds
    Rem MixedWord = ""
    Rem Par Count2 = 1 līdz WordLength
    Rem vēstule = Mid (Cells (skaits, 1), kas Count2, 1)
    Rem Tieši Application.Speech.Speak (vēstule)
    Rem Lcase = Round (RND)
    REM
    REM
    Rem Ja Lcase = 1 Un Asc (vēstule)> = 97 Tad vēstule = Chr (Asc (vēstule) - 32)
    REM
    Rem MixedWord = MixedWord + Vēstule
    REM Nākamais Count2
    REM šūnu skaits (1, 5) = MixedWord
    REM
    Rem Dim Ziņas virsraksts, Noklusējums MyValue
    Rem Ziņojums = "Gatavs Monkey?"
    Rem title = "Atzinības pareizrakstības spēli."
    Rem Default = "YES"
    Rem MyValue = InputBox (Message, Nosaukums, Noklusējums)
    REM
    REM
    Rem Par Count2 = 1 līdz WordLength
    Rem vēstule = Mid (Cells (skaits, 1), kas Count2, 1)
    Rem Application.Speech.Speak (vēstule)
    REM Nākamais Count2
    Rem Application.Speech.Speak (Word)
    REM
    Rem Ja MyValue "JĀ" Tad
    Rem Application.Speech.Speak ("Tas ir nepareizi pooey - jūs ievadījāt")
    Rem WordLength = LEN (MyValue)
    Rem Par Count2 = 1 līdz WordLength
    Rem Vēstule = Mid (MyValue, Count2, 1)
    Rem Application.Speech.Speak (vēstule)
    REM Nākamais Count2
    Rem Application.Speech.Speak (MyValue)
    REM Beigas Ja
    REM
    REM
    REM Nākamais Grāfs
    REM
    REM
    REM End Sub
    REM

Atstāj atbildi