[WORD MACRO] : fusion des cellules

Dernière réponse : 4 Mai 2007 10:16 dans Programmation

camzo

26 Avril 2007 16:40:17

bonjour à tous,

je dois transformer un fichier word avec une macro

le tableau a plusieurs colonnes dont seule la première m'importe

je dois fusionner les cellules qui ont le même contenu

donc j'ai dans ma colonnes les lignes :

1
1
1
1
2
2
3
4
4

et je veux :

1

2

3

4

si quelqu'un a une idée, qu'il n'hésite pas !!!

merci d'avance,
un documentaliste à l'arrache...

Autres pages sur : word macro fusion cellules

| Etre averti des réponses
| Alerter

Répondre à camzo

Lassé par la pub ? Créez un compte

elendilm

27 Avril 2007 11:45:32

idx=1
for ligne= 2 to n step 1
do
if(cells(ligne,1).value == cells(idx,1).Value)
then
'cellules identique, afficher à blanc
cells(ligne,1).Value=""
else
'cellules différentes, on modifie l'index de comparaison.
idx=ligne
fi
done

| Alerter

Répondre à elendilm

camzo

30 Avril 2007 12:02:33

merci bien mais je ne peux pas exécuter cette macro car il y a apparemment une erreur dans la ligne :

Citation :

if(cells(ligne,1).value == cells(idx,1).Value)

le débogeur me dit que : erreur de compilation Sub ou Function non définie

si quelqu'un sait ce que ça veut dire, qu'il n'hésite pas à m'en faire part !!!