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

• #22033 Delila_1 veterán #02644736 #22031

  Új Válasz 2014-06-17 11:54:50 #22033

  Ú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 #02644736 #22031 üzenetére

  A lapodhoz kell rendelned a lenti makrót, ennek a módját több helyen megtalálod a fórumon.

  Az X1 helyett olyan címet írj, ahol biztosan nincs adatod.

  Private Sub Worksheet_Change(ByVal Target As Range)
  If Target.Address = "$A$1" Then
  Application.EnableEvents = False
  Range("A1") = Range("X1") + Target
  Range("X1") = Range("A1")
  Application.EnableEvents = True
  End If
  End Sub

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