est-ce possible de mettre une fonction dans un code ,
au depart la macro effectue un copier coller , mais les resultat de la feuille facture b21:b44 devrait donner a la copie de la feuille inventaire un le nombre indiquer mais en negatif.mais je ne peux pas appliquer negatif a la colonnes de la feuille inventaire car il y a d'autre donner qui si insert au renouvellement de stock .

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
Sheets("INVENTAIRE").Select
    Rows("10:35").Select
    Selection.Insert Shift:=xlDown
    Sheets("FACTURE").Select
    Range("A21:A44").Select
    Selection.Copy
    Sheets("INVENTAIRE").Select
    Range("A10").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
        SkipBlanks:=False, Transpose:=False
    Range("A10").Select
    Sheets("FACTURE").Select
    Application.CutCopyMode = False
    Range("B21:B44").Select
    Selection.Copy
    Sheets("INVENTAIRE").Select
    Range("C10").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
        SkipBlanks:=False, Transpose:=False(GENRE ICI IL FAUDRAIT MULTIPLIER PAR -1, )           
    Range("C10").Select
    Sheets("FACTURE").Select
    Application.CutCopyMode = False
    Range("A21:B44").Select
    Selection.ClearContents
    Range("A21").Select
End Sub