problème des doublon

  • Initiateur de la discussion Initiateur de la discussion djfrui
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

djfrui

XLDnaute Nouveau
Bonjour ;
je veux que la liste des noms incrémenter avec le N° de compte mais pas les doublon C-à-d que a prend le même N° de série dans touts la liste; et merci pour votre attention.
 

Pièces jointes

Re : problème des doublon

Salut;
est ce que y a une possibilité de faire une boucle pour que on peut importer les donnée de feuille Achat a la feuille Journal Achat.
car j'ai 5 colonnes de la feuille achat qui doit être exporter au journal d'achat avec condition de les cases qui son vide ne doit pas être importer c-à-d quand les cases sont pas vide on les importe si non pas la peine de les importer, cela pour chaque ligne ( Opération)
 
Re : problème des doublon

Salut,
J'ai créer un macro pour importer le donner de Feuille "Achat" à la feuille "journal d'achat", j'ai un problème; je veux que ce macro ce faire pour toutes les ligne; voila le macro de transfert la 1er ligne de feuille "achat" au feuille "journal achat"


Sub Transfert()
'
' Transfert Macro
'
' Touche de raccourci du clavier: Ctrl+a
'
Range("A5").Select
ActiveCell.FormulaR1C1 = "=Achat!R[5]C[6]"
Range("B5").Select
ActiveCell.FormulaR1C1 = "=Achat!R[5]C[7]&Achat!R[5]C[6]"
Range("D5").Select
ActiveCell.FormulaR1C1 = "=Achat!R[5]C"
Range("F5").Select
ActiveCell.FormulaR1C1 = "=Achat!R[5]C[9]"
Range("A6").Select
ActiveCell.FormulaR1C1 = "=Achat!R[4]C[6]"
Range("B6").Select
ActiveCell.FormulaR1C1 = "=Achat!R[4]C[7]&Achat!R[4]C[6]"
Range("C6").Select
ActiveCell.FormulaR1C1 = "3800"
Range("E6").Select
ActiveCell.FormulaR1C1 = "=Achat!R[4]C[5]"
Range("A7").Select
ActiveCell.FormulaR1C1 = "=Achat!R[3]C[6]"
Range("B7").Select
ActiveCell.FormulaR1C1 = "=Achat!R[3]C[7]&Achat!R[3]C[6]"
Range("C7").Select
ActiveCell.FormulaR1C1 = "3801"
Range("E7").Select
ActiveCell.FormulaR1C1 = "=Achat!R[3]C[6]"
Range("A8").Select
ActiveCell.FormulaR1C1 = "=Achat!R[2]C[6]"
Range("B8").Select
ActiveCell.FormulaR1C1 = "=Achat!R[2]C[7]&Achat!R[2]C[6]"
Range("C8").Select
ActiveCell.FormulaR1C1 = "3802"
Range("E8").Select
ActiveCell.FormulaR1C1 = "=Achat!R[2]C[7]"
Range("A9").Select
ActiveCell.FormulaR1C1 = "=Achat!R[1]C[6]"
Range("B9").Select
ActiveCell.FormulaR1C1 = "=Achat!R[1]C[7]&Achat!R[1]C[6]"
Range("C9").Select
ActiveCell.FormulaR1C1 = "3803"
Range("E9").Select
ActiveCell.FormulaR1C1 = "=Achat!R[1]C[8]"
Range("A10").Select
ActiveCell.FormulaR1C1 = "=Achat!RC[6]"
Range("B10").Select
ActiveCell.FormulaR1C1 = "=Achat!RC[7]&Achat!RC[6]"
Range("C10").Select
ActiveCell.FormulaR1C1 = "=Achat!R[-6]C[11]"
Range("E10").Select
ActiveCell.FormulaR1C1 = "=Achat!RC[9]"
Range("E11").Select
ActiveWindow.SmallScroll Down:=-6
End Sub

j'aimerai bien que je peux exécuté pour toutes les ligne de feuille "Achat"
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
9
Affichages
355
Retour