Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
736to740
736to740
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Über 3000 Hyperlink entfernen

Forumthread: Über 3000 Hyperlink entfernen

Über 3000 Hyperlink entfernen
27.02.2006 09:40:49
Heinz
Hallo Leute
Könnte mir Bitte jemand einen Tip geben,wie ich über 3000 Hyperlink auf einmal entfernen kann.
Danke,Heinz
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Über 3000 Hyperlink entfernen
27.02.2006 09:43:28
=Peter=
Hallo Heinz,
vielleicht so:

Sub DeleteHyperlinksWorksheet()
'Quelle: Monika Weber
Dim hypLink As Hyperlink
For Each hypLink In ActiveSheet.Hyperlinks
hypLink.Delete
Next hypLink
End Sub

HTH
Gruss
Peter
AW: Über 3000 Hyperlink entfernen
27.02.2006 09:47:54
Heinz
Hallo Peter
So geht es leider nicht,oder ich hab's falsch angestellt.
Habe die Hyperlink in Tabelle 1 in Spalte B1:B3500
Hättest Du eventuell nochmals Bitte eine Hilfe für mich.
Danke,Heinz
Anzeige
AW: Über 3000 Hyperlink entfernen
27.02.2006 10:00:11
u_
Hallo,

Sub Links_raus()
Range("B:B").Hyperlinks.Delete
End Sub

Gruß
Geist ist geil!
AW: Über 3000 Hyperlink entfernen
27.02.2006 10:18:28
An
Hallo Udo & Peter
Danke für Eure Hilfe
Habe nach reichlicher Überlegung,den Code von Udo eine Schaltfläche zugewiesen.Jetzt funktioniert's.
Recht herzlichen Dank,Euch beiden.
Gruss,Heinz
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige