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

• #25434 Delila_1 veterán Treb #25433

  Új Válasz 2015-02-13 10:28:47 #25434

  Ú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 Treb #25433 üzenetére

  A
  .Rows("2:" & usor).Copy WSH.Range("A" & WF.CountA(WSH.Columns(1)) + 1)

  sorban a félkövér helyére

  Range("A100:K200")-at írj.

  Az usor = .Range("A" & .Rows.Count).End(xlUp).Row sor nem kell.

  Még a Dim kezdetű sorból is kimaradhat az usor As Long, de nem szükséges kitörölni, nem árt semmit.

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