OpenOffice.info

Verfasst: **Mo, 17.03.2025 17:26**

Hallo zusammen,
ich nutze LibreOffice Calc erst seid kurzem, habe bis jetzt Excel mit VBA genutzt und möchte auf Calc umsteigen.

In einer Tabelle „Termine.xlsm“ habe ich eine Schleife mit der ich alte Hyperlinks lösche, unter Calc erfolgt leider eine Fehlermeldung.

Hier die Schleife wie sie unter Excel funktioniert hat. Was muss ich änder damit sie in Calc auch klappt?

Do Until ActiveCell.Value = "" Bild

' Selection.Hyperlinks.Delete
ActiveCell.Hyperlinks.Delete
ActiveCell.Offset(1, 0).Select
Loop ' Ende Schleife Hyperlink löschen

Fehlermeldung:

: ActiveCell.Hyperlinks.Delete.jpg (16.59 KiB) 3985 mal betrachtet

Lieben Gruß CPP

Verfasst: **Mo, 17.03.2025 19:53**

Hallo

Achtung python

Code: Alles auswählen

def remove_hyperlinks(*_):
    doc = XSCRIPTCONTEXT.getDocument()
    sel = doc.CurrentSelection    
    links = sel.queryContentCells(512)
    if links:
        for cell in links.Cells:
            for field in cell.TextFields:
                field.URL = ""
                field.Representation = ""

Als VBA-profi bist du sicher in der Lage, vorher die Tastaturkombi strg+shift+↓ zu drücken

OpenOffice.info

Hyperlink in Tabellen

Hyperlink in Tabellen

Re: Hyperlink in Tabellen