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

• #24326 m.zmrzlina senior tag gyu84 #24323

  Új Válasz 2014-11-24 12:22:30 #24326

  Ú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

  

  m.zmrzlina

  senior tag

  válasz gyu84 #24323 üzenetére

  Ez a pár sor át fogja másolni a Munka1 lap A1 cellában megadott nevű munkalap A1:B10 tartományát a Munka1 lap A2 cellában megadott nevű munkalap A1:B10 tartományába

  Sub masol()
  
  Dim strHonnan As String
  Dim strHova As String
  
  strHonnan = ThisWorkbook.Worksheets("Munka1").Range("A1").Value '"Munka2"
  strHova = ThisWorkbook.Worksheets("Munka1").Range("A2").Value '"Munka3"
  
  Worksheets(strHova).Range("A1:B10").Value = Worksheets(strHonnan).Range("A1:B10").Value
  
  End Sub

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