Multiplication 2 colonnes

Bonjour,

Comment puis je faire pour multiplier deux colonnes entres elles : Uniquement en VBA svp

Colonne A * Colonne B

Merci

Bonjour

Code Module

Sub Multiplier()
Dim Cel As Range
For Each Cel In Range("A1:A" & [A65000].End(xlUp).Row).Offset(0, 2)
If Cel.Offset(0, -2) <> "" Then
Cel.Value = Cel.Offset(0, -2) * Cel.Offset(0, -1)
End If
Next Cel
End Sub

Cordialement

Bonjour Amadéus,

Tout d'abord merci pour ton aide,

Petit souci : lorsque je veux réaliser le calcul, (peutetre ayant beaucoup de ligne) il y a une erreur (Dépassement de capacité)

Aurais tu une solution ?

Bonjour

Tu as beaucoup de nombres, dis-tu. A 50 000 lignes je n'ai aucun problème avec des nombres style 3234567893412

Les nombres les plus grands à multiplier sont de combien de chiffres?

Sur quelle ligne obtiens tu cette erreur?

Cordialement

Voici le fichier exact avec les erreurs

(J'ai légérement modifier la formule que vous m'aviez donné la première fois, car la formule que je dois utiliser était un peu différente)

Encore merci Amadéus

Ps : Ne pas prendre en compte l'image dans la feuille, celle ci ne correspond pas

Bonjour

Apparemment, les division par 0 ne passent pas.

là, c'est semble-t-il OK

Sub Bouton1_Cliquer()
Dim Cel As Range
For Each Cel In Range("M2:M" & [M65000].End(xlUp).Row).Offset(0, 2)
If Cel.Offset(0, -2) <> "" Then
On Error Resume Next
Cel.Value = Cel.Offset(0, -1) / Cel.Offset(0, -2) * 10000
End If
Next Cel
End Sub

Cordialement

Bonjour Amadeus,

Merci encore ! Cela fonctionne