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

• #26744 azopi74 addikt bandy008 #26743

  Új Válasz 2015-04-30 12:50:03 #26744

  Ú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

  

  azopi74

  addikt

  válasz bandy008 #26743 üzenetére

  Jahh, ezt VBA-ba kell beírnod.

  Developer (/Fejlesztő ) tab, Visual Basic, Insert Module. És futtasd le F5-tel.

• #26741 azopi74 addikt bandy008 #26738

  Új Válasz 2015-04-30 12:22:38 #26741

  Ú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

  

  azopi74

  addikt

  válasz bandy008 #26738 üzenetére

  Szia:

  Sub ExtractHL()
  Dim HL As Hyperlink
  For Each HL In ActiveSheet.Hyperlinks
  HL.Range.Value = HL.Address
  Next
  End Sub

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