Aktív témák

• #381 matekmatika tag Renegate #377

  2006-07-02 22:51:23 #381

  Ö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

  

  matekmatika

  tag

  válasz Renegate #377 üzenetére

  sub valami()
  Set masik = Worksheets(''masodik munkalap neve'')
  i = 3
  do while cells(i, 3)<> empty
  masik.Cells(1,1)
  ' Itt beírod sorba az első munkalap A oszlopának elemeit a 3. sortól addig amíg adatok szerepelnek a cellákban ( nem te hanem a makro )
  
  ....
  na akkor itt csinálj vele amit akarsz, ha már nem árulod el mit kell vele tenni
  ....
  
  adat=....
  'az adat változót írjuk viszza az első munkalap B oszlopába
  ....
  
  cells(i,2) = adat
  i = i + 1
  loop
  end sub
  
  
  [Szerkesztve]

Aktív témák