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

• #22999 Delila_1 veterán slashing #22997

  Új Válasz 2014-08-26 06:30:44 #22999

  Ú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

  

  Delila_1

  veterán

  válasz slashing #22997 üzenetére

  A lapodhoz rendeld a makrót.

  Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  If Not Intersect(Target, [A5:A1000]) Is Nothing Then
  MsgBox "Hello Word"
  Range(Target.Address).Offset(, 1).Select
  End If
  End Sub

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