Witam :)
Mam taki problem, ze muszę napisać makro liczące denpresję powstałą w punkcie poprzez dzialanie kilku studni. Napisałam własną funkcję obliczającą depresją powstałą od 1 studni - tylko teraz trzeba to jakoś zapętlić, żeby tych studni było więcej (nie wiadomo ile, więc zrobiłam miejsce na 101, i od sumy trzeba odjąć ilość miejsc pustych razy depresja ostatniej "nieistniejacej" studni. Nagrałam obliczanie depresji dla 1 studni - ale jak przyszło do zpętlenia tego, to niestety... na podstawie paru stron wykombinowałam coś takiego:
Sub suma_depresji()
Dim i As Byte
Dim si As Single
"=-LICZ.PUSTE(r11c4:r111c4)*depr(r111c3,rc19,r111c4,r12c,r111c5,r4c5,r5c5,r6c5)"
For i = 1 To 101 Step 1
si = "=si+depr(r[i+10]c3,rc19,r[i+10]c4,r12c,r[i+10]c5,r4c5,r5c5,r6c5)"
Next [i]
End Sub
nie wiem co i jak poprawic, czy w ogole to ma być w takie formie, jak zrobic zeby działało.. byłabym wdzięczna za pomoc, jako, że jestem zielona... |