OVH Cloud OVH Cloud

Insérer formule dans macro

11 réponses
Avatar
Caroline L.
J'ai une macro qui fait plusieurs opérations, en résumé, elle imprime la
page 1 et ensuite supprimer le contenu de plusieurs champs. Je voudrais
savoir si c'est possible d'insérer dans la macro 2 vérifications de
résultats (au cas où il y aurait une erreur de calcul). Les formules
seraient les suivantes : K24+K26 doit être égal à N23. et la suivante :
K42+K44 doit être égal à N41.
Si l'une ou l'autre des additions n'égal pas le bon résultat, la macro
s'arrête (Exit) avec un message d'erreur du genre "Attention, erreur de
calcul"

Est-ce trop compliqué ?

merci

10 réponses

1 2
Avatar
Joel
bonsoir Croline,

If Range("K24").Value + Range("K24").Value = Range("N23").Value Or _
Range("K42").Value + Range("K44").Value = Range("N41").Value Then
MsgBox "Saisie non conforme"
Exit Sub
End If
'Suite macro


--

Bien cordialement,

Joël GARBE
www.joelgarbe.fr
"Caroline L." a écrit dans le message de news:
5Fi7d.2627$

J'ai une macro qui fait plusieurs opérations, en résumé, elle imprime la
page 1 et ensuite supprimer le contenu de plusieurs champs. Je voudrais
savoir si c'est possible d'insérer dans la macro 2 vérifications de
résultats (au cas où il y aurait une erreur de calcul). Les formules
seraient les suivantes : K24+K26 doit être égal à N23. et la suivante :
K42+K44 doit être égal à N41.
Si l'une ou l'autre des additions n'égal pas le bon résultat, la macro
s'arrête (Exit) avec un message d'erreur du genre "Attention, erreur de
calcul"

Est-ce trop compliqué ?

merci




Avatar
Caroline L.
J'insère un BONJOUR avant ma question !
:o)))

"Caroline L." a écrit dans le message de news:
5Fi7d.2627$

J'ai une macro qui fait plusieurs opérations, en résumé, elle imprime la
page 1 et ensuite supprimer le contenu de plusieurs champs. Je voudrais
savoir si c'est possible d'insérer dans la macro 2 vérifications de
résultats (au cas où il y aurait une erreur de calcul). Les formules
seraient les suivantes : K24+K26 doit être égal à N23. et la suivante :
K42+K44 doit être égal à N41.
Si l'une ou l'autre des additions n'égal pas le bon résultat, la macro
s'arrête (Exit) avec un message d'erreur du genre "Attention, erreur de
calcul"

Est-ce trop compliqué ?

merci




Avatar
sabatier
tu l as échappé belle, caroline
jps

"Caroline L." a écrit dans le message de
news:APi7d.2631$
J'insère un BONJOUR avant ma question !
:o)))

"Caroline L." a écrit dans le message de news:
5Fi7d.2627$

J'ai une macro qui fait plusieurs opérations, en résumé, elle imprime la
page 1 et ensuite supprimer le contenu de plusieurs champs. Je voudrais
savoir si c'est possible d'insérer dans la macro 2 vérifications de
résultats (au cas où il y aurait une erreur de calcul). Les formules
seraient les suivantes : K24+K26 doit être égal à N23. et la suivante :
K42+K44 doit être égal à N41.
Si l'une ou l'autre des additions n'égal pas le bon résultat, la macro
s'arrête (Exit) avec un message d'erreur du genre "Attention, erreur de
calcul"

Est-ce trop compliqué ?

merci








Avatar
Caroline L.
Allo Joel,

j'ai fait le test. Dans la macro, le "Or" ne devrait pas être plutôt un
"And" ?
En ce moment, le message "Saisie non conforme" apparaît même si les calculs
sont bons alors que je désire que le message apparaisse seulement s'il y a
l'une ou l'autre ou les 2 conditions qui ne correspondent pas.
Aussi, j'ai réalisé qu'il se peut que dans K24, K26, K42, K44 le contenu
soit vide (il serait alors considéré comme zéro).

salutations


"Joel" a écrit dans le message de news:
415db810$0$17219$
bonsoir Croline,

If Range("K24").Value + Range("K24").Value = Range("N23").Value Or _
Range("K42").Value + Range("K44").Value = Range("N41").Value Then
MsgBox "Saisie non conforme"
Exit Sub
End If
'Suite macro


--

Bien cordialement,

Joël GARBE
www.joelgarbe.fr
"Caroline L." a écrit dans le message de news:
5Fi7d.2627$

J'ai une macro qui fait plusieurs opérations, en résumé, elle imprime la
page 1 et ensuite supprimer le contenu de plusieurs champs. Je voudrais
savoir si c'est possible d'insérer dans la macro 2 vérifications de
résultats (au cas où il y aurait une erreur de calcul). Les formules
seraient les suivantes : K24+K26 doit être égal à N23. et la suivante :
K42+K44 doit être égal à N41.
Si l'une ou l'autre des additions n'égal pas le bon résultat, la macro
s'arrête (Exit) avec un message d'erreur du genre "Attention, erreur de
calcul"

Est-ce trop compliqué ?

merci








Avatar
Joel
re ;-)

oups !!

en fait, sauf erreur (nouvelle) de ma part, il fallaittransformer = en <>

Sorry

--

Bien cordialement,

Joël GARBE
www.joelgarbe.fr
"Caroline L." a écrit dans le message de news:
maj7d.2637$
Allo Joel,

j'ai fait le test. Dans la macro, le "Or" ne devrait pas être plutôt un
"And" ?
En ce moment, le message "Saisie non conforme" apparaît même si les
calculs
sont bons alors que je désire que le message apparaisse seulement s'il y a
l'une ou l'autre ou les 2 conditions qui ne correspondent pas.
Aussi, j'ai réalisé qu'il se peut que dans K24, K26, K42, K44 le contenu
soit vide (il serait alors considéré comme zéro).

salutations


"Joel" a écrit dans le message de news:
415db810$0$17219$
bonsoir Croline,

If Range("K24").Value + Range("K24").Value = Range("N23").Value Or _
Range("K42").Value + Range("K44").Value = Range("N41").Value Then
MsgBox "Saisie non conforme"
Exit Sub
End If
'Suite macro


--

Bien cordialement,

Joël GARBE
www.joelgarbe.fr
"Caroline L." a écrit dans le message de news:
5Fi7d.2627$

J'ai une macro qui fait plusieurs opérations, en résumé, elle imprime
la
page 1 et ensuite supprimer le contenu de plusieurs champs. Je
voudrais
savoir si c'est possible d'insérer dans la macro 2 vérifications de
résultats (au cas où il y aurait une erreur de calcul). Les formules
seraient les suivantes : K24+K26 doit être égal à N23. et la suivante :
K42+K44 doit être égal à N41.
Si l'une ou l'autre des additions n'égal pas le bon résultat, la macro
s'arrête (Exit) avec un message d'erreur du genre "Attention, erreur de
calcul"

Est-ce trop compliqué ?

merci












Avatar
sabatier
et remplacer le "Or" par "And" qui est aussi très acceptable....pas comme le
fauconnier....
jps

"Joel" a écrit dans le message de
news:415dc1cb$0$3026$
re ;-)

oups !!

en fait, sauf erreur (nouvelle) de ma part, il fallaittransformer = en <>

Sorry

--

Bien cordialement,

Joël GARBE
www.joelgarbe.fr
"Caroline L." a écrit dans le message de news:
maj7d.2637$
Allo Joel,

j'ai fait le test. Dans la macro, le "Or" ne devrait pas être plutôt un
"And" ?
En ce moment, le message "Saisie non conforme" apparaît même si les
calculs
sont bons alors que je désire que le message apparaisse seulement s'il y
a


l'une ou l'autre ou les 2 conditions qui ne correspondent pas.
Aussi, j'ai réalisé qu'il se peut que dans K24, K26, K42, K44 le contenu
soit vide (il serait alors considéré comme zéro).

salutations


"Joel" a écrit dans le message de news:
415db810$0$17219$
bonsoir Croline,

If Range("K24").Value + Range("K24").Value = Range("N23").Value Or _
Range("K42").Value + Range("K44").Value = Range("N41").Value Then
MsgBox "Saisie non conforme"
Exit Sub
End If
'Suite macro


--

Bien cordialement,

Joël GARBE
www.joelgarbe.fr
"Caroline L." a écrit dans le message de news:
5Fi7d.2627$

J'ai une macro qui fait plusieurs opérations, en résumé, elle imprime
la
page 1 et ensuite supprimer le contenu de plusieurs champs. Je
voudrais
savoir si c'est possible d'insérer dans la macro 2 vérifications de
résultats (au cas où il y aurait une erreur de calcul). Les formules
seraient les suivantes : K24+K26 doit être égal à N23. et la suivante
:




K42+K44 doit être égal à N41.
Si l'une ou l'autre des additions n'égal pas le bon résultat, la
macro




s'arrête (Exit) avec un message d'erreur du genre "Attention, erreur
de




calcul"

Est-ce trop compliqué ?

merci
















Avatar
Caroline L.
re-re-re-bonjour ! ! !

Super ! maintenant ça fonctionne très bien. Merci. :-)
J'ai une autre question en passant. Est-ce que tu connais les modules des
macros complémentaires ?
Parce que j'ai créé un fichier modèle (extension XLT) et je voudrais ajouter
2 boutons concernant l'enregistrement (le 1er : créer un nouvel
enregistrement et le 2e : mettre à jour l'enregistrement).

A+
Caroline

"Joel" a écrit dans le message de news:
415dc1cb$0$3026$
re ;-)

oups !!

en fait, sauf erreur (nouvelle) de ma part, il fallaittransformer = en <>

Sorry

--

Bien cordialement,

Joël GARBE
www.joelgarbe.fr
"Caroline L." a écrit dans le message de news:
maj7d.2637$
Allo Joel,

j'ai fait le test. Dans la macro, le "Or" ne devrait pas être plutôt un
"And" ?
En ce moment, le message "Saisie non conforme" apparaît même si les
calculs
sont bons alors que je désire que le message apparaisse seulement s'il y
a


l'une ou l'autre ou les 2 conditions qui ne correspondent pas.
Aussi, j'ai réalisé qu'il se peut que dans K24, K26, K42, K44 le contenu
soit vide (il serait alors considéré comme zéro).

salutations


"Joel" a écrit dans le message de news:
415db810$0$17219$
bonsoir Croline,

If Range("K24").Value + Range("K24").Value = Range("N23").Value Or _
Range("K42").Value + Range("K44").Value = Range("N41").Value Then
MsgBox "Saisie non conforme"
Exit Sub
End If
'Suite macro


--

Bien cordialement,

Joël GARBE
www.joelgarbe.fr
"Caroline L." a écrit dans le message de news:
5Fi7d.2627$

J'ai une macro qui fait plusieurs opérations, en résumé, elle imprime
la
page 1 et ensuite supprimer le contenu de plusieurs champs. Je
voudrais
savoir si c'est possible d'insérer dans la macro 2 vérifications de
résultats (au cas où il y aurait une erreur de calcul). Les formules
seraient les suivantes : K24+K26 doit être égal à N23. et la suivante
:




K42+K44 doit être égal à N41.
Si l'une ou l'autre des additions n'égal pas le bon résultat, la
macro




s'arrête (Exit) avec un message d'erreur du genre "Attention, erreur
de




calcul"

Est-ce trop compliqué ?

merci
















Avatar
Joel
Je poserai la question à mister Bool, savoir ce qu'il en pense !

a<>b ou c<>d

Non(a=b et c=d)

???

Mais il commence à se faire tard pour ce genre de considération !!!

Bon week-end ;-)
--

Bien cordialement,

Joël GARBE
www.joelgarbe.fr
"sabatier" a écrit dans le message
de news: %23UOo$i$
et remplacer le "Or" par "And" qui est aussi très acceptable....pas comme
le
fauconnier....
jps

"Joel" a écrit dans le message de
news:415dc1cb$0$3026$
re ;-)

oups !!

en fait, sauf erreur (nouvelle) de ma part, il fallaittransformer = en <>

Sorry

--

Bien cordialement,

Joël GARBE
www.joelgarbe.fr
"Caroline L." a écrit dans le message de news:
maj7d.2637$
Allo Joel,

j'ai fait le test. Dans la macro, le "Or" ne devrait pas être plutôt
un
"And" ?
En ce moment, le message "Saisie non conforme" apparaît même si les
calculs
sont bons alors que je désire que le message apparaisse seulement s'il
y
a


l'une ou l'autre ou les 2 conditions qui ne correspondent pas.
Aussi, j'ai réalisé qu'il se peut que dans K24, K26, K42, K44 le
contenu
soit vide (il serait alors considéré comme zéro).

salutations


"Joel" a écrit dans le message de news:
415db810$0$17219$
bonsoir Croline,

If Range("K24").Value + Range("K24").Value = Range("N23").Value Or _
Range("K42").Value + Range("K44").Value = Range("N41").Value Then
MsgBox "Saisie non conforme"
Exit Sub
End If
'Suite macro


--

Bien cordialement,

Joël GARBE
www.joelgarbe.fr
"Caroline L." a écrit dans le message de news:
5Fi7d.2627$

J'ai une macro qui fait plusieurs opérations, en résumé, elle
imprime
la
page 1 et ensuite supprimer le contenu de plusieurs champs. Je
voudrais
savoir si c'est possible d'insérer dans la macro 2 vérifications de
résultats (au cas où il y aurait une erreur de calcul). Les
formules
seraient les suivantes : K24+K26 doit être égal à N23. et la
suivante
:




K42+K44 doit être égal à N41.
Si l'une ou l'autre des additions n'égal pas le bon résultat, la
macro




s'arrête (Exit) avec un message d'erreur du genre "Attention, erreur
de




calcul"

Est-ce trop compliqué ?

merci




















Avatar
Caroline L.
merci pour ton observation... :o)

"sabatier" a écrit dans le message
de news: #UOo$i$
et remplacer le "Or" par "And" qui est aussi très acceptable....pas comme
le

fauconnier....
jps

"Joel" a écrit dans le message de
news:415dc1cb$0$3026$
re ;-)

oups !!

en fait, sauf erreur (nouvelle) de ma part, il fallaittransformer = en
<>



Sorry

--

Bien cordialement,

Joël GARBE
www.joelgarbe.fr
"Caroline L." a écrit dans le message de news:
maj7d.2637$
Allo Joel,

j'ai fait le test. Dans la macro, le "Or" ne devrait pas être plutôt
un



"And" ?
En ce moment, le message "Saisie non conforme" apparaît même si les
calculs
sont bons alors que je désire que le message apparaisse seulement s'il
y



a
l'une ou l'autre ou les 2 conditions qui ne correspondent pas.
Aussi, j'ai réalisé qu'il se peut que dans K24, K26, K42, K44 le
contenu



soit vide (il serait alors considéré comme zéro).

salutations


"Joel" a écrit dans le message de news:
415db810$0$17219$
bonsoir Croline,

If Range("K24").Value + Range("K24").Value = Range("N23").Value Or
_




Range("K42").Value + Range("K44").Value = Range("N41").Value Then
MsgBox "Saisie non conforme"
Exit Sub
End If
'Suite macro


--

Bien cordialement,

Joël GARBE
www.joelgarbe.fr
"Caroline L." a écrit dans le message de
news:




5Fi7d.2627$

J'ai une macro qui fait plusieurs opérations, en résumé, elle
imprime





la
page 1 et ensuite supprimer le contenu de plusieurs champs. Je
voudrais
savoir si c'est possible d'insérer dans la macro 2 vérifications de
résultats (au cas où il y aurait une erreur de calcul). Les
formules





seraient les suivantes : K24+K26 doit être égal à N23. et la
suivante





:
K42+K44 doit être égal à N41.
Si l'une ou l'autre des additions n'égal pas le bon résultat, la
macro




s'arrête (Exit) avec un message d'erreur du genre "Attention,
erreur





de
calcul"

Est-ce trop compliqué ?

merci




















Avatar
Joel
Re;-) re;-) Re ;-)

Je ne comprends pas très bien cette notion de mettre à jour
l'enregistrement, où devraient être situés les "boutons", et le rapport
entre macro complémentaire et les modèles xlt ?

Il va falloir préciser d'avantage, alors peut-être que demain matin, j'y
"voirai" plus clair.

Bonne nuit...

--

Bien cordialement,

Joël GARBE
www.joelgarbe.fr
"Caroline L." a écrit dans le message de news:
vJj7d.2644$
re-re-re-bonjour ! ! !

Super ! maintenant ça fonctionne très bien. Merci. :-)
J'ai une autre question en passant. Est-ce que tu connais les modules des
macros complémentaires ?
Parce que j'ai créé un fichier modèle (extension XLT) et je voudrais
ajouter
2 boutons concernant l'enregistrement (le 1er : créer un nouvel
enregistrement et le 2e : mettre à jour l'enregistrement).

A+
Caroline

"Joel" a écrit dans le message de news:
415dc1cb$0$3026$
re ;-)

oups !!

en fait, sauf erreur (nouvelle) de ma part, il fallaittransformer = en <>

Sorry

--

Bien cordialement,

Joël GARBE
www.joelgarbe.fr
"Caroline L." a écrit dans le message de news:
maj7d.2637$
Allo Joel,

j'ai fait le test. Dans la macro, le "Or" ne devrait pas être plutôt
un
"And" ?
En ce moment, le message "Saisie non conforme" apparaît même si les
calculs
sont bons alors que je désire que le message apparaisse seulement s'il
y
a


l'une ou l'autre ou les 2 conditions qui ne correspondent pas.
Aussi, j'ai réalisé qu'il se peut que dans K24, K26, K42, K44 le
contenu
soit vide (il serait alors considéré comme zéro).

salutations


"Joel" a écrit dans le message de news:
415db810$0$17219$
bonsoir Croline,

If Range("K24").Value + Range("K24").Value = Range("N23").Value Or _
Range("K42").Value + Range("K44").Value = Range("N41").Value Then
MsgBox "Saisie non conforme"
Exit Sub
End If
'Suite macro


--

Bien cordialement,

Joël GARBE
www.joelgarbe.fr
"Caroline L." a écrit dans le message de news:
5Fi7d.2627$

J'ai une macro qui fait plusieurs opérations, en résumé, elle
imprime
la
page 1 et ensuite supprimer le contenu de plusieurs champs. Je
voudrais
savoir si c'est possible d'insérer dans la macro 2 vérifications de
résultats (au cas où il y aurait une erreur de calcul). Les
formules
seraient les suivantes : K24+K26 doit être égal à N23. et la
suivante
:




K42+K44 doit être égal à N41.
Si l'une ou l'autre des additions n'égal pas le bon résultat, la
macro




s'arrête (Exit) avec un message d'erreur du genre "Attention, erreur
de




calcul"

Est-ce trop compliqué ?

merci




















1 2