XL 2013 mettre une formule maricielle en code vba

[grisan29]

bonjour a tous

dans une feuille que je remplie tous les mois en copiée/collée du net a excel je me trouve confronté a la formule de somme insuffisant car je reçois des données chiffrées en 1 234 avec un espace des milliers, j'arrive quand même a faire le total de la colonne grâce a une formule matricielle

=SOMME(SIERREUR(CNUM(SUBSTITUE(F2:F84;CAR(160)😉)😉)

qui est cellule 85

mon souci est que chaque mois le nombre de données est différent et dépasse des fois les 120 lignes et d'autres juste 80
alors je pensais qu'en la traduisant en vba je pourrai via macro l'appliqué a la suite de la dernière ligne écrite

j'ai bien essayer avec l'enregistreur mais il démarre a une cellule fixe

Range("F85").FormulaArray = _
        "=SUM(IFERROR(VALUE(SUBSTITUTE(R[-83]C:R[-1]C,CHAR(160),)),))"

je suis un perdu dans ce cas

Pascal

 

[BigDaddy154]

Re : mettre une formule maricielle en code vba

Bonsoir,

à tester voir si ça peut te convenir. 😉

Cordialement.

 

[grisan29]

Re : mettre une formule maricielle en code vba

bonsoir BigDaddy154 😎

merci de ta réponse on ne peux plus rapide et efficace,😎 la seule chose que je n'ai pas dit est que les colonnes
H à L ont aussi un calcul matricielle, mais avant que tu me répondes, je vais essayer avec ton merveilleux et code efficace 😎

Merci Beaucoup 😎

Pascal

 

[gosselien]

Re : mettre une formule maricielle en code vba

Bonjour,

teste ceci:

Sub tot()
Last = [f65000].End(xlUp).Row + 1: der = 0 - Last
Range("f" & Last + 1).FormulaArray = _
"=SUM(IFERROR(VALUE(SUBSTITUTE(R[-1]C:R[" & der & "]C,CHAR(160),)),))"
End Sub

 

[grisan29]

Re : mettre une formule maricielle en code vba

bonsoir Gosselien 😎 bigdaddy154 😎

merci beaucoup cela fonctionne très bien😎 exactement comme le code de bigdaddy154 😎

cela va être dur de faire un choix mais je suis tranquille j'archive les 2 versions

merci messieurs 😎😎😎 10/10

depuis le temps que je l'avais demandé ici

Pascal