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

• #19152 Delila_1 veterán Caipi #19143

  Új Válasz 2013-09-30 12:45:37 #19152

  Ú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 Caipi #19143 üzenetére

  Ez a függvény nálam sosem jött be.
  A helyedben egy nyúlfarknyi makróval oldanám meg. Az első lap A oszlopába beírnám az egyes lapok nevét, a makró meg melléjük tenné a B oszlopba a hiperhivatkozást.

  Sub hiper()
  Dim i As Integer
  For i = 2 To Worksheets.Count
  Cells(i - 1, 2).Select
  ActiveSheet.Hyperlinks.Add Anchor:=Selection, _
  Address:="", SubAddress:=Sheets(i).Name & "!A1"
  Next
  End Sub

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