Macro : Mettre formule si cellule non vide

Marjo2

XLDnaute Occasionnel
Bonjour,

Colonne C : Quantité
Colonne D : Total
Colonne E : PU

Je souhaite faire Colonne D/Colonne C mais uniquement si il y a des chiffres dans la colonne C.
Uniquement en VBA svp
 

Marjo2

XLDnaute Occasionnel
J'ai précisé que je souhaite un code VBA uniquement !
Effectivement il existe une formule excel que je connais très bien, seulement le fichier est destiné à des personnes qui ne connaissent pas excel et donc le gain de temps et d'analyse sera d'appuyer sur un bouton.

Ma demande est pourtant synthétique et clair
 

Yoyo01000

XLDnaute Occasionnel
Dans ce cas, il existe une fonction "enregistrer une macro" dans l'onglet "développeur" si tu connais la formule à appliquer.

De plus, maintenant, tu cites vouloir un bouton qui exécute la macro, chose qui n'était pas dans ta première demande.

Ce qui est clair pour soi ne l'est pas forcément pour les autres !

Merci de joindre un fichier explicitant ta demande.
 

Marjo2

XLDnaute Occasionnel
Merci de laisser la place aux internautes qui seront constructifs.
Je connais également la fonction développeur.

La solution est sûrement dans l'idée d'implanter la formule en E2 puis de la recopier jusqu'à la dernière cellule non vide du tableau
 

Marjo2

XLDnaute Occasionnel
Sub PU()
' PU Macro
Worksheets("STOCK").Select
ActiveCell.FormulaR1C1 = "=IF(ISBLANK(RC[-1]),"" "",RC[-1]/RC[-2])"
Range("E3").Select
Worksheets("STOCK").Select
Range([E2], [C65536].End(xlUp).Offset(0, 2)).Select
Selection.FillDown
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False

End Sub

Ca fonctionne, seulement je suis obligé d'appuyer 2 fois sur mon bouton pour que le calcul se fasse
 

Statistiques des forums

Discussions
311 712
Messages
2 081 802
Membres
101 819
dernier inscrit
lukumubarth