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

• #28643 m.zmrzlina senior tag elttiL #28634

  Új Válasz 2015-09-16 12:29:50 #28643

  Ú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 elttiL #28634 üzenetére

  Próbáld ezt:

  Sub beilleszt()
  holavege = Selection.Find(What:="beillesztési pont", After:=ActiveCell, LookIn:=xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False, SearchFormat:=False).Row
  Worksheets("Munka1").Range("A" & holavege).PasteSpecial Paste:=xlPasteAll
  End Sub

  Természetesen a Munka1 helyére írd a saját munkalapod nevét!

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