Adresiranje celija

Odgovori Nova tema

3 odgovora
3.182 pregleda

Adresiranje celija 31.12.2008. u 09:04 · pre 217 meseci #1

Znam da pise negdje u helpu, ali ja ne nadjoh. Imam 210 listiva u exelu i trebao bih sabrati celije d10+d50+d90+++d(i*40)
E problem je sto ne znam kako definisati u for petlji
for j=1 to 210
suma=suma+d(j*40)
next j.
Ovo je napisano u bejziku a ja ne znam kako definisati celiju od j*40.

Re: Adresiranje celija 31.12.2008. u 09:51 · pre 217 meseci #2

Koristi Cells(red,kolona)

Evo malog primera koji sabira svaku desetu celiju u koloni pocevsi od A1

Code:

Public Function Saberi10() As Double
Dim i As Long
Dim zbir As Double
    zbir = 0
    For i = 1 To 50 Step 10
        zbir = zbir + Cells(i, 1)
    Next i
End Function

Pozdrav

Re: Adresiranje celija 31.12.2008. u 09:52 · pre 217 meseci #3

Referenca na ćeliju u VBA može da se postavi preko Range objekta koristeći standardnu notaciju za adresu ćelije npr:

Code:
Worksheets("Sheet1").Range("C1").Value

predstavlja vrednost ćelije C1 na listu Sheet1. Umesto naziva lista može se koristi i broj lista.

U programima je često zgodnije korišćenje Cells svojstva, koja omogućava da se pristupi ćeliji po indeksu reda i kolone što je zgodnije u petljama. Npr

Code:
Worksheets(1).Cells(1,3).Value

predstavlja takođe vrednost ćelije C1 na prvom listu.

E sad nisam razumeo da li se sabira d10 sa prvog lista + d50 sa drugog lista ... ili ?

Potpis

Nije to loše Rembrante, samo što ne bi dodao još malo boje?

Re: Adresiranje celija 31.12.2008. u 12:59 · pre 217 meseci #4

Timy je odgovorio ( hvala mu),pa vise nije bitno, ali evo. Sve je na istom listu.

Prijavite se da biste odgovorili u ovoj temi.Prijava Registracija

Forum kao aplikacija na telefonu

Srodne teme