Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel en pleine m...e et j'ai grandement besoin d'aide

en pleine m...e et j'ai grandement besoin d'aide

7 réponses
Avatar
Rémi
bonjour tout le monde,
je tente depuis déjà quelques temps d'améliorer une feuille excel par du
code vba, mon problème est que je suis imprimeur et non pas programmeur,
aussi même si je suis logique je ne connais pour ainsi dire pas grand chose
à toutes les méandres de la programmation.
je me rends compte que ma demande est très certainement exagérée, mais
existe-t'il une personne suffisament charitable pour m'aider dans
l'accomplissement de cette tache, ou bien pour m'aiguiller vers un site de
préférence en français sur la programmation vba (mais un site pour les
archi-nuls)
d'avance, je vous remercie de votre aide
Rémi
Signaler un problème avec ce contenu

7 réponses

Supprimer
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
Avatar
Rémi
bonjour "Jacquouille"
en fait j'ai plusieurs problèmes, dans un premier temps j'aimerais arranger
ce prémice de code afin qu'il fonctionne.
je me sers d'un formulaire pour faire mes dossiers, dans lequel je dois
indiquer un format d'achat de papier et un format de coupe, mon nombre de
coupe doit obligatoirement être un entier positif (700mm x 1000mm donne par
exemple 350mm x 500mm donc 4 coupes) et je voudrais que ce calcul généré par
mon formulaire soit valider puis transmis à ma feuille de calcul, d'où le
code ci-dessous.

Private Sub coupé_en_1_??????() (doit-on mettre Change ou autre chose??)
Dim coupé_en_1
coupé_en_1 = Sheets("dossier de fabrication").Range("M18") / Sheets("dossier
de fabrication").Range("M16") * Sheets("dossier de
fabrication").Range("O18") / Sheets("dossier de fabrication").Range("O16")
If coupé_en_1 <> Int(coupé_en_1) Then
MsgBox "veuillez saisir un nombre de coupe entier"
End If
End Sub

Si tu as 5 minutes pour te pencher sur mon cas, je te remercie d'avance
Rémi


"Jacquouille" a écrit dans le message de
news: %
Bonjour Rémi
Ta demande est très vaste.
Si tu expliquais, en grandes lignes, ce que tu désires faire.
Alors, le forum te donnera 1001 idées, plus les sites cités.
Bonne chance
--
Bien amicalmement,
Vivement conseillés:
http://www.excelabo.net
http://jacxl.free.fr/mpfe/trombino.html
http://dj.joss.free.fr/netiquet.htm
http://frederic.sigonneau.free.fr/

Jacquouille.

"Rémi" a écrit dans le message de news:

bonjour tout le monde,
je tente depuis déjà quelques temps d'améliorer une feuille excel par du
code vba, mon problème est que je suis imprimeur et non pas programmeur,
aussi même si je suis logique je ne connais pour ainsi dire pas grand
chose à toutes les méandres de la programmation.
je me rends compte que ma demande est très certainement exagérée, mais
existe-t'il une personne suffisament charitable pour m'aider dans
l'accomplissement de cette tache, ou bien pour m'aiguiller vers un site
de préférence en français sur la programmation vba (mais un site pour les
archi-nuls)
d'avance, je vous remercie de votre aide
Rémi







Avatar
Philippe Noss
Bonjour

Quelques adresses
http://cherbe.free.fr/
http://intendant.free.fr/vba.htm
http://www.excelabo.net/xl/pap-vba.php
http://www.excelabo.net/xl/debuter.php

Cd de Formation de Gaetan Mourmant
http://www.polykromy.com/html/poly_main.html
3 conseils
Commencer par faire des choses très simple, et ne pas négliger
l'enregistrement "Macro", ni l'aide Excel ...

Bon courage...

Philippe NOSS
http://nossphil.perso.cegetel.net/exoutils.html
Avatar
Jacquouille
Bonjour Rémi
Ta demande est très vaste.
Si tu expliquais, en grandes lignes, ce que tu désires faire.
Alors, le forum te donnera 1001 idées, plus les sites cités.
Bonne chance
--
Bien amicalmement,
Vivement conseillés:
http://www.excelabo.net
http://jacxl.free.fr/mpfe/trombino.html
http://dj.joss.free.fr/netiquet.htm
http://frederic.sigonneau.free.fr/

Jacquouille.

"Rémi" a écrit dans le message de news:

bonjour tout le monde,
je tente depuis déjà quelques temps d'améliorer une feuille excel par du
code vba, mon problème est que je suis imprimeur et non pas programmeur,
aussi même si je suis logique je ne connais pour ainsi dire pas grand
chose à toutes les méandres de la programmation.
je me rends compte que ma demande est très certainement exagérée, mais
existe-t'il une personne suffisament charitable pour m'aider dans
l'accomplissement de cette tache, ou bien pour m'aiguiller vers un site de
préférence en français sur la programmation vba (mais un site pour les
archi-nuls)
d'avance, je vous remercie de votre aide
Rémi



Avatar
Rémi
Philippe,
un grand merci pour tes conseils et le site "cherbe" sur lequel j'ai déjà
trouvé un élément que je cherchais depuis longtemps
merci encore
Rémi

"Philippe Noss" a écrit dans le message de news:

Bonjour

Quelques adresses
http://cherbe.free.fr/
http://intendant.free.fr/vba.htm
http://www.excelabo.net/xl/pap-vba.php
http://www.excelabo.net/xl/debuter.php

Cd de Formation de Gaetan Mourmant
http://www.polykromy.com/html/poly_main.html
3 conseils
Commencer par faire des choses très simple, et ne pas négliger
l'enregistrement "Macro", ni l'aide Excel ...

Bon courage...

Philippe NOSS
http://nossphil.perso.cegetel.net/exoutils.html
Avatar
Jacquouille
Bonjour
Techniquement, cela me semble bien écrit. Si cela fonctionne et que c'est
bien cela que tu veux...
Perso, je constate que tu ne travailles que sur des cel de la même feuille.
Si ton calcul est appelé depuis cette feuille, il n'est pas nécessaire de
lui donner chaque fois tout le trajet (chemin).
coupé_en_1= M18/M16*O18/O16
Mais, quand tu écris 700mm x 1000mm , tu parles d'un format , pas d'un
calcul?
Alors, le * entre les cel M16 et O18 est-il juste?
Encore un truc que AV m'a appris : [A1]=5 veut dire que la valeur de la cel
A1 est de 5 ( en lieu et place de cel.value.).
Tes valeurs entrées en cel M18, M16, O18 et O16, sont des var entrées suite
à un inputbox?
--
Bien amicalmement,
Vivement conseillés:
http://www.excelabo.net
http://jacxl.free.fr/mpfe/trombino.html
http://dj.joss.free.fr/netiquet.htm
http://frederic.sigonneau.free.fr/

Jacquouille.

"Rémi" a écrit dans le message de news:

bonjour "Jacquouille"
en fait j'ai plusieurs problèmes, dans un premier temps j'aimerais
arranger ce prémice de code afin qu'il fonctionne.
je me sers d'un formulaire pour faire mes dossiers, dans lequel je dois
indiquer un format d'achat de papier et un format de coupe, mon nombre de
coupe doit obligatoirement être un entier positif (700mm x 1000mm donne
par exemple 350mm x 500mm donc 4 coupes) et je voudrais que ce calcul
généré par mon formulaire soit valider puis transmis à ma feuille de
calcul, d'où le code ci-dessous.

Private Sub coupé_en_1_??????() (doit-on mettre Change ou autre chose??)
Dim coupé_en_1
coupé_en_1 = Sheets("dossier de fabrication").Range("M18") /
Sheets("dossier de fabrication").Range("M16") * Sheets("dossier de
fabrication").Range("O18") / Sheets("dossier de fabrication").Range("O16")
If coupé_en_1 <> Int(coupé_en_1) Then
MsgBox "veuillez saisir un nombre de coupe entier"
End If
End Sub

Si tu as 5 minutes pour te pencher sur mon cas, je te remercie d'avance
Rémi


"Jacquouille" a écrit dans le message de
news: %
Bonjour Rémi
Ta demande est très vaste.
Si tu expliquais, en grandes lignes, ce que tu désires faire.
Alors, le forum te donnera 1001 idées, plus les sites cités.
Bonne chance
--
Bien amicalmement,
Vivement conseillés:
http://www.excelabo.net
http://jacxl.free.fr/mpfe/trombino.html
http://dj.joss.free.fr/netiquet.htm
http://frederic.sigonneau.free.fr/

Jacquouille.

"Rémi" a écrit dans le message de news:

bonjour tout le monde,
je tente depuis déjà quelques temps d'améliorer une feuille excel par du
code vba, mon problème est que je suis imprimeur et non pas programmeur,
aussi même si je suis logique je ne connais pour ainsi dire pas grand
chose à toutes les méandres de la programmation.
je me rends compte que ma demande est très certainement exagérée, mais
existe-t'il une personne suffisament charitable pour m'aider dans
l'accomplissement de cette tache, ou bien pour m'aiguiller vers un site
de préférence en français sur la programmation vba (mais un site pour
les archi-nuls)
d'avance, je vous remercie de votre aide
Rémi











Avatar
Rémi
Jacquouille,
en effet 700 x 1000 est un format (700 vient de M18 et 1000 de O18)
si je dis que mon format de coupe doit être 350 x 500 (respectivement M18 et
O18) le résultat doit être 4, mais à supposer que je dise 210 x 297 le
résultat devient 11,2233...
or, techniquement je ne peux pas couper en 11,2233 (les 2,2233... sont de la
chute)
en effet encore les cellules M18, M16, O18 et O16 sont des variables entrées
suite à une saisie dans un input box
mon petit problème est que je voudrais que mon résultat (après validation
s'il n'est pas entier) soit transmit à la cellule P18 et aussi apparaisse
dans mon formulaire dans inputbox coupé_en_1
et là, je ne sais pas comment m'y prendre. dois-je dire ''Sheets("dossier de
fabrication").Range("P18").Value = coupé_en_1.Value'' ??????
de plus, de quelle nature dois être mon Sub, Change, Calculate....
je pêche
merci d'avance
Rémi

"Jacquouille" a écrit dans le message de
news: %
Bonjour
Techniquement, cela me semble bien écrit. Si cela fonctionne et que c'est
bien cela que tu veux...
Perso, je constate que tu ne travailles que sur des cel de la même
feuille.
Si ton calcul est appelé depuis cette feuille, il n'est pas nécessaire de
lui donner chaque fois tout le trajet (chemin).
coupé_en_1= M18/M16*O18/O16
Mais, quand tu écris 700mm x 1000mm , tu parles d'un format , pas d'un
calcul?
Alors, le * entre les cel M16 et O18 est-il juste?
Encore un truc que AV m'a appris : [A1]=5 veut dire que la valeur de la
cel A1 est de 5 ( en lieu et place de cel.value.).
Tes valeurs entrées en cel M18, M16, O18 et O16, sont des var entrées
suite à un inputbox?
--
Bien amicalmement,
Vivement conseillés:
http://www.excelabo.net
http://jacxl.free.fr/mpfe/trombino.html
http://dj.joss.free.fr/netiquet.htm
http://frederic.sigonneau.free.fr/

Jacquouille.

"Rémi" a écrit dans le message de news:

bonjour "Jacquouille"
en fait j'ai plusieurs problèmes, dans un premier temps j'aimerais
arranger ce prémice de code afin qu'il fonctionne.
je me sers d'un formulaire pour faire mes dossiers, dans lequel je dois
indiquer un format d'achat de papier et un format de coupe, mon nombre de
coupe doit obligatoirement être un entier positif (700mm x 1000mm donne
par exemple 350mm x 500mm donc 4 coupes) et je voudrais que ce calcul
généré par mon formulaire soit valider puis transmis à ma feuille de
calcul, d'où le code ci-dessous.

Private Sub coupé_en_1_??????() (doit-on mettre Change ou autre chose??)
Dim coupé_en_1
coupé_en_1 = Sheets("dossier de fabrication").Range("M18") /
Sheets("dossier de fabrication").Range("M16") * Sheets("dossier de
fabrication").Range("O18") / Sheets("dossier de
fabrication").Range("O16")
If coupé_en_1 <> Int(coupé_en_1) Then
MsgBox "veuillez saisir un nombre de coupe entier"
End If
End Sub

Si tu as 5 minutes pour te pencher sur mon cas, je te remercie d'avance
Rémi


"Jacquouille" a écrit dans le message de
news: %
Bonjour Rémi
Ta demande est très vaste.
Si tu expliquais, en grandes lignes, ce que tu désires faire.
Alors, le forum te donnera 1001 idées, plus les sites cités.
Bonne chance
--
Bien amicalmement,
Vivement conseillés:
http://www.excelabo.net
http://jacxl.free.fr/mpfe/trombino.html
http://dj.joss.free.fr/netiquet.htm
http://frederic.sigonneau.free.fr/

Jacquouille.

"Rémi" a écrit dans le message de news:

bonjour tout le monde,
je tente depuis déjà quelques temps d'améliorer une feuille excel par
du code vba, mon problème est que je suis imprimeur et non pas
programmeur, aussi même si je suis logique je ne connais pour ainsi
dire pas grand chose à toutes les méandres de la programmation.
je me rends compte que ma demande est très certainement exagérée, mais
existe-t'il une personne suffisament charitable pour m'aider dans
l'accomplissement de cette tache, ou bien pour m'aiguiller vers un site
de préférence en français sur la programmation vba (mais un site pour
les archi-nuls)
d'avance, je vous remercie de votre aide
Rémi















Avatar
Jacquouille
Re bonjour
Essaie [P19]=coupé_en_1
Pour les Sub, il s'agit de sub tilités que je méprise du haut de mon
ignorance. Je ne les mets que pour les auo open. Donc, pour suivre la
morale d'AV, "il vaut mieux ne rien mettre, plutôt que de mettre des
conneries.
Sub couper_en_rondelles() devrait faire l'affaire.
Bonne chance
--
Bien amicalmement,
Vivement conseillés:
http://www.excelabo.net
http://jacxl.free.fr/mpfe/trombino.html
http://dj.joss.free.fr/netiquet.htm
http://frederic.sigonneau.free.fr/

Jacquouille.

"Rémi" a écrit dans le message de news:

Jacquouille,
en effet 700 x 1000 est un format (700 vient de M18 et 1000 de O18)
si je dis que mon format de coupe doit être 350 x 500 (respectivement M18
et O18) le résultat doit être 4, mais à supposer que je dise 210 x 297 le
résultat devient 11,2233...
or, techniquement je ne peux pas couper en 11,2233 (les 2,2233... sont de
la chute)
en effet encore les cellules M18, M16, O18 et O16 sont des variables
entrées suite à une saisie dans un input box
mon petit problème est que je voudrais que mon résultat (après validation
s'il n'est pas entier) soit transmit à la cellule P18 et aussi apparaisse
dans mon formulaire dans inputbox coupé_en_1
et là, je ne sais pas comment m'y prendre. dois-je dire ''Sheets("dossier
de fabrication").Range("P18").Value = coupé_en_1.Value'' ??????
de plus, de quelle nature dois être mon Sub, Change, Calculate....
je pêche
merci d'avance
Rémi

"Jacquouille" a écrit dans le message de
news: %
Bonjour
Techniquement, cela me semble bien écrit. Si cela fonctionne et que
c'est bien cela que tu veux...
Perso, je constate que tu ne travailles que sur des cel de la même
feuille.
Si ton calcul est appelé depuis cette feuille, il n'est pas nécessaire de
lui donner chaque fois tout le trajet (chemin).
coupé_en_1= M18/M16*O18/O16
Mais, quand tu écris 700mm x 1000mm , tu parles d'un format , pas d'un
calcul?
Alors, le * entre les cel M16 et O18 est-il juste?
Encore un truc que AV m'a appris : [A1]=5 veut dire que la valeur de la
cel A1 est de 5 ( en lieu et place de cel.value.).
Tes valeurs entrées en cel M18, M16, O18 et O16, sont des var entrées
suite à un inputbox?
--
Bien amicalmement,
Vivement conseillés:
http://www.excelabo.net
http://jacxl.free.fr/mpfe/trombino.html
http://dj.joss.free.fr/netiquet.htm
http://frederic.sigonneau.free.fr/

Jacquouille.

"Rémi" a écrit dans le message de news:

bonjour "Jacquouille"
en fait j'ai plusieurs problèmes, dans un premier temps j'aimerais
arranger ce prémice de code afin qu'il fonctionne.
je me sers d'un formulaire pour faire mes dossiers, dans lequel je dois
indiquer un format d'achat de papier et un format de coupe, mon nombre
de coupe doit obligatoirement être un entier positif (700mm x 1000mm
donne par exemple 350mm x 500mm donc 4 coupes) et je voudrais que ce
calcul généré par mon formulaire soit valider puis transmis à ma feuille
de calcul, d'où le code ci-dessous.

Private Sub coupé_en_1_??????() (doit-on mettre Change ou autre chose??)
Dim coupé_en_1
coupé_en_1 = Sheets("dossier de fabrication").Range("M18") /
Sheets("dossier de fabrication").Range("M16") * Sheets("dossier de
fabrication").Range("O18") / Sheets("dossier de
fabrication").Range("O16")
If coupé_en_1 <> Int(coupé_en_1) Then
MsgBox "veuillez saisir un nombre de coupe entier"
End If
End Sub

Si tu as 5 minutes pour te pencher sur mon cas, je te remercie d'avance
Rémi


"Jacquouille" a écrit dans le message de
news: %
Bonjour Rémi
Ta demande est très vaste.
Si tu expliquais, en grandes lignes, ce que tu désires faire.
Alors, le forum te donnera 1001 idées, plus les sites cités.
Bonne chance
--
Bien amicalmement,
Vivement conseillés:
http://www.excelabo.net
http://jacxl.free.fr/mpfe/trombino.html
http://dj.joss.free.fr/netiquet.htm
http://frederic.sigonneau.free.fr/

Jacquouille.

"Rémi" a écrit dans le message de news:

bonjour tout le monde,
je tente depuis déjà quelques temps d'améliorer une feuille excel par
du code vba, mon problème est que je suis imprimeur et non pas
programmeur, aussi même si je suis logique je ne connais pour ainsi
dire pas grand chose à toutes les méandres de la programmation.
je me rends compte que ma demande est très certainement exagérée, mais
existe-t'il une personne suffisament charitable pour m'aider dans
l'accomplissement de cette tache, ou bien pour m'aiguiller vers un
site de préférence en français sur la programmation vba (mais un site
pour les archi-nuls)
d'avance, je vous remercie de votre aide
Rémi