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

• #13499 Delila_1 veterán m.zmrzlina #13497

  Új Válasz 2012-04-19 17:56:03 #13499

  Ú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 m.zmrzlina #13497 üzenetére

  Vegyük, hogy a Munka1 lap B4 cellájába tennéd a linket.
  Ne tedd be, csak egy szöveget írj oda, ami utal az ugrás helyére.
  A lap kódlapjára:

  Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  If Target.Address = "$B$4" Then _
  Application.Goto Sheets(2).Range("U66"), Scroll:=True
  End Sub

  felhasználva Fire előbbi hozzászólását.

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