Prikazi cijelu temu 11.07.2017 22:57
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Lokacija:Tuzla


Predmet:Re: VBA-excel stavljanje reda u matricu
PreuzmiIzvorni kôd (Visual Basic):
  1. Option Explicit
  2. Dim Niz() As Integer
  3. Function NizCelija(rng As Range)
  4. Dim BrojCelija As Integer
  5. Dim I As Integer
  6.  
  7. ReDim Niz(rng.Count)
  8.  
  9. For Each rng In rng.Cells
  10. I = I + 1
  11. Niz(I) = rng.Value
  12. Next rng
  13. End Function
  14.  
  15. Function Vrati(RedBrCelije As Integer)
  16. Vrati = Niz(RedBrCelije)
  17. End Function

ovo bi lijepo bilo napraviti klasu.
Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.