Reconnaitre les lien hypertexte
Louis
-
Patrice33740 Messages postés 8930 Statut Membre -
Patrice33740 Messages postés 8930 Statut Membre -
Bonjour,
je suis débutant avec les macros Excel - Merci de m'aider à trouver ma solution.
config> Excel - Windows XP
J'ai besoin de recopier les valeurs texte des cellules de la colonne A vers les cellules de la colonne B en éliminant ceux qui sont hypertextes.
Merci
je suis débutant avec les macros Excel - Merci de m'aider à trouver ma solution.
config> Excel - Windows XP
J'ai besoin de recopier les valeurs texte des cellules de la colonne A vers les cellules de la colonne B en éliminant ceux qui sont hypertextes.
Merci
A voir également:
- Reconnaitre les lien hypertexte
- Lien url - Guide
- Créer un lien pour partager des photos - Guide
- Lien copié ✓ - Forum Google Chrome
- Lien de rajout pour bara facebook - Forum Webmastering
- Comment renommer un lien hypertexte - Forum Word
1 réponse
Option Explicit
Sub CopierColonneAversBsaufLiens()
Dim cel As Range
For Each cel In ActiveSheet.UsedRange.Columns(1).Cells
If cel.Hyperlinks.Count = 0 Then cel.Offset(, 1).Value = cel.Value
Next
End Sub
et si tu veux conserver les formules, remplace :
If cel.Hyperlinks.Count = 0 Then cel.Offset(, 1).Value = cel.Valuepar
If cel.Hyperlinks.Count = 0 Then cel.Offset(, 1).Formula = cel.Formula
Patrice