j'ai réussi à faire apparaître sous forme de grille ma feuille dans la macro
mais dans ma colonne "règlements" je ne peux saisir de formule donc s'il y a
plusieurs règlements, la cellule s'affiche "200+250" par exemple dans la
feuille mais ne calcule pas le résultat.
La commande Range("q5").Value = Application.Evaluate(Range("h5").Value)
donne bien 450 dans la cellule Q5.
Mais je voudrais que ce calcul se fasse pour toute la colonne (3500 lignes).
Si je fais q5:q3503, j'ai partout le résultat de la cellule h5.
Si je fais For each c in etc... ça bug.
Merci de m'aider. peut-être pourrais-je créer une fonction ou une macro qui
s'éxécuterait quand une somme est saisie dans la grille mais je ne sais pas
comment faire.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
FxM
Bonjour Jacques,
Sub test() Range("q5:Q3503").Value = Application.Evaluate(Range("h5").Value) End Sub complète bien les cellules Q5 à Q3503 [enfin chez moi :o) ]
@+ FxM
Jacques wrote:
Bonjour à tous,
j'ai réussi à faire apparaître sous forme de grille ma feuille dans la macro mais dans ma colonne "règlements" je ne peux saisir de formule donc s'il y a plusieurs règlements, la cellule s'affiche "200+250" par exemple dans la feuille mais ne calcule pas le résultat. La commande Range("q5").Value = Application.Evaluate(Range("h5").Value) donne bien 450 dans la cellule Q5. Mais je voudrais que ce calcul se fasse pour toute la colonne (3500 lignes). Si je fais q5:q3503, j'ai partout le résultat de la cellule h5. Si je fais For each c in etc... ça bug.
Merci de m'aider. peut-être pourrais-je créer une fonction ou une macro qui s'éxécuterait quand une somme est saisie dans la grille mais je ne sais pas comment faire.
Jacques
Bonjour Jacques,
Sub test()
Range("q5:Q3503").Value = Application.Evaluate(Range("h5").Value)
End Sub
complète bien les cellules Q5 à Q3503 [enfin chez moi :o) ]
@+
FxM
Jacques wrote:
Bonjour à tous,
j'ai réussi à faire apparaître sous forme de grille ma feuille dans la macro
mais dans ma colonne "règlements" je ne peux saisir de formule donc s'il y a
plusieurs règlements, la cellule s'affiche "200+250" par exemple dans la
feuille mais ne calcule pas le résultat.
La commande Range("q5").Value = Application.Evaluate(Range("h5").Value)
donne bien 450 dans la cellule Q5.
Mais je voudrais que ce calcul se fasse pour toute la colonne (3500 lignes).
Si je fais q5:q3503, j'ai partout le résultat de la cellule h5.
Si je fais For each c in etc... ça bug.
Merci de m'aider. peut-être pourrais-je créer une fonction ou une macro qui
s'éxécuterait quand une somme est saisie dans la grille mais je ne sais pas
comment faire.
Sub test() Range("q5:Q3503").Value = Application.Evaluate(Range("h5").Value) End Sub complète bien les cellules Q5 à Q3503 [enfin chez moi :o) ]
@+ FxM
Jacques wrote:
Bonjour à tous,
j'ai réussi à faire apparaître sous forme de grille ma feuille dans la macro mais dans ma colonne "règlements" je ne peux saisir de formule donc s'il y a plusieurs règlements, la cellule s'affiche "200+250" par exemple dans la feuille mais ne calcule pas le résultat. La commande Range("q5").Value = Application.Evaluate(Range("h5").Value) donne bien 450 dans la cellule Q5. Mais je voudrais que ce calcul se fasse pour toute la colonne (3500 lignes). Si je fais q5:q3503, j'ai partout le résultat de la cellule h5. Si je fais For each c in etc... ça bug.
Merci de m'aider. peut-être pourrais-je créer une fonction ou une macro qui s'éxécuterait quand une somme est saisie dans la grille mais je ne sais pas comment faire.
Jacques
Jacques
Rebonjour,
Merci pour la réponse mais j'ai du mal m'exprimer. L'instruction que tu m'as communiqué fonctionne mais copie dans toutes les cellules de la plage q5:q3503 le résultat de h5. Je souhaiterais que le résultat de h5 aille en q5, de h6 en q6, etc... Merci d'avance pour la réponse @+ Jacques
"FxM" a écrit dans le message de news:
Bonjour Jacques,
Sub test() Range("q5:Q3503").Value = Application.Evaluate(Range("h5").Value) End Sub complète bien les cellules Q5 à Q3503 [enfin chez moi :o) ]
@+ FxM
Jacques wrote:
Bonjour à tous,
j'ai réussi à faire apparaître sous forme de grille ma feuille dans la macro
mais dans ma colonne "règlements" je ne peux saisir de formule donc s'il y a
plusieurs règlements, la cellule s'affiche "200+250" par exemple dans la feuille mais ne calcule pas le résultat. La commande Range("q5").Value = Application.Evaluate(Range("h5").Value) donne bien 450 dans la cellule Q5. Mais je voudrais que ce calcul se fasse pour toute la colonne (3500 lignes).
Si je fais q5:q3503, j'ai partout le résultat de la cellule h5. Si je fais For each c in etc... ça bug.
Merci de m'aider. peut-être pourrais-je créer une fonction ou une macro qui
s'éxécuterait quand une somme est saisie dans la grille mais je ne sais pas
comment faire.
Jacques
Rebonjour,
Merci pour la réponse mais j'ai du mal m'exprimer. L'instruction que tu m'as
communiqué fonctionne mais copie dans toutes les cellules de la plage
q5:q3503 le résultat de h5.
Je souhaiterais que le résultat de h5 aille en q5, de h6 en q6, etc...
Merci d'avance pour la réponse
@+
Jacques
"FxM" <fxmanceaux@chello.fr> a écrit dans le message de
news:etqGfAnYEHA.3688@TK2MSFTNGP12.phx.gbl...
Bonjour Jacques,
Sub test()
Range("q5:Q3503").Value = Application.Evaluate(Range("h5").Value)
End Sub
complète bien les cellules Q5 à Q3503 [enfin chez moi :o) ]
@+
FxM
Jacques wrote:
Bonjour à tous,
j'ai réussi à faire apparaître sous forme de grille ma feuille dans la
macro
mais dans ma colonne "règlements" je ne peux saisir de formule donc s'il
y a
plusieurs règlements, la cellule s'affiche "200+250" par exemple dans la
feuille mais ne calcule pas le résultat.
La commande Range("q5").Value = Application.Evaluate(Range("h5").Value)
donne bien 450 dans la cellule Q5.
Mais je voudrais que ce calcul se fasse pour toute la colonne (3500
lignes).
Si je fais q5:q3503, j'ai partout le résultat de la cellule h5.
Si je fais For each c in etc... ça bug.
Merci de m'aider. peut-être pourrais-je créer une fonction ou une macro
qui
s'éxécuterait quand une somme est saisie dans la grille mais je ne sais
pas
Merci pour la réponse mais j'ai du mal m'exprimer. L'instruction que tu m'as communiqué fonctionne mais copie dans toutes les cellules de la plage q5:q3503 le résultat de h5. Je souhaiterais que le résultat de h5 aille en q5, de h6 en q6, etc... Merci d'avance pour la réponse @+ Jacques
"FxM" a écrit dans le message de news:
Bonjour Jacques,
Sub test() Range("q5:Q3503").Value = Application.Evaluate(Range("h5").Value) End Sub complète bien les cellules Q5 à Q3503 [enfin chez moi :o) ]
@+ FxM
Jacques wrote:
Bonjour à tous,
j'ai réussi à faire apparaître sous forme de grille ma feuille dans la macro
mais dans ma colonne "règlements" je ne peux saisir de formule donc s'il y a
plusieurs règlements, la cellule s'affiche "200+250" par exemple dans la feuille mais ne calcule pas le résultat. La commande Range("q5").Value = Application.Evaluate(Range("h5").Value) donne bien 450 dans la cellule Q5. Mais je voudrais que ce calcul se fasse pour toute la colonne (3500 lignes).
Si je fais q5:q3503, j'ai partout le résultat de la cellule h5. Si je fais For each c in etc... ça bug.
Merci de m'aider. peut-être pourrais-je créer une fonction ou une macro qui
s'éxécuterait quand une somme est saisie dans la grille mais je ne sais pas
comment faire.
Jacques
AV
Je souhaiterais que le résultat de h5 aille en q5, de h6 en q6, etc...
[Q5:Q3503] = [H5:H3503].Value
AV
Je souhaiterais que le résultat de h5 aille en q5, de h6 en q6, etc...
