Discussion :

[roidurif]

Bonjour a tous

ce que j'essaye de faire c'est tout simplement
j'ai deux onglets : 1) Fiche ; 2) Tableau

Quand je renseigne la fiche, j'aimerais à partir d'une macro recupérer ces données pour ensuite renseigner automatiquement le tableau.

Comment faire pour retranscrire cela à partir de l'onglet BDD : =SI(C2>0;'Fiche'!F17;0)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
Sub test2()
'With Sheets("BDD")
For Each x In Sheets("BDD").Range("C2", [C2].End(xlDown))
If x > 0 Then Sheets("Fiche").Range("F17").Copy
Sheets("BDD").Range("A2").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone
Next x
'End With
End Sub

Ce j'ai reussi à faire c'est de copier / coller automatiquement les données "article" ; "description" et "prix" de la fiche vers le tableau, mais là où je bloque et que je n'arrive pas, c'est dire :

De renseigner la "date début", "date de fin", "numero client" et la "devise".

ci-joint mon fichier

Pourrais je avoir votre aide SVP?

merci