Use the
Hyperlinks property to return the IXLSHyperlinks collection
L'exemple suivant deletes the
hyperlinks sur la feuille un pour un lien qui contient le mot 'Microsoft' dans la description
With Workbook.Sheets[1] do begin
if Hyperlinks.Count > 0 then begin
for i := Hyperlinks.Count downto 1 do begin
if Pos('Microsoft', Hyperlinks[i].Description) > 0 then
Hyperlinks[i].Delete;
end;
end;
end;
Use the Add method to create a hyperlink and add it to the
Hyperlinks collection
L'exemple suivant creates a new hyperlink for cell A8
With Workbook.Sheets[1] do begin
Hyperlinks.Add(Range['A8','A8'], 'https://www.loslab.com/HotXLS.html');
end;
Use the Delete method to remove
hyperlinks from a Worksheet or range
L'exemple suivant deletes
hyperlinks from Worksheet one
Workbook.Sheets[1].Hyperlinks.Delete;
L'exemple suivant deletes
hyperlinks from range A1:F10 on Worksheet one
Workbook.Sheets[1].Range['A1','F10'].Hyperlinks.Delete;