Afin de solutionner mes petits soucis de sommeprod conditionnel, je
contourne en passant par un tableau :
formules = Range("Tableau").FormulaLocal, Tableau étant une plage de
données. Je modifie mes formules à la main, et en fermant le fichier, je
fais : Range("Tableau").FormulaLocal = formules et ça marche !!
Est-il possible de travailler directement sur le tableau afin de
modifier les formules, un truc du genre
formules = left(formules,15), mais je ne trouve pas la syntaxe (si cela
est possible ?)
F = Replace(F, AncienneChaîne, NouvelleChaine) Range("Tableau").Item(1, 2).FormulaLocal = F '-------------------
Salutations!
"ThierryP" a écrit dans le message de news: % Bonjour le forum,
Afin de solutionner mes petits soucis de sommeprod conditionnel, je contourne en passant par un tableau : formules = Range("Tableau").FormulaLocal, Tableau étant une plage de données. Je modifie mes formules à la main, et en fermant le fichier, je fais : Range("Tableau").FormulaLocal = formules et ça marche !! Est-il possible de travailler directement sur le tableau afin de modifier les formules, un truc du genre formules = left(formules,15), mais je ne trouve pas la syntaxe (si cela est possible ?)
Merci d'avance
-- @+ thierryp
Bonjour Thierry,
As-tu essayé quelque chose comme ceci :
Item(1, 2) = Coordonné de la cellule dans ton tableau dont tu veux
substituer une section de sa formule.
'-------------------
Dim F As String, AncienneChaine As String
Dim NouvelleChaine As String
F = Replace(F, AncienneChaîne, NouvelleChaine)
Range("Tableau").Item(1, 2).FormulaLocal = F
'-------------------
Salutations!
"ThierryP" <thierryp_NO_SPAM@club-internet.fr> a écrit dans le message de news: %23Y4TIaE8FHA.1416@TK2MSFTNGP09.phx.gbl...
Bonjour le forum,
Afin de solutionner mes petits soucis de sommeprod conditionnel, je
contourne en passant par un tableau :
formules = Range("Tableau").FormulaLocal, Tableau étant une plage de
données. Je modifie mes formules à la main, et en fermant le fichier, je
fais : Range("Tableau").FormulaLocal = formules et ça marche !!
Est-il possible de travailler directement sur le tableau afin de
modifier les formules, un truc du genre
formules = left(formules,15), mais je ne trouve pas la syntaxe (si cela
est possible ?)
F = Replace(F, AncienneChaîne, NouvelleChaine) Range("Tableau").Item(1, 2).FormulaLocal = F '-------------------
Salutations!
"ThierryP" a écrit dans le message de news: % Bonjour le forum,
Afin de solutionner mes petits soucis de sommeprod conditionnel, je contourne en passant par un tableau : formules = Range("Tableau").FormulaLocal, Tableau étant une plage de données. Je modifie mes formules à la main, et en fermant le fichier, je fais : Range("Tableau").FormulaLocal = formules et ça marche !! Est-il possible de travailler directement sur le tableau afin de modifier les formules, un truc du genre formules = left(formules,15), mais je ne trouve pas la syntaxe (si cela est possible ?)
Merci d'avance
-- @+ thierryp
ThierryP
Une fois de plus, merci d'avoir répondu..!! En fait, comme mon post avait l'air de s'être perdu, j'ai fouillé dans les archives du forum, et je suis tombé sur un échange fructueux entre toi, Misange et Frédéric Sigonneau. Et même si je n'ai pas tout compris de la manipulation des tableaux, j'ai pu adapter les exemples fournis !!
Déjà à l'époque (2002 !!), tu étais sur le coup !! Merci
@+ thierryp
Bonjour Thierry,
As-tu essayé quelque chose comme ceci :
Item(1, 2) = Coordonné de la cellule dans ton tableau dont tu veux substituer une section de sa formule.
'------------------- Dim F As String, AncienneChaine As String Dim NouvelleChaine As String
F = Replace(F, AncienneChaîne, NouvelleChaine) Range("Tableau").Item(1, 2).FormulaLocal = F '-------------------
Salutations!
"ThierryP" a écrit dans le message de news: % Bonjour le forum,
Afin de solutionner mes petits soucis de sommeprod conditionnel, je contourne en passant par un tableau : formules = Range("Tableau").FormulaLocal, Tableau étant une plage de données. Je modifie mes formules à la main, et en fermant le fichier, je fais : Range("Tableau").FormulaLocal = formules et ça marche !! Est-il possible de travailler directement sur le tableau afin de modifier les formules, un truc du genre formules = left(formules,15), mais je ne trouve pas la syntaxe (si cela est possible ?)
Merci d'avance
-- @+ thierryp
Une fois de plus, merci d'avoir répondu..!!
En fait, comme mon post avait l'air de s'être perdu, j'ai fouillé dans
les archives du forum, et je suis tombé sur un échange fructueux entre
toi, Misange et Frédéric Sigonneau. Et même si je n'ai pas tout compris
de la manipulation des tableaux, j'ai pu adapter les exemples fournis !!
Déjà à l'époque (2002 !!), tu étais sur le coup !!
Merci
@+ thierryp
Bonjour Thierry,
As-tu essayé quelque chose comme ceci :
Item(1, 2) = Coordonné de la cellule dans ton tableau dont tu veux
substituer une section de sa formule.
'-------------------
Dim F As String, AncienneChaine As String
Dim NouvelleChaine As String
F = Replace(F, AncienneChaîne, NouvelleChaine)
Range("Tableau").Item(1, 2).FormulaLocal = F
'-------------------
Salutations!
"ThierryP" <thierryp_NO_SPAM@club-internet.fr> a écrit dans le message de news: %23Y4TIaE8FHA.1416@TK2MSFTNGP09.phx.gbl...
Bonjour le forum,
Afin de solutionner mes petits soucis de sommeprod conditionnel, je
contourne en passant par un tableau :
formules = Range("Tableau").FormulaLocal, Tableau étant une plage de
données. Je modifie mes formules à la main, et en fermant le fichier, je
fais : Range("Tableau").FormulaLocal = formules et ça marche !!
Est-il possible de travailler directement sur le tableau afin de
modifier les formules, un truc du genre
formules = left(formules,15), mais je ne trouve pas la syntaxe (si cela
est possible ?)
Une fois de plus, merci d'avoir répondu..!! En fait, comme mon post avait l'air de s'être perdu, j'ai fouillé dans les archives du forum, et je suis tombé sur un échange fructueux entre toi, Misange et Frédéric Sigonneau. Et même si je n'ai pas tout compris de la manipulation des tableaux, j'ai pu adapter les exemples fournis !!
Déjà à l'époque (2002 !!), tu étais sur le coup !! Merci
@+ thierryp
Bonjour Thierry,
As-tu essayé quelque chose comme ceci :
Item(1, 2) = Coordonné de la cellule dans ton tableau dont tu veux substituer une section de sa formule.
'------------------- Dim F As String, AncienneChaine As String Dim NouvelleChaine As String
F = Replace(F, AncienneChaîne, NouvelleChaine) Range("Tableau").Item(1, 2).FormulaLocal = F '-------------------
Salutations!
"ThierryP" a écrit dans le message de news: % Bonjour le forum,
Afin de solutionner mes petits soucis de sommeprod conditionnel, je contourne en passant par un tableau : formules = Range("Tableau").FormulaLocal, Tableau étant une plage de données. Je modifie mes formules à la main, et en fermant le fichier, je fais : Range("Tableau").FormulaLocal = formules et ça marche !! Est-il possible de travailler directement sur le tableau afin de modifier les formules, un truc du genre formules = left(formules,15), mais je ne trouve pas la syntaxe (si cela est possible ?)
