eviter d'ecrire

chilo

XLDnaute Occasionnel
bonsoir le forum

pas d'heure pour les braves

voila je souhaute éviter d'écrire une meme ligne

petit exemple joint

merci
 

Pièces jointes

  • eviter d'ecrire.zip
    10.8 KB · Affichages: 42
  • eviter d'ecrire.zip
    10.8 KB · Affichages: 36
  • eviter d'ecrire.zip
    10.8 KB · Affichages: 38

job75

XLDnaute Barbatruc
Re : eviter d'ecrire

Bonjour à tous,
Content de vous retrouver chilo, ci-joint votre fichier.
La recherche des lignes identiques se fait par 2 boucles For i0 et j0.
A+

PS. Par rapport à l'ancien post, vous avez supprimé la feuille toto, il faut écrire ici :
Code:
Sheets(1).Move After:=Sheets([COLOR="Red"]2[/COLOR])
 

Pièces jointes

  • eviter d'ecrire.zip
    14 KB · Affichages: 20
  • eviter d'ecrire.zip
    14 KB · Affichages: 24
  • eviter d'ecrire.zip
    14 KB · Affichages: 21
Dernière édition:

Statistiques des forums

Discussions
312 489
Messages
2 088 848
Membres
103 972
dernier inscrit
steeter