Copier une fonction

Bonjour à tous,

J'ai encore un problème à résoudre. J'ai un classeur qui contient des données (x & y) avec 14 décimales. Je dois multiplier chàque donnée par 10; autant pour les "x" que les "y". Mon problème vient du fait que la plage de données (colonnes A & B) varie d'une fois à l'autre. Ce n'est jamais de la même longueur. Je veux une macro qui effectuera l'opération mathématique peu importe la dimension des plages. Je joins un exemple pour votre information.

Merci beaucoup pour votre aide .

Bonjour,

Tu ajoutes ce code VBA

Sub Calculer()
    Range("D3").Select
    ActiveCell.FormulaR1C1 = "=+RC[-3]*10"
    Range("E3").Select
    ActiveCell.FormulaR1C1 = "=+RC[-3]*10"
    Range([D3], [A65536].End(xlUp).Offset(0, 4)).Select
    Selection.FillDown
    Selection.Copy
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
                                                                    :=False, Transpose:=False
    Application.CutCopyMode = False
    [A1].Select
End Sub

salut le forum

Pour multiplier directement la plage A3:Bx par 10

Sub MultipliyBy10()
Dim DerLig As Long
  DerLig = Cells(Rows.Count, 1).End(xlUp).Row
    Range("A3:B" & DerLig) = Evaluate("A3:B" & DerLig & "*10")
End Sub

Mytå

Un gros merci poru l'aide

Hoyeuses fêtes!