Srodne teme
Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

vba kode za vlookup funkciju

[es] :: Office :: Excel :: vba kode za vlookup funkciju

[ Pregleda: 1673 | Odgovora: 1 ] > FB > Twit

Postavi temu Odgovori

Autor
Pretraga teme: Traži
Markiranje Štampanje RSS

mirjanagb
mirjana kovacevic
austrija

Član broj: 160826
Poruke: 184
*.bankgutmann.co.at.



+1 Profil

icon vba kode za vlookup funkciju08.05.2009. u 12:33 - pre 182 meseci
u jednoj koloni su datumi, dnevni, u drugoj brojevi.

ja treba da napisem kod:

da trazi poslednji dan u mesecu minus 1

npr nadje 30.04.2009 -1 da onda u drugoj koloni nadje broj i da ga podeli sa prethodnim mesecom (poslednjim danom u mesecu npr 31.03.2009 - 1) pomocu formule ln(x/y)

i da na kraju nadje najmanji broj od svih tih brojeva.

to je lako u excelu pomocu vlookup formule i ove ln(x/Y) i na kraju min().
 
Odgovor na temu

mirjanagb
mirjana kovacevic
austrija

Član broj: 160826
Poruke: 184
*.bankgutmann.co.at.



+1 Profil

icon Re: vba kode za vlookup funkciju12.05.2009. u 15:20 - pre 182 meseci
Code:
Function myFunc(Area As Range, Month As Integer, Year As Integer)
   Dim d As Date, i As Long
    
   d = DateSerial(Year, Month + 1, -1)
   For i = 1 To Area.Rows.Count
      If Area.Cells(i, 1).Value = d Then
         myFunc = Log(Area.Cells(i, 2).Value / Day(Area.Cells(i, 1).Value)) / 1000
                  
         Exit Function
      End If
   Next
End Function


nesto ovako ... ali ne dobijem isti rezultat kao kad radim u excelu rucno.
Prikačeni fajlovi
min_perf.xls min_perf.xls - 125k
 
Odgovor na temu

[es] :: Office :: Excel :: vba kode za vlookup funkciju

[ Pregleda: 1673 | Odgovora: 1 ] > FB > Twit

Postavi temu Odgovori

Srodne teme
Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.