ChTi160
XLDnaute Barbatruc
Bonsoir le Forum
je viens de copier la liste des Liens du Forum correspondants a Combobox par exemple
mon désir et de ne conserver que le lien Question donc j'avais pensé
faire une Macro qui Supprime Les Lignes Ou le texte Affiché du lien commence par les deux lettres 'RE', mais je n'y arrive pas par le texte de la cellule
exemple
je pense qu'il faut récupérer le text a partir du lien mais comment
Merci d'avance
Amicalement
Jean Marie
New Edition
je ne sais pas ce que j'ai fait mais ma macro fonctionne
milles excuses
Jean Marie
Message édité par: ChTi160, à: 08/05/2005 22:08
je viens de copier la liste des Liens du Forum correspondants a Combobox par exemple
mon désir et de ne conserver que le lien Question donc j'avais pensé
faire une Macro qui Supprime Les Lignes Ou le texte Affiché du lien commence par les deux lettres 'RE', mais je n'y arrive pas par le texte de la cellule
exemple
Code:
Sud SuppLien()
Dim derlgn As Integer
Dim cel As Range
With ActiveWorkSheet
derlgn = .Range('B65536'Â'Â').End(xlUp).Row
For Each cel In .Range('B3:B' & derlgn)
If Left(cel.Value, 2) = 'Re' Then
Rows(cel.Row).EntireRow.Delete
End If
Next
End With
End SubMerci d'avance
Amicalement
Jean Marie
New Edition
je ne sais pas ce que j'ai fait mais ma macro fonctionne
milles excuses
Jean Marie
Message édité par: ChTi160, à: 08/05/2005 22:08