J ai encore besoin de vous

madampime · 14 Septembre 2014

Alors je suis tjrs sur mon bon de commande

mais je voudrai rajouter dans la macro ''nvx n° de bon de commande" l'enregistrement du n°

et j'aimerai aussi que sur l'onglet "archive" ca m'enregistre le n° de ma cde, le nom du fournisseur et la date et le montant

j'ai trouvé un code sur votre site mais je n'arrive pas a l'appliquer sur ma macro

pouvez vous encore m'aider

merci

JCGL · 14 Septembre 2014

Re : J ai encore besoin de vous

Bonjour à tous,
Salut Jean-Marcel,

Tu n'as aucune valeur dans les cellules que tu souhaites archiver

Sub Archive()
Sheets("Archive").Select
Ligne = Range("A65536").End(xlUp).Row + 1
Cells(Ligne, 1) = Sheets("BDC").Range("B16")
Cells(Ligne, 2) = Sheets("BDC").Range("E9")
Cells(Ligne, 3) = Sheets("BDC").Range("D12")
Cells(Ligne, 4) = Sheets("BDC").Range("E39")
Sheets("BDC").Select
End Sub

A+ à tous

madampime · 14 Septembre 2014

Re : J ai encore besoin de vous

a désolée mais je me suis trompée de fichier

pour ce code je l'ai trouve sur votre site pour m'aider mais je n'arrive pas a l'appliquer a mon bouton n°14

JCGL · 14 Septembre 2014

Re : J ai encore besoin de vous

Bonjour à tous,

Merci de modifier le sujet de ta demande dans ton premier message.

Peux-tu essayer ceci dans un module :

Sub Archive()
Sheets("Archive").Select
Ligne = Range("A65536").End(xlUp).Row + 1
Cells(Ligne, 1) = Sheets("BDC").Range("B10")
Cells(Ligne, 2) = Sheets("BDC").Range("F5")
Cells(Ligne, 3) = Sheets("BDC").Range("F6")
Cells(Ligne, 4) = Sheets("BDC").Range("F39")
Sheets("BDC").Select
End Sub

A+ à tous

madampime · 14 Septembre 2014

Re : J ai encore besoin de vous

ok nickel !!! c'est ce que je voulais merci encore ))))))

encore sauvé par excel download

J ai encore besoin de vous

madampime

XLDnaute Nouveau

Pièces jointes

JCGL

XLDnaute Barbatruc

madampime

XLDnaute Nouveau

Pièces jointes

JCGL

XLDnaute Barbatruc

madampime

XLDnaute Nouveau

Discussions similaires