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

• #43355 Jarod1 veterán

  Új Válasz 2020-03-24 20:48:57 #43355

  Ú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

  

  Jarod1

  veterán

  Van egy macro problémám.
  Ötös lottó számokból kellene a legutóbb kihúzott számokat másolni a saját táblázatba. Valamiért most nem megy.

  Van valakinek ötlete?

  Sub OtosLott()
  Workbooks.Open Filename:="https://bet.szerencsejatek.hu/cmsfiles/otos.xls"
  Range("L2:P2").Copy
  Windows("OTOSlotto.xls").Activate
  Sheets("otos").Select
  usor = Range("C65536").End(xlUp).Row + 1
  Cells(usor, 3).Select
  ActiveSheet.Paste
  Application.CutCopyMode = False
  
  'Webes fájl bezárása
  Windows("otos.xls").Activate
  ActiveWindow.Close
  End Sub

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