Excel 97: Geen menukeuze om alle Hyperlinks te selecteren

BELANGRIJK: Dit artikel is vertaald door de vertaalmachine software van Microsoft in plaats van door een professionele vertaler. Microsoft biedt u professioneel vertaalde artikelen en artikelen vertaald door de vertaalmachine, zodat u toegang heeft tot al onze knowledge base artikelen in uw eigen taal. Artikelen vertaald door de vertaalmachine zijn niet altijd perfect vertaald. Deze artikelen kunnen fouten bevatten in de vocabulaire, zinsopbouw en grammatica en kunnen lijken op hoe een anderstalige de taal spreekt en schrijft. Microsoft is niet verantwoordelijk voor onnauwkeurigheden, fouten en schade ontstaan door een incorrecte vertaling van de content of het gebruik ervan door onze klanten. Microsoft past continue de kwaliteit van de vertaalmachine software aan door deze te updaten.

De Engelstalige versie van dit artikel is de volgende: 156353
Vrijwaring inhoud KB-artikelen over niet langer ondersteunde producten
Dit artikel heeft betrekking op producten waarvoor Microsoft geen ondersteuning meer biedt. Daarom wordt dit artikel alleen in de huidige vorm aangeboden en wordt het niet meer bijgewerkt.
Symptomen
Microsoft Excel 97 is geen optie waarmee u Alles selecterenhyperlinks in een werkblad.
Workaround
Microsoft verstrekt programming voorbeelden uitsluitend ter illustratie expliciete of impliciete, met inbegrip van maar niet beperkt tot impliciete garanties van verkoopbaarheid en/of geschiktheid voor een bepaald doel. In dit artikel wordt ervan uitgegaan dat u bekend met de programmeertaal wordt aangetoond en de hulpprogramma's bent en procedures voor foutopsporing. Microsoft support professionals kunnen helpen verklaren de functionaliteit van een bepaalde procedure, maar ze niet wijzigt deze voorbeelden om extra functionaliteit of procedures aan uw specifieke behoeften te maken.
Als u programmeren beperkte, kunt u contact opnemen met een Microsoft Certified Partner of Microsoft Advisory Services. Bezoek de website van Microsoft voor meer informatie:

Microsoft Certified Partners- https://partner.Microsoft.com/Global/30000104

Microsoft Advisory Services- http://support.Microsoft.com/gp/advisoryservice

Bezoek de volgende Microsoft-website voor meer informatie over de ondersteuningsopties die beschikbaar zijn en hoe u contact kunt opnemen met Microsoft:http://support.Microsoft.com/default.aspx?scid=fh;EN-US;CNTACTMSHet is een Microsoft Visual Basic voor Applications subroutine gebruikenalle hyperlinks in een werkblad doorlopen en eenelke hyperlink specifieke bewerking. Bijvoorbeeld, kan u alle verwijderenhyperlinks of u kan gewoon de locatie van elke hyperlink melden.

  1. Maak een nieuwe werkmap in Microsoft Excel.
  2. Wijs Macro aan in het menu Extra en klik op Visual Basic Editor.
  3. In de Visual Basic Editor, klikt u op Module in het menu invoegen.
  4. Typ de volgende code in de module:
          'This Sub procedure deletes all hyperlinks in the active worksheet.      Sub DeleteAllHyperlinks()          For Each xLink In ActiveSheet.Hyperlinks              xLink.Delete          Next xLink      End Sub      'This Sub procedure displays a series of message boxes indicating      'the location of each hyperlink in the active worksheet.      Sub ReportHyperlinkLocations()          For Each xLink In ActiveSheet.Hyperlinks              MsgBox xLink.Range.Address          Next xLink      End Sub      'This Sub procedure identifies each hyperlink and asks if you want      'to delete it. If you click Yes, the hyperlink is deleted.      Sub ReportAndDeleteHyperlinks()          For Each xLink In ActiveSheet.Hyperlinks              Response = MsgBox("Delete hyperlink in cell " & _                  xLink.Range.Address & " ?", vbYesNo)              If Response = vbYes Then xLink.Delete          Next xLink      End Sub      'This Sub procedure selects all cells in the worksheet that contain      'hyperlinks. You can then clear the selected cells to delete all of      'the hyperlinks.      Sub SelectAllHyperlinkCells()          FirstCell = 1          For Each xLink In ActiveSheet.Hyperlinks              If FirstCell = 1 Then                  Set xRange = xLink.Range                  FirstCell = 0              Else                  Set xRange = Application.Union(xRange, xLink.Range)              End If          Next xLink          xRange.Select      End Sub						
  5. Klik in het menu bestand op 'sluiten en terugkeren naar Microsoft Excel.
Als u bepaalde hyperlinks in uw werkblad invoegen, kunt u proberen met deWijs Macro aan in het menu Extra en op macroMacro's. Vervolgens selecteert u de naam van de macro en klik op uitvoeren.
Meer informatie
Het dialoogvenster selecteren speciaal in Microsoft Excel kunt u selecterencellen of objecten in een werkblad in verschillende combinaties. Voorvoorbeeld, kunt u alle objecten in een werkblad selecteren of alle cellen selecterendie voorwaardelijke opmaak of opmerkingen bevatten.

Het dialoogvenster selecteren speciaal, als volgt te werk:

  1. Klik op Ga naar in het menu Bewerken.
  2. Klik op speciaal.
Maar in het dialoogvenster selecteren speciaal biedt niet kiezenalle cellen die hyperlinks bevatten. Hierdoor zijn er enkeleproblemen bij het werken met grote aantallen hyperlinks; bijvoorbeeld, alsu wilt alle hyperlinks verwijderen uit uw werkblad, is er geen manier omdit doen zonder macro.
Referenties
Klik op Inhoudsopgave en Index in de Help voor meer informatie over hyperlinks.menu, klik op het tabblad Index in Microsoft Excel Help, typ de volgende tekst
hyperlinks maken
en dubbelklik op de geselecteerde tekst naar het 'Maak een hyperlink'onderwerp. Als u niet de informatie die u nodig hebt, vraagt u de OfficeAssistent.
URL 'select.special' specialcells routine subroutine koppelen

Waarschuwing: dit artikel is automatisch vertaald

Savybės

Straipsnio ID: 156353 – Paskutinė peržiūra: 07/17/2012 14:37:00 – Peržiūra: 4.0

Microsoft Excel 97 Standard Edition

  • kbdtacode kbprb kbualink97 kbmt KB156353 KbMtnl
Atsiliepimai