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

• #11992 perfag aktív tag Apollo17hu #11990

  Új Válasz 2011-11-13 11:34:29 #11992

  Ú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

  

  perfag

  aktív tag

  válasz Apollo17hu #11990 üzenetére

  Na, lassú vagyok látom, Delila_1 megelőzött - de hasonló az észjárásunk:
  Private Sub Worksheet_Change(ByVal Target As Range)
  If Intersect(Range(Target.Address), Range("C2:C300")) Is Nothing Then
  Else
  Range(Target.Address).Offset(0, 1) = Now
  End If
  End Sub

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