modifier une macro

bpol · 29 Décembre 2006

bonjour à tout,

est ce qu'un membre de ce forum saurait m'aider au sujet d'une modification d'unemacro que j'ai trouvée sur ce forum?

Merci
Bpol

XanorK · 29 Décembre 2006

Re : modifier une macro

Bonjour Bpol,

Je ne comprends pas ta demande,

Apparament la macro reporte les données essentielles de la feuille 'Facture' vers 'dét. Fact'.
mais j'avoue que je ne vois pas l'interet de la commande
If ActiveSheet.Name = "facture" Then

A quoi sert la variable TotalHT? veux-tu trier les lignes de la feuille 'dét. fact' en fonction de ce montant ? Si oui dans quel sens, croissant ou decroissant (pur beurre) ?

Edit : En attendant tes reponses, j'ai simplifié corriger ta macro en esperant avoir compris ta demande.

Code:

Sub macroAcorriger()
    Dim Ligne As Integer

    Sheets("dét. fact").Select
    Ligne = Range("A65536").End(xlUp).Row + 1
    Cells(Ligne, 1) = Sheets("facture").Range("C9")
    Cells(Ligne, 2) = Sheets("facture").Range("C7")
    Cells(Ligne, 3) = Sheets("facture").Range("G7")
    Cells(Ligne, 4) = Sheets("facture").Range("J32")
    Cells(Ligne, 5) = Sheets("facture").Range("J28")
    Cells(Ligne, 6) = Sheets("facture").Range("G32")

'''''debut du tri
    Range("A1:F" & Ligne).Select
    Selection.Sort Key1:=Range("E2"), Order1:=xlAscending, Header:=xlYes
End Sub

Cela tri par montant, si tu voulais trier sur un autre critere il te faudra corriger le Key1
Key1:= Range("A2") pour trier par N° de facture
Key1:= Range("B2") pour trier par date
Key1:= Range("C2") pour trier par Nom
etc...

XanorK

bpol · 29 Décembre 2006

Re : modifier une macro

bonjour anork,
merci de la correction c'est l'idéal
je n'y connais pas assez ds les synthaxes des macros
je suis toujours au niveau 1 ds ce domaine

je te souhaîte un joyeux réveillon
Bpol

modifier une macro

bpol

XLDnaute Impliqué

Pièces jointes

XanorK

XLDnaute Occasionnel

bpol

XLDnaute Impliqué

Discussions similaires

modifier une macro

bpol

XLDnaute Impliqué

Pièces jointes

XanorK

XLDnaute Occasionnel

bpol

XLDnaute Impliqué

Discussions similaires

Privacy & Transparency

Privacy & Transparency