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

• #5736 Fehér Mancs tag bandus #5713

  Új Válasz 2009-11-24 16:22:21 #5736

  Ú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

  Privát üzenet küldése

  

  Fehér Mancs

  tag

  válasz bandus #5713 üzenetére

  magyarul:

  =INDEX($A$1:$E$12;CSONK((SOR(G1)-1)/5)+1;MARADÉK((SOR(G1)-1);5)+1)

• #5714 Delila_1 veterán bandus #5713

  Új Válasz 2009-11-23 12:55:55 #5714

  Ú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

  Privát üzenet küldése

  

  Delila_1

  veterán

  válasz bandus #5713 üzenetére

  Azért nem, mert angol verzióhoz készült a képlet.
  Itt a makrós megoldás:

  Sub Rendez()
  Dim CV, sor
  Dim terület As String
  sor = 1
  terület = "$A$1:$E$" & Range("E1").End(xlDown).Row
  
  For Each CV In Range(terület)
  Sheets("Rendezve").Cells(sor, 1) = CV
  sor = sor + 1
  Next
  End Sub

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