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

• #2002 lapa veterán Pá #2000

  Új Válasz 2007-02-09 18:03:13 #2002

  Ú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

  

  lapa

  veterán

  válasz Pá #2000 üzenetére

  itt egy mintakód, elég kezdetleges. ez a B2 és C2 cellákat fogja kapcsolni.
  
  alt + F11 --> azon belül duplakatt munka1-re vagy sheet1-re. oda másold be.
  
  Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  If Target.Address = ''$B$3'' Then
  Cells(2, 3).Value = Cells(2, 2).Value
  End If
  
  If Target.Address = ''$C$3'' Then
  Cells(2, 2).Value = Cells(2, 3).Value
  End If
  
  End Sub
  
  
  persze még ki kell egészíteni, hogy mivan ha jobbra vagy más irányba lép el a celláról a júzer. nemtom így használható-e.

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