Discussion :

[La Zélie]

Bonjour

Dans un tableau de 158 colonnes et 44 lignes, je dois supprimer les liens des cellules de 36 colonnes reparties dans les 158.

J'ai bien essayé en faisant une macro mais je n'arrive jamais au bout des 1368 cellules sans me planter

et en VBA je crois que je saurais déclarer la variable entre la ligne4 et la ligne 42
mais les colonnes je ne sais pas.

Y-a-t-il une bonne âme pour me donner la solution?

Merci de m'aider

La Zélie

[Didier Gonard]

Bonjour,

en mettant un bout de code, on aurait plus de visibilé, sinon il faut un truc du genre :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Range("D12").EntireColumn.Hyperlinks.Delete

cordialement,

Didier

[ouskel'n'or]

En supposant que les liens se trouvent sur la ligne 12, que tes N° de colonnes soient ceux du
tableau NoCol()

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
NoLig = 12
Sub test()
    NoLig = 12
    NoCol = Array(2, 5, 7, 12, 36, 56, 75)
    With Worksheets(1)
        For Col = 0 To UBound(NoCol) - 1
             Cells(NoLig, NoCol(Col)).Hyperlinks.Delete
        Next
    End With
End Sub

Pas testé, tu peux le faire pour moi ?