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

• #12638 Delila_1 veterán rroolleerr #12637

  Új Válasz 2012-01-13 15:35:12 #12638

  Ú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 rroolleerr #12637 üzenetére

  Ezt a makrót rendeld a lapodhoz:

  Private Sub Worksheet_Change(ByVal Target As Range)
  If Target.Address = "$A$1" And IsNumeric(Target) Then _
  Range("A2") = Range("A2") + Target
  End Sub

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