Odgovori 
Da li je ćelija prazna? (BASIC)

Postovanje,

Interesuje me kako se pise cod sa kojim se zeli proveriti da li su npr
celije A1, B2:C2 prazne, i ako jesu da se pojavi poruka da su celije prazne?
Srdacan pozdrav
Stevanovic Vladislav
Citiraj ovu poruku u odgovoru

2010/2/4 Vladislav Stevanovic <stevanovicvladislav@gmail.com>:
> Postovanje,
>
> Interesuje me kako se pise cod sa kojim se zeli proveriti da li su npr
> celije A1, B2:C2 prazne, i ako jesu da se pojavi poruka da su celije prazne?

Formula za četvrtu ćeliju terba da glasi:

=IF(A1 & B2 & C2="";"ćelije su prazne";"")

--
Aleksandar Urošević
http://urosevic.net

Vežbanka za školarce :: http://www.vezbanka.com
Citiraj ovu poruku u odgovoru

To je funkcija, a mene je interesovalo kako se pise makro koji bi to obavio.
ALi u medjuvremenu sam se snasao. U svakom slucaju hvala na trudu!

POzdrav!

2010/2/4 Aleksandar Urošević <urke.kg@gmail.com>

> 2010/2/4 Vladislav Stevanovic <stevanovicvladislav@gmail.com>:
> > Postovanje,
> >
> > Interesuje me kako se pise cod sa kojim se zeli proveriti da li su npr
> > celije A1, B2:C2 prazne, i ako jesu da se pojavi poruka da su celije
> prazne?
>
> Formula za četvrtu ćeliju terba da glasi:
>
> =IF(A1 & B2 & C2="";"ćelije su prazne";"")
>
> --
> Aleksandar Urošević
> http://urosevic.net
>
> Vežbanka za školarce :: http://www.vezbanka.com
>
Citiraj ovu poruku u odgovoru

2010/2/5 Vladislav Stevanovic <stevanovicvladislav@gmail.com>:
> To je funkcija, a mene je interesovalo kako se pise makro koji bi to obavio.
> ALi u medjuvremenu sam se snasao. U svakom slucaju hvala na trudu!

Možete li onda da prenesete način na koji ste to učinili, kako bi neki
novi korisnici ukoliko naiđu na isti ili sličan problem imali ponuđena
bar dva rešenja?

--
Aleksandar Urošević
http://urosevic.net

Vežbanka za školarce :: http://www.vezbanka.com
Citiraj ovu poruku u odgovoru

Evo koda:

sub POKAZIdaLIjeCELIJAprazna
oCell = ThisComponent.Sheets(0).getCellByPosition(0,0)
If ( oCell.value = empty) then
Msgbox "A1 ćelija je prazna"
end if
If (oCell.value <> empty) then
oCell1 = ThisComponent.Sheets(0).getCellByPosition(1,0)
If ( oCell1.value = empty) then
Msgbox "B1 ćelija je prazna"
else
msgbox "Sve ćelije su popunjene"
end if
end if
End sub


Kod je definisan tako da on radi u prvom listu (Sheet1) u dokumentu a to se
moze promeniti u prvom redu koda menjajuci nulu u zagradi iza reci Sheets
(0 je prvi list, 1 je list broj 2 itd.) Ako nekom treba druga celija da se
ispita, a ne A1,
potrebno je izmeniti koordinate u zagradi na kraju prvog reda ovog koda, gde
prva
nula reprezentuje kolonu broj 1, a druga nula reprezentuje red broj 1.
Ovo se takodje moze promeniti i kod druge celije koja se u ovom kodu
ispituje.
Napomena:
1) Kod nulu "vidi" kao da je celija prazna. Ako neko zna kako da se
i nula prepznaje kao neka vrednost, neka to podeli sa nama.
2) Kod aktivirati preko dugmeta (button).

Srdacan pozdrav,
Stevanovic Vladislav


2010/2/5 Aleksandar Urošević <urke.kg@gmail.com>

> 2010/2/5 Vladislav Stevanovic <stevanovicvladislav@gmail.com>:
> > To je funkcija, a mene je interesovalo kako se pise makro koji bi to
> obavio.
> > ALi u medjuvremenu sam se snasao. U svakom slucaju hvala na trudu!
>
> Možete li onda da prenesete način na koji ste to učinili, kako bi neki
> novi korisnici ukoliko naiđu na isti ili sličan problem imali ponuđena
> bar dva rešenja?
>
> --
> Aleksandar Urošević
> http://urosevic.net
>
> Vežbanka za školarce :: http://www.vezbanka.com
>
Citiraj ovu poruku u odgovoru

Ako se dobro secam, nije isto kada je celija prazna i kada je upisana
nula. I u jednom i u drugom slucaju ce PRIKAZ biti prazna celija, ali
koliko se secam, ako u praznu celiju upisete nulu, necete je vise moci
nalaziti sa "oCell.value = empty" (ili bar sa "oCell.value = null"
Citiraj ovu poruku u odgovoru

Poštovanje,
Hteo bih da makro proveri da li je ćelija A1 ispunjena (Calc). Problem nastaje jer u ćeliju može biti unešen broj ali i sledeće: T23. Kako je prvo broj (value) a drugo string, a ista ćelija, koji način da primenim da kod prepozna oba tipa unosa?
Unapred hvala
Citiraj ovu poruku u odgovoru

Sa http://wiki.services.openoffice.org/wiki...eet_common

Tip (cell.Type) prazne ćelije je com.sun.star.table.CellContentType.EMPTY
Poseti veb stranicu korisnika
Citiraj ovu poruku u odgovoru

Da, hvala. Uspeo sam da rešim problem. Ostaje još nejasno za mene sledeće: kod treba da prepozna kada ćelija, u kojoj je formula (sum), pokaže grešku #NEP i da stopira izvršenje koda. Da li neko ima ideju kako da se to uradi?
Citiraj ovu poruku u odgovoru
Odgovori 




Kontakt | otvorenidokument.com | Povratak na vrh | Povratak na sadržaj | RSS