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

• #20598 Mutt senior tag *Frenszisz* #20595

  Új Válasz 2014-02-20 21:30:02 #20598

  Ú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

  

  Mutt

  senior tag

  válasz *Frenszisz* #20595 üzenetére

  Hello,

  Szerintem a munkalap Change eseményét használd erre:

  Private Sub Worksheet_Change(ByVal Target As Range)
  
  If Target.Address = "$A$1" Then
  If Target.Value < Range("B1").Value Or IsEmpty(Range("B1").Value) Then Range("B1").Value = Target.Value
  End If
  
  End Sub

  üdv

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