Formule ARRONDI SUP en VBA

Bonjour à toutes et tous,

Après plusieurs recherche et essais, je n'arrive pas à transformer le résultat de cette formule pour que le résultat soit arrondi au supérieur

exemple: si le résultat et 1,1 il arrondi à = 2 ou 0,4 = 1 ou 2,8 = 3 etc.

Voici le code en question:

PL.Cells(1, 11).FormulaLocal = "=" & PL.Cells(1, 8).Address & "/" & CDbl(TV(LI, 5)) & ""

Bonsoir Guignol81,

D après l'enregistreur de macro la traduction en VBA de ARRONDI.SUP : "=ROUNDUP(RC[-1],0)"

Cordialement.

Merci pour l'aide,

j'ai testé mais j'ai une erreur d’exécution "1004", erreur définie par l'application ou par l'objet.

voici le changement fais

PL.Cells(1, 11).FormulaLocal = "=ROUNDUP(RC[-1],0" & PL.Cells(1, 8).Address & "/" & CDbl(TV(LI, 5)) & ""

re,

Essaie avec FormulaR1C1 au lieu de FormulaLocal la syntaxe de l'enregistreur a enregistré en R1C1.

Mais je pense qu'il faut réécrire toute l'instruction.

Cordialement.

J'ai essayé se code et plusieurs autres combinaisons mais pour le moment toujours dans l'impasse...

PL.Cells(1, 11).FormulaR1C1 = "=ROUNDUP(RC[PL.Cells(1, 8).Address]/" & CDbl(TV(LI, 5)) & ""