Sub DeplacerValeur()
Dim Valeur
Valeur = [F65536].End(xlUp)
[G1] = Valeur '
End Sub
Cela fonctionne, mais il arrive que la valeur dans G1 varie de quelques
centimes par rapport à ce qu'il y a
dans la dernière cellule remplie de la colonne F, surtout quand la valeur
dépasse un million.
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
lSteph
Bonjour, ? essaie avec
Dim valeur as double
Cordialement.
lSteph
Max avait soumis l'idée :
Bonjour tout le monde,
Dans une macro j'ai le code suivant:
Sub DeplacerValeur() Dim Valeur Valeur = [F65536].End(xlUp) [G1] = Valeur ' End Sub
Cela fonctionne, mais il arrive que la valeur dans G1 varie de quelques centimes par rapport à ce qu'il y a dans la dernière cellule remplie de la colonne F, surtout quand la valeur dépasse un million.
Qui peut m'expliquer pourqoi ?
Merci d'avance
Max
-- - -
Bonjour,
?
essaie avec
Dim valeur as double
Cordialement.
lSteph
Max avait soumis l'idée :
Bonjour tout le monde,
Dans une macro j'ai le code suivant:
Sub DeplacerValeur()
Dim Valeur
Valeur = [F65536].End(xlUp)
[G1] = Valeur '
End Sub
Cela fonctionne, mais il arrive que la valeur dans G1 varie de quelques
centimes par rapport à ce qu'il y a
dans la dernière cellule remplie de la colonne F, surtout quand la valeur
dépasse un million.
Sub DeplacerValeur() Dim Valeur Valeur = [F65536].End(xlUp) [G1] = Valeur ' End Sub
Cela fonctionne, mais il arrive que la valeur dans G1 varie de quelques centimes par rapport à ce qu'il y a dans la dernière cellule remplie de la colonne F, surtout quand la valeur dépasse un million.
Qui peut m'expliquer pourqoi ?
Merci d'avance
Max
-- - -
lSteph
...et le cas échéant ôter la coche précision au format affiché (Outil Options Calcul)
lSteph
Max a émis l'idée suivante :
Bonjour tout le monde,
Dans une macro j'ai le code suivant:
Sub DeplacerValeur() Dim Valeur Valeur = [F65536].End(xlUp) [G1] = Valeur ' End Sub
Cela fonctionne, mais il arrive que la valeur dans G1 varie de quelques centimes par rapport à ce qu'il y a dans la dernière cellule remplie de la colonne F, surtout quand la valeur dépasse un million.
Qui peut m'expliquer pourqoi ?
Merci d'avance
Max
-- - -
...et le cas échéant ôter la coche
précision au format affiché (Outil Options Calcul)
lSteph
Max a émis l'idée suivante :
Bonjour tout le monde,
Dans une macro j'ai le code suivant:
Sub DeplacerValeur()
Dim Valeur
Valeur = [F65536].End(xlUp)
[G1] = Valeur '
End Sub
Cela fonctionne, mais il arrive que la valeur dans G1 varie de quelques
centimes par rapport à ce qu'il y a
dans la dernière cellule remplie de la colonne F, surtout quand la valeur
dépasse un million.
...et le cas échéant ôter la coche précision au format affiché (Outil Options Calcul)
lSteph
Max a émis l'idée suivante :
Bonjour tout le monde,
Dans une macro j'ai le code suivant:
Sub DeplacerValeur() Dim Valeur Valeur = [F65536].End(xlUp) [G1] = Valeur ' End Sub
Cela fonctionne, mais il arrive que la valeur dans G1 varie de quelques centimes par rapport à ce qu'il y a dans la dernière cellule remplie de la colonne F, surtout quand la valeur dépasse un million.
Qui peut m'expliquer pourqoi ?
Merci d'avance
Max
-- - -
Max
Bonjour Steph,
Tu as raison, dans ce module qui comprend plusieurs macros qui s'exécutent l'une après l'autre, j'avais déclaré la valeur tout à fait au début comme "Valeur as single". Avec "as double", il n'y a plus de différence. Merci de ton aide Cordialement, Max "lSteph" a écrit dans le message de news:
Bonjour, ? essaie avec
Dim valeur as double
Cordialement.
lSteph
Max avait soumis l'idée :
Bonjour tout le monde,
Dans une macro j'ai le code suivant:
Sub DeplacerValeur() Dim Valeur Valeur = [F65536].End(xlUp) [G1] = Valeur ' End Sub
Cela fonctionne, mais il arrive que la valeur dans G1 varie de quelques centimes par rapport à ce qu'il y a dans la dernière cellule remplie de la colonne F, surtout quand la valeur dépasse un million.
Qui peut m'expliquer pourqoi ?
Merci d'avance
Max
-- - -
Bonjour Steph,
Tu as raison, dans ce module qui comprend plusieurs macros qui s'exécutent
l'une après l'autre, j'avais déclaré la valeur tout à fait au début comme
"Valeur as single". Avec "as double", il n'y a plus de différence.
Merci de ton aide
Cordialement,
Max
"lSteph" <lecocosteph@frite.fr> a écrit dans le message de news:
mn.a3bf7d6a033b3aa7.62733@frite.fr...
Bonjour,
?
essaie avec
Dim valeur as double
Cordialement.
lSteph
Max avait soumis l'idée :
Bonjour tout le monde,
Dans une macro j'ai le code suivant:
Sub DeplacerValeur()
Dim Valeur
Valeur = [F65536].End(xlUp)
[G1] = Valeur '
End Sub
Cela fonctionne, mais il arrive que la valeur dans G1 varie de quelques
centimes par rapport à ce qu'il y a
dans la dernière cellule remplie de la colonne F, surtout quand la valeur
dépasse un million.
Tu as raison, dans ce module qui comprend plusieurs macros qui s'exécutent l'une après l'autre, j'avais déclaré la valeur tout à fait au début comme "Valeur as single". Avec "as double", il n'y a plus de différence. Merci de ton aide Cordialement, Max "lSteph" a écrit dans le message de news:
Bonjour, ? essaie avec
Dim valeur as double
Cordialement.
lSteph
Max avait soumis l'idée :
Bonjour tout le monde,
Dans une macro j'ai le code suivant:
Sub DeplacerValeur() Dim Valeur Valeur = [F65536].End(xlUp) [G1] = Valeur ' End Sub
Cela fonctionne, mais il arrive que la valeur dans G1 varie de quelques centimes par rapport à ce qu'il y a dans la dernière cellule remplie de la colonne F, surtout quand la valeur dépasse un million.
Qui peut m'expliquer pourqoi ?
Merci d'avance
Max
-- - -
Michel Gaboly
Bonsoir,
Ceci dit, dans ce contexte l'emploi d'une variable est superflu :
Sub DeplacerValeur() [G1] = [F65536].End(xlUp) End Sub
Bonjour Steph,
Tu as raison, dans ce module qui comprend plusieurs macros qui s'exéc utent l'une après l'autre, j'avais déclaré la valeur tout à fait au d ébut comme "Valeur as single". Avec "as double", il n'y a plus de différence. Merci de ton aide Cordialement, Max "lSteph" a écrit dans le message de news:
Bonjour, ? essaie avec
Dim valeur as double
Cordialement.
lSteph
Max avait soumis l'idée :
Bonjour tout le monde,
Dans une macro j'ai le code suivant:
Sub DeplacerValeur() Dim Valeur Valeur = [F65536].End(xlUp) [G1] = Valeur ' End Sub
Cela fonctionne, mais il arrive que la valeur dans G1 varie de quelqu es centimes par rapport à ce qu'il y a dans la dernière cellule remplie de la colonne F, surtout quand la valeur dépasse un million.
Qui peut m'expliquer pourqoi ?
Merci d'avance
Max --
- -
-- Cordialement,
Michel Gaboly www.gaboly.com
Bonsoir,
Ceci dit, dans ce contexte l'emploi d'une variable est superflu :
Sub DeplacerValeur()
[G1] = [F65536].End(xlUp)
End Sub
Bonjour Steph,
Tu as raison, dans ce module qui comprend plusieurs macros qui s'exéc utent
l'une après l'autre, j'avais déclaré la valeur tout à fait au d ébut comme
"Valeur as single". Avec "as double", il n'y a plus de différence.
Merci de ton aide
Cordialement,
Max
"lSteph" <lecocosteph@frite.fr> a écrit dans le message de news:
mn.a3bf7d6a033b3aa7.62733@frite.fr...
Bonjour,
?
essaie avec
Dim valeur as double
Cordialement.
lSteph
Max avait soumis l'idée :
Bonjour tout le monde,
Dans une macro j'ai le code suivant:
Sub DeplacerValeur()
Dim Valeur
Valeur = [F65536].End(xlUp)
[G1] = Valeur '
End Sub
Cela fonctionne, mais il arrive que la valeur dans G1 varie de quelqu es
centimes par rapport à ce qu'il y a
dans la dernière cellule remplie de la colonne F, surtout quand la valeur
dépasse un million.
Ceci dit, dans ce contexte l'emploi d'une variable est superflu :
Sub DeplacerValeur() [G1] = [F65536].End(xlUp) End Sub
Bonjour Steph,
Tu as raison, dans ce module qui comprend plusieurs macros qui s'exéc utent l'une après l'autre, j'avais déclaré la valeur tout à fait au d ébut comme "Valeur as single". Avec "as double", il n'y a plus de différence. Merci de ton aide Cordialement, Max "lSteph" a écrit dans le message de news:
Bonjour, ? essaie avec
Dim valeur as double
Cordialement.
lSteph
Max avait soumis l'idée :
Bonjour tout le monde,
Dans une macro j'ai le code suivant:
Sub DeplacerValeur() Dim Valeur Valeur = [F65536].End(xlUp) [G1] = Valeur ' End Sub
Cela fonctionne, mais il arrive que la valeur dans G1 varie de quelqu es centimes par rapport à ce qu'il y a dans la dernière cellule remplie de la colonne F, surtout quand la valeur dépasse un million.
Qui peut m'expliquer pourqoi ?
Merci d'avance
Max --
- -
-- Cordialement,
Michel Gaboly www.gaboly.com
Max
Bonjour Michel,
Dans ma procédure, je cherche des valeurs dans une vingtaine de feuilles dont la des valeurs sont tous dans la même colonne, mais sur des ligne différentes, ensuite et je les insère dans une seule feuille les unes sous les autres, avec une boucle FOR EACH qui fait la navette. Dans mon exemple, j'ai simplifié le code, parce que mon problème était la précision, mais avec la "Valeur as double", c'est résolu. Je te remercie tout de même, parce que ta proposition va me simplifier le code dans une autre procédure. Cordialement, Max
"Michel Gaboly" a écrit dans le message de news: e70E% Bonsoir,
Ceci dit, dans ce contexte l'emploi d'une variable est superflu :
Sub DeplacerValeur() [G1] = [F65536].End(xlUp) End Sub
Bonjour Steph,
Tu as raison, dans ce module qui comprend plusieurs macros qui s'exécutent l'une après l'autre, j'avais déclaré la valeur tout à fait au début comme "Valeur as single". Avec "as double", il n'y a plus de différence. Merci de ton aide Cordialement, Max "lSteph" a écrit dans le message de news:
Bonjour, ? essaie avec
Dim valeur as double
Cordialement.
lSteph
Max avait soumis l'idée :
Bonjour tout le monde,
Dans une macro j'ai le code suivant:
Sub DeplacerValeur() Dim Valeur Valeur = [F65536].End(xlUp) [G1] = Valeur ' End Sub
Cela fonctionne, mais il arrive que la valeur dans G1 varie de quelques centimes par rapport à ce qu'il y a dans la dernière cellule remplie de la colonne F, surtout quand la valeur dépasse un million.
Qui peut m'expliquer pourqoi ?
Merci d'avance
Max --
- -
-- Cordialement,
Michel Gaboly www.gaboly.com
Bonjour Michel,
Dans ma procédure, je cherche des valeurs dans une vingtaine de feuilles
dont la des valeurs sont tous dans la même colonne, mais sur des ligne
différentes, ensuite et je les insère dans une seule feuille les unes sous
les autres, avec une boucle FOR EACH qui fait la navette. Dans mon
exemple, j'ai simplifié le code, parce que mon problème était la précision,
mais avec la "Valeur as double", c'est résolu.
Je te remercie tout de même, parce que ta proposition va me simplifier le
code dans une autre procédure.
Cordialement,
Max
"Michel Gaboly" <michelgaboly@bluewin.ch> a écrit dans le message de news:
e70E%23ZF9GHA.3740@TK2MSFTNGP05.phx.gbl...
Bonsoir,
Ceci dit, dans ce contexte l'emploi d'une variable est superflu :
Sub DeplacerValeur()
[G1] = [F65536].End(xlUp)
End Sub
Bonjour Steph,
Tu as raison, dans ce module qui comprend plusieurs macros qui s'exécutent
l'une après l'autre, j'avais déclaré la valeur tout à fait au début comme
"Valeur as single". Avec "as double", il n'y a plus de différence.
Merci de ton aide
Cordialement,
Max
"lSteph" <lecocosteph@frite.fr> a écrit dans le message de news:
mn.a3bf7d6a033b3aa7.62733@frite.fr...
Bonjour,
?
essaie avec
Dim valeur as double
Cordialement.
lSteph
Max avait soumis l'idée :
Bonjour tout le monde,
Dans une macro j'ai le code suivant:
Sub DeplacerValeur()
Dim Valeur
Valeur = [F65536].End(xlUp)
[G1] = Valeur '
End Sub
Cela fonctionne, mais il arrive que la valeur dans G1 varie de quelques
centimes par rapport à ce qu'il y a
dans la dernière cellule remplie de la colonne F, surtout quand la
valeur dépasse un million.
Dans ma procédure, je cherche des valeurs dans une vingtaine de feuilles dont la des valeurs sont tous dans la même colonne, mais sur des ligne différentes, ensuite et je les insère dans une seule feuille les unes sous les autres, avec une boucle FOR EACH qui fait la navette. Dans mon exemple, j'ai simplifié le code, parce que mon problème était la précision, mais avec la "Valeur as double", c'est résolu. Je te remercie tout de même, parce que ta proposition va me simplifier le code dans une autre procédure. Cordialement, Max
"Michel Gaboly" a écrit dans le message de news: e70E% Bonsoir,
Ceci dit, dans ce contexte l'emploi d'une variable est superflu :
Sub DeplacerValeur() [G1] = [F65536].End(xlUp) End Sub
Bonjour Steph,
Tu as raison, dans ce module qui comprend plusieurs macros qui s'exécutent l'une après l'autre, j'avais déclaré la valeur tout à fait au début comme "Valeur as single". Avec "as double", il n'y a plus de différence. Merci de ton aide Cordialement, Max "lSteph" a écrit dans le message de news:
Bonjour, ? essaie avec
Dim valeur as double
Cordialement.
lSteph
Max avait soumis l'idée :
Bonjour tout le monde,
Dans une macro j'ai le code suivant:
Sub DeplacerValeur() Dim Valeur Valeur = [F65536].End(xlUp) [G1] = Valeur ' End Sub
Cela fonctionne, mais il arrive que la valeur dans G1 varie de quelques centimes par rapport à ce qu'il y a dans la dernière cellule remplie de la colonne F, surtout quand la valeur dépasse un million.
Qui peut m'expliquer pourqoi ?
Merci d'avance
Max --
- -
-- Cordialement,
Michel Gaboly www.gaboly.com
Michel Gaboly
De rien. Tant mieux si cela te permet une simplication -))
Bonjour Michel,
Dans ma procédure, je cherche des valeurs dans une vingtaine de feuil les dont la des valeurs sont tous dans la même colonne, mais sur des lign e différentes, ensuite et je les insère dans une seule feuille les un es sous les autres, avec une boucle FOR EACH qui fait la navette. Dans mon exemple, j'ai simplifié le code, parce que mon problème était la précision, mais avec la "Valeur as double", c'est résolu. Je te remercie tout de même, parce que ta proposition va me simplifie r le code dans une autre procédure. Cordialement, Max
"Michel Gaboly" a écrit dans le message de news: e70E% Bonsoir,
Ceci dit, dans ce contexte l'emploi d'une variable est superflu :
Sub DeplacerValeur() [G1] = [F65536].End(xlUp) End Sub
-- Cordialement,
Michel Gaboly www.gaboly.com
De rien. Tant mieux si cela te permet une simplication -))
Bonjour Michel,
Dans ma procédure, je cherche des valeurs dans une vingtaine de feuil les
dont la des valeurs sont tous dans la même colonne, mais sur des lign e
différentes, ensuite et je les insère dans une seule feuille les un es sous
les autres, avec une boucle FOR EACH qui fait la navette. Dans mon
exemple, j'ai simplifié le code, parce que mon problème était la précision,
mais avec la "Valeur as double", c'est résolu.
Je te remercie tout de même, parce que ta proposition va me simplifie r le
code dans une autre procédure.
Cordialement,
Max
"Michel Gaboly" <michelgaboly@bluewin.ch> a écrit dans le message de news:
e70E%23ZF9GHA.3740@TK2MSFTNGP05.phx.gbl...
Bonsoir,
Ceci dit, dans ce contexte l'emploi d'une variable est superflu :
Sub DeplacerValeur()
[G1] = [F65536].End(xlUp)
End Sub
De rien. Tant mieux si cela te permet une simplication -))
Bonjour Michel,
Dans ma procédure, je cherche des valeurs dans une vingtaine de feuil les dont la des valeurs sont tous dans la même colonne, mais sur des lign e différentes, ensuite et je les insère dans une seule feuille les un es sous les autres, avec une boucle FOR EACH qui fait la navette. Dans mon exemple, j'ai simplifié le code, parce que mon problème était la précision, mais avec la "Valeur as double", c'est résolu. Je te remercie tout de même, parce que ta proposition va me simplifie r le code dans une autre procédure. Cordialement, Max
"Michel Gaboly" a écrit dans le message de news: e70E% Bonsoir,
Ceci dit, dans ce contexte l'emploi d'une variable est superflu :
Sub DeplacerValeur() [G1] = [F65536].End(xlUp) End Sub
