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

• #23800 róland veterán Delila_1 #23799

  Új Válasz 2014-10-17 20:38:18 #23800

  Ú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

  

  róland

  veterán

  válasz Delila_1 #23799 üzenetére

  Ha jól nézem akkor a következő részlet átalakítása akár nekem is jó lehet?

  If Target.Column = 7 Then
  sor = Target.Row
  Application.EnableEvents = Fals
  Range(Cells(sor, "B"), Cells(sor, "F")).Copy
  Range("H18").PasteSpecial xlPasteValues
  Application.CutCopyMode = False
  Range("B4").Select
  Application.EnableEvents = True
  End If

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