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

• #20402 Delila_1 veterán psg5 #20399

  Új Válasz 2014-02-10 12:55:17 #20402

  Ú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 psg5 #20399 üzenetére

  A felső két sor másolásához a

  WSE.Rows(1).Copy WSM.Range("A1") helyett írj WSE.Rows("1:2").Copy WSM.Range("A1")-t.
  A WSE.Rows(sor).Copy WSM.Range("A2") helyett pedig WSE.Rows(sor).Copy WSM.Range("A3") legyen.

  Az ActiveWorkbook.SaveAs Filename:=utvonal & sor & ".xlsx" sor végéről töröld az x-et.

  Titok, hogy melyik oszlopból akarod venni a fájlok címét? Ha igen, akkor találd ki a mentés módját, nem tudok segíteni nélküle.

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