Új hozzászólás Aktív témák

• martonx veterán

  #1753

  #1752 tomi0829

  2012-05-14 12:04:50

  Új Válasz

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  

  martonx

  veterán

  #1752 tomi0829

  #1752 tomi0829

  Sziasztok!

  Szeretném kérni a segítségeteket egy egyszerű Excel makróval kapcsolatban.
  Annyi lenne a gond, hogy van két adat tömb, ami számokat tárol, és sorrendbe kellene rendeznie.

  ker_hatar = Array("400", "1150", "9654")
  masolander = Array("346", "1096", "5600", "6826", "8301", "10205", "11611", "12035", "13523", "14663", "15640", "16617")

  TALALAT = 11

  For l_j = 0 To 3

  For I = 0 To TALALAT

  If masolander(I + 1) > ker_hatar(l_j) Then

  vegleges_hatar(I) = masolander(I)
  Cells(16 + I, 3) = I & ".Határ >2 = " & vegleges_hatar(I) & "|| L_I= " & I & "|| L_J= " & l_j
  Else

  vegleges_hatar(I) = ker_hatar(l_j)
  Cells(16 + I, 3) = I & ".Határ 1< = " & vegleges_hatar(I) & "|| L_I= " & I & "|| L_J= " & l_j
  l_j = l_j + 1

  End If

  Next

  Next

  Azt szeretném, hogy a kapott eredmény ez legyen:

  masonader ker_hatar eredmény
  346 400 400
  1096 1150 1150
  5600 9654 6826
  6826 8301
  8301 9654
  10205 10205
  11611 11611
  12035 12035
  13523 13523
  14663 14663
  15640 15640

  Remélem tud valaki segíteni!
  Köszi előre is!
  Üdv

  Excelben egyrészt minek használsz tömböket? Ott van erre egy millió excel cella.
  Másrészt nem tudom mit is akarsz pontosan, de az excel beépített FKERES, VKERES függvényeivel próbálkoznék első körben, a felesleges makró programozás helyett.
  És amikor megvannak az eredmények, akkor a cellákat könnyen sorba is tudod rendezni.

Új hozzászólás Aktív témák