CODE VBA Simple

Re-Bonjour à tous,

Je débute en VBA et le peu que je veuille faire me pose déjà un petit problème...

Je voudrai juste effectuer dans la colonne "Poid prod VBA" :

• Après clique sur le bouton : Supprimer les valeurs de cette colonne
• Effectuer I2*J2 dans la cellule L2
• Tirer la formule vers le bas de la cellule L2

Mais ça me pose soucis ....

Merci de vos futures réponses et explications pour que je progresse SVP. A bientôt .

AllanHub

Range("L2").Formula = "=I2*J2"

Hello,

Une proposition en PJ.

Bonne journée

Merci bien Melch ça marche niquel !

Mais pourquoi moi ça ne marche pas ?

Merci encore

Merci à toi aussi Nonesofar !!! 8)

Ton code dit :

Range("L2") = Range("I2") * Range("J2") 'La valeur de L2 = La valeur de I2 * la valeur de J2 (Ici ça donne 17.42)

Selection.AutoFill Destination:=Range("L2:L1342") 'On tire ce qu'il y a en L2 vers le bas, sauf qu'en L2 on a pas de formule, on a la valeur 17.42

Du coup mon code, lui, dit :

Range("L2").Formula = "=I2*J2" 'La formule en L2 est : "=I2*J2

Donc quand tu tires evrs le bas ça marche

Autre point , il faut que tu remplace ta ligne :

Range("L2:L1342").Delete

Par la ligne :

Range("L2:L1342").ClearContents

Parce que sinon tes autres colonnes se trouvent déplacées vers la gauche puis supprimées.

Re,

Ah niquel bah oui c'est idiot de ma part....

Ouaip pour le deuxième point je l'avais modifié je m'en suis rendu compte qu'après mais je crois que même avec .Clear tout court ça marche !

Merci les gars !

ClearContents supprime le contenu de la cellule

Clear supprime le contenu et la mise en forme

C'est donc toi qui choisi selon tes besoins ^^

Ok niquel, merci de ta réponse et à bientôt

AllanHub

Parfait,