[es] - Randbetween funkcija

Siki 5

Član broj: 240086
Poruke: 116
*.dynamic.sbb.rs.

+2 Profil

Randbetween funkcija

^{12.11.2016. u 08:02 - pre 90 meseci}

Problem naveden u prilogu. Hvala ljudima koji žele da pomognu.

Snić

Prikačeni fajlovi

RANDBETWEEN.xlsx - 8.94k

Odgovor na temu

3okc
Χoᴘᴦoѡ

Moderator
Član broj: 811
Poruke: 1319

Jabber: 3okc@elitesecurity.org

+116 Profil

Re: Randbetween funkcija

^{12.11.2016. u 08:20 - pre 90 meseci}

Ako bi bio ljubazan da pitanja pišeš na forumu a NE u prikačenim fajlovima. Ja npr nemam nameru da otvaram fajl zbog toga.

Have you found helpful examples, solutions or ideas-in-work, please consider the
following:
• Citation of *actual page* you are going to using is welcome.
• Have you saw "Value Added" examples you are going to incorporate to your
profitable blog, daily job or any money making venture: How about online donation?
↗Ana & Vlade Divac Foundation
Hvala!

Odgovor na temu

Siki 5

Član broj: 240086
Poruke: 116
*.dynamic.sbb.rs.

+2 Profil

Re: Randbetween funkcija

^{12.11.2016. u 09:49 - pre 90 meseci}

Primedba prihvaćena.Pritiskom na taster F9 funkcija bira brojeve u svih 6 ćelija u koloni B. Da li je moguće da se funkcija primeni samo na pojedinačnu ćeliju odnosno kada želim proizvoljan izbor broja u ćeliji B1 da se u ostalim ćelijama ne obavi isti proces. Isto bi trebalo da važi i za ostale ćelije u koloni B.

Snić

Odgovor na temu

djoka_l
Beograd

Član broj: 56075
Poruke: 3453

Jabber: djoka_l

+1462 Profil

Re: Randbetween funkcija

^{12.11.2016. u 10:52 - pre 90 meseci}

Ne može.
Formule se preračunavaju svaki put kada se promeni sheet, pa onda se vrati i novi slučajni broj. Ako ti treba da se jednom izračuna, kopiraj iz kolone u kojoj je funkcija SAMO vrednosti u neku drugu kolonu, pa time praviš trenutnu sliku. Druga opcija je da se zabrani automatska rekalkulacija na šitu (ali onda neće preračunavati ni jednu formulu, dok mu ne kažeš, a kad zahtevaš rekalkulaciju promeniće se sve vrednosti RND funkcije).

Odgovor na temu

3okc
Χoᴘᴦoѡ

Moderator
Član broj: 811
Poruke: 1319

Jabber: 3okc@elitesecurity.org

+116 Profil

Re: Randbetween funkcija

^{12.11.2016. u 12:15 - pre 90 meseci}

Kao što djoka_l kaže - ne može, odnosno, samo uz sopstveno pisanu RND f-ju, tj preko VBA.

Code:

Option Explicit

Function MyRND() As Double
Dim hold As Double
Dim CallerAddr As String
Dim MySel As Range
Dim Cl As Range

    CallerAddr = Application.Caller.Address
    Set MySel = Intersect(Selection, Range(CallerAddr))
    If MySel Is Nothing Then
        hold = Range(CallerAddr).Value
        MySel = hold
        Exit Function
    Else:
        For Each Cl In MySel.Cells
            MyRND = Rnd
        Next Cl
    End If
End Function

Osvežavanje radi sa Alt+F9, jer nije rečeno da f-ja bude "volatilna", tj da se preračunava svaki put.

Odgovor na temu

Siki 5

Član broj: 240086
Poruke: 116
*.dynamic.sbb.rs.

+2 Profil

Re: Randbetween funkcija

^{12.11.2016. u 13:33 - pre 90 meseci}

Meni ovo ne funkcioniše. Lepio sam kod i u radnoj knjizi i u radnom listu ali se ništa ne menja. Funkcija radi na isti način, menja vrednost u svim ćelijama. Verovatno ja tu nešto pogrešno radim . Ako može pojašnjenje koda u vezi dvostrukog klika i ćelije C1 .Meni dvostruki klik na ćeliju C1 i prelaz u drugu ćeliju menja vrednosti u svim ćelijama. Da li treba primeniti neki drugi postupak za aktiviranje funkcije preko ovog koda ? Hvala.

Snić

Odgovor na temu

3okc
Χoᴘᴦoѡ

Moderator
Član broj: 811
Poruke: 1319

Jabber: 3okc@elitesecurity.org

+116 Profil

Re: Randbetween funkcija

^{12.11.2016. u 13:58 - pre 90 meseci}

Funkcije idu u poseban modul i koristiš ih kao i svaku drugu, u ćeliju upišeš =MyRND() (u ovom slučaju)

Odgovor na temu

Ivek33

Član broj: 66174
Poruke: 2898

+66 Profil

Re: Randbetween funkcija

^{12.11.2016. u 14:38 - pre 90 meseci}

Citat:

Da li je moguće da se funkcija primeni samo na pojedinačnu ćeliju odnosno kada želim proizvoljan izbor broja u ćeliji B1 da se u ostalim ćelijama ne obavi isti proces.

Vidi da li ti pomaže link
- How do I refresh a formula on selected number of cells in excel without refreshing the whole workbook?

Odgovor na temu

Siki 5

Član broj: 240086
Poruke: 116
*.dynamic.sbb.rs.

+2 Profil

Re: Randbetween funkcija

^{14.11.2016. u 12:48 - pre 90 meseci}

Ovo ne funkcioniše. Najpre radi se o funkciji RAND,a ne o RANDBETWEEN. Da li postoji skraćenica za funkciju RANDBETWEEN pa da se eventualno to ukuca u kod umesto MyRND(). Ova funkcija ne može da se osveži sa alt + F9. Radi samo posle dvostrukog klika na C1 pa enter. Ili ja tu nešto pogrešno radim. Hvala.

Snić

Prikačeni fajlovi

RANDBETWEEN 1.xlsm - 15.78k

Odgovor na temu

3okc
Χoᴘᴦoѡ

Moderator
Član broj: 811
Poruke: 1319

Jabber: 3okc@elitesecurity.org

+116 Profil

Re: Randbetween funkcija

^{14.11.2016. u 13:00 - pre 90 meseci}

Ne znam, kod mene radi, čak i samo sa F9 sada.

RAND sam koristio kao prostiju varijantu jer je poenta bila videti radi li uopšte proračun samo na obeleženim ćelijama.. a to, koju ćeš formulu, lako može naknadno da se podesi. Npr:

Code:

Option Explicit

Function MyRND(ilower As Integer, iupper As Integer) As Double
Dim CallerAddr As String
Dim MySel As Range
Dim hold As Double

    CallerAddr = Application.Caller.Address
    Set MySel = Intersect(Selection, Range(CallerAddr))
    If Not MySel Is Nothing Then
        MyRND = Application.RandBetween(ilower, iupper)
    Else:
        hold = CDbl(Range(CallerAddr).Value)
        MyRND = hold
    End If
End Function

Naravno, sada će i MyRND zahtevati ulazne veličine, kao RANDBETWEEN.

Odgovor na temu

Siki 5

Član broj: 240086
Poruke: 116
*.dynamic.sbb.rs.

+2 Profil

Re: Randbetween funkcija

^{14.11.2016. u 16:38 - pre 90 meseci}

Sa ovim kodom radi i kod mene ali se javlja novi problem kada se funkcija primeni na ostalih 5 ćelija. U ovom slučaju prijavljuje kružnu referencu valjda zato što se funkcija ne vezuje za konkretnu ćeliju nego je ista u svim ćelijama. Ako je moja pretpostavka tačna da li je onda moguće nešto kao MyRND(A1)6;10).Znam da je ovako kako sam napisao nemoguće ali nešto slično tome. Hvala.

Snić

Odgovor na temu