Bonjour à tous,
voila j'ai des données dans les cellules comprises entre D4:J16
je souhaite arrondir la valeur de chaque cellule via Roundup(,-1).

Mais le truc bête je ne trouve pas le code....

j'ai utilisé le code ci-dessous pour trouver les valeurs vides et mette 0 à la place, mais je n'arrive pas à greffer la fonction arrondir pour les valeurs différentes de 0

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
For g = 2 To 9
  Range("D4:J16").Columns(g).SpecialCells(xlCellTypeBlanks) = 0
  Next g
je pensais ajouter
Code : Sélectionner tout - Visualiser dans une fenêtre à part
 Range("D4:J16").Columns(g) = WorksheetFunction.RoundUp(Range(Cells(5, g), Cells(16, g)), -1)
mais du coup j'ai une erreur d’exécution 13.

Où est l'erreur?

Merci par avance de votre aide.