Fórum pro uživatele kancelářského balíku OpenOffice | LibreOffice
 

#1 Re: Calc » Konvertovat text na cislo makro - VYŘEŠENO » 15. 3. 2011 22:38:28

Makro co moze pomoct. Priklad je na vyhladanie napriklad textu:

SUB Vyhladaj_Prepis
DIM Dokument, Vymena AS object
DIM kolko, teraz AS Long
REM premenná kolko obsahuje celkový počet zámen, premenna teraz počet zámen v jednom cykle
Dokument=ThisComponent
Vymena=Dokument.createReplaceDescriptor()
Vymena.SearchString=" Tu napis text co hladas"
Vymena.ReplaceString=" Tu co chces vymenit"
teraz=Dokument.replaceAll(Vymena) ' prevedieme základnú výmenu
kolko=teraz
DO WHILE teraz<>0 ' Opakujeme pokiaľ bola urobená nejaká výmena
' aktuálny počet zámien uložíme do premennej teraz
teraz=Dokument.replaceAll(Vymena) ' prevedieme opakovanú výmenu
REM spočítame úplne všetky zámeny
kolko=kolko+teraz
LOOP
msgbox("Nahradených "+kolko+"x textu.",0,"TEXT")
END SUB

#4 Re: Calc » Zratat stlpce podla rozsahu datumu- makro » 13. 3. 2011 22:02:42

Ano lebo nezrata stlpec vybere iba prvu hodnotu co najde

#5 Re: Calc » Zratat stlpce podla rozsahu datumu- makro » 13. 3. 2011 21:54:07

=SUM(($B$1:$B$4>=C1)*($B$1:$B$4<=D1)*($A$1:$A$4))

Nefunguje tento vzorec ako ma
Pre vysvetlenie:

Hodnoty ma zratat v stlpci dodla vybranych kriterii datumu v rozsahu napr. 1.1.2011 do 31.1.2011
Dik

#6 Calc » Zratat stlpce podla rozsahu datumu- makro » 13. 3. 2011 21:22:45

richardhold
Odpovědí: 7

Prosim pomozte mi zratat pomocou makra v stlpci napr. A hodnoty podla kriteria rozsahu datumu napriklad od 1.2.2011 do 28.2.2011

A        b       
150,23   2.1.2011
145,20   6.2.2001
5,42     25.1.2011
0,78     19.1.2011

Kriterium
    C        D
1.1.2011   31.1.2011
1.2.2011   28.2.2011

Vopred Dik vsetkym zucastnenym

#7 Re: Calc » Vyhladanie prazdnej bunky a zapis do riadku » 9. 3. 2011 11:42:58

uz som to vyriesil neskorsie vlozim subor aj s makrami. zatial ta to stranka by mohla pomoct aj ostatnym http://ooo.e-hanus.cz/

#8 Calc » Vyhladanie prazdnej bunky a zapis do riadku » 9. 3. 2011 10:09:39

richardhold
Odpovědí: 2

Prosim o radu
mam makro ktore mi z listu zadaj kopiruje udaje do tabulky na liste firma (jedna sa udaje nazov firmy, adresa, ico, ...) ale neviem si pomoct aby vyhladalo makro prazdnu bunku napriklad v prvom stlpci a zapisalo zadane hodnoty z listu zadaj do prveho volneho riadku. Nemam az take znalosti v programovani tak prosim ak mate niekto nieco take vytvorene zverejnite makro.

Moje makro:

sub kopirovat

    Dim oSheets 
    Dim oSheet
    Dim oCell
    dim i as integer
    dim x as integer

    for i=1 to 6
    oSheets = ThisComponent.Sheets 
    oSheet = oSheets.getByName("Zadaj")
    CellValue = oSheet.getCellbyPosition(1,i).String
        oSheet = oSheets.getByName("firma")
    oSheet.getCellbyPosition(i,0).setString(CellValue)
    next i
end sub

Dakujem

#10 Calc » Konvertovat text na cislo makro - VYŘEŠENO » 23. 2. 2011 12:26:36

richardhold
Odpovědí: 4

Prosim mozete mi niekdo pomoct vytvorit makro ktore by prepisalo text vo vybranych bunkach napriklad "1245.6 kg" na cislo "1245.6" , alebo napisat link kde by som to mohol najst.

Dik

Zápatí

Používáme FluxBB