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

• #31712 adamch4 tag

  Új Válasz 2016-06-03 21:01:16 #31712

  Ú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

  

  adamch4

  tag

  Sziasztok!
  Szeretnék írni egy makrót, ami a következőt csinálja:
  Input munkalapról az A1:A20 cellatartományban szereplő értékeket átmásolja az Output munkalapra előbb a B, majd a C, D, E, stb. oszlopokba egy változó alapján. Konkrétan napi adatokat használok és azt szeretném, hogy a naponta frissülő értékeket mondjuk egy =TODAY() függvénnyel egy kattintással mindig új oszlopba dobálhassam. Eddig erre jutottam:

  Sub Copy()
Worksheets("Input").Range("A1:A20").Copy
Worksheets("Output").Range("B1:B20").PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False
End Sub

  Köszi előre is!

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