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

• #15058 Fire/SOUL/CD félisten #05304832 #15056

  Új Válasz 2012-10-01 12:15:21 #15058

  Ú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

  

  Fire/SOUL/CD

  félisten

  válasz #05304832 #15056 üzenetére

  Akkor a tartományt kell átírnod. A korábban adott kódban ebben a sorban

  Set MyDestRange = ActiveSheet.UsedRange

  kell megadni a tartományt, pl én most az A2:B20 tartományt(Range) adom meg

  Set MyDestRange = Range("A2:B20")

  Te meg nyilván a G2:M1000 (vagy ameddig az M oszlopban van az utolsó adatcella)

  Nyilván ez körülményesebb megoldás, hisz változhat, hogy a G-től M oszlopban hány adat szerepel. Mindjárt módosítom a kódot.

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