J'ai trois questions à poser, merci d'avance à ceux qui me répondront .
1) Je créer sur Excel un petit programme " Devis" et j'aimerais intégrer à
ce petit programme des pages "Word". Une page de garde, trois pages
"descriptifs" et deux pages "conditions de vente".
Comment dois-je procéder pour importer ces feuilles ?
2) Comment faire pour que la numérotation des devis ce fasse
automatiquement. Exemple le numéro sera sous la forme : 2 lettres pour le
rédacteur du devis (Initiales), 1 chiffre pour l'année , et 4 chiffres pour
la numérotation ( CH4-0001).
3) Une fois le devis fini (Entrée des quantités et références, et valeur de
la remise), je souhaite lancer l'édition de ce devis, avec en premier la
page de garde, ensuite les trois pages descriptifs, le devis excel et enfin
les conditions de vente, quel fonction dois-je utiliser.
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
PhilippeD1
Salut Cris570
Pour ta premiere question : Dans excel: Insertion Objet Soit : Nouvel objet document Word Ou : Créer à partir du fichier Parcourir (pour rechercher ton document Word existant)
A +
Bonjour à tous,
J'ai trois questions à poser, merci d'avance à ceux qui me répondront .
1) Je créer sur Excel un petit programme " Devis" et j'aimerais intégrer à ce petit programme des pages "Word". Une page de garde, trois pages "descriptifs" et deux pages "conditions de vente". Comment dois-je procéder pour importer ces feuilles ?
2) Comment faire pour que la numérotation des devis ce fasse automatiquement. Exemple le numéro sera sous la forme : 2 lettres pour le rédacteur du devis (Initiales), 1 chiffre pour l'année , et 4 chiffres pour la numérotation ( CH4-0001).
3) Une fois le devis fini (Entrée des quantités et références, et valeur de la remise), je souhaite lancer l'édition de ce devis, avec en premier la page de garde, ensuite les trois pages descriptifs, le devis excel et enfin les conditions de vente, quel fonction dois-je utiliser.
Merci encore.
Cris...!
Salut Cris570
Pour ta premiere question :
Dans excel:
Insertion
Objet
Soit : Nouvel objet document Word
Ou : Créer à partir du fichier
Parcourir (pour rechercher ton document Word existant)
A +
Bonjour à tous,
J'ai trois questions à poser, merci d'avance à ceux qui me répondront .
1) Je créer sur Excel un petit programme " Devis" et j'aimerais intégrer à
ce petit programme des pages "Word". Une page de garde, trois pages
"descriptifs" et deux pages "conditions de vente".
Comment dois-je procéder pour importer ces feuilles ?
2) Comment faire pour que la numérotation des devis ce fasse
automatiquement. Exemple le numéro sera sous la forme : 2 lettres pour le
rédacteur du devis (Initiales), 1 chiffre pour l'année , et 4 chiffres pour
la numérotation ( CH4-0001).
3) Une fois le devis fini (Entrée des quantités et références, et valeur de
la remise), je souhaite lancer l'édition de ce devis, avec en premier la
page de garde, ensuite les trois pages descriptifs, le devis excel et enfin
les conditions de vente, quel fonction dois-je utiliser.
Pour ta premiere question : Dans excel: Insertion Objet Soit : Nouvel objet document Word Ou : Créer à partir du fichier Parcourir (pour rechercher ton document Word existant)
A +
Bonjour à tous,
J'ai trois questions à poser, merci d'avance à ceux qui me répondront .
1) Je créer sur Excel un petit programme " Devis" et j'aimerais intégrer à ce petit programme des pages "Word". Une page de garde, trois pages "descriptifs" et deux pages "conditions de vente". Comment dois-je procéder pour importer ces feuilles ?
2) Comment faire pour que la numérotation des devis ce fasse automatiquement. Exemple le numéro sera sous la forme : 2 lettres pour le rédacteur du devis (Initiales), 1 chiffre pour l'année , et 4 chiffres pour la numérotation ( CH4-0001).
3) Une fois le devis fini (Entrée des quantités et références, et valeur de la remise), je souhaite lancer l'édition de ce devis, avec en premier la page de garde, ensuite les trois pages descriptifs, le devis excel et enfin les conditions de vente, quel fonction dois-je utiliser.
Merci encore.
Cris...!
Philippe.R
Bonjour, pour la deuxième question, par exemple :
Sub devicris() Dim lesInit As String, numDEvis As String On Error Resume Next lesInit = InputBox("Merci de saisir vos initiales", "MPFE nouveau devis") If lesInit = "" Then MsgBox "Procédure interrompue par l'utilisateur !", vbExclamation, "MPFE" Exit Sub End If numDEvis = UCase(lesInit) & Right(Year(Date), 1) & "_" _ & Application.WorksheetFunction.Rept("0", 4 - Len([a1])) & [a1] MsgBox numDEvis [a1] = [a1] + 1 End Sub
dans un module standard -- Amicales Salutations XL 97 / 2000 / 2002 Retirer A_S_ pour répondre en privé. Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"cris570" a écrit dans le message de news:
Bonjour à tous,
J'ai trois questions à poser, merci d'avance à ceux qui me répondront .
1) Je créer sur Excel un petit programme " Devis" et j'aimerais intégrer à ce petit programme des pages "Word". Une page de garde, trois pages "descriptifs" et deux pages "conditions de vente". Comment dois-je procéder pour importer ces feuilles ?
2) Comment faire pour que la numérotation des devis ce fasse automatiquement. Exemple le numéro sera sous la forme : 2 lettres pour le rédacteur du devis (Initiales), 1 chiffre pour l'année , et 4 chiffres pour la numérotation ( CH4-0001).
3) Une fois le devis fini (Entrée des quantités et références, et valeur de la remise), je souhaite lancer l'édition de ce devis, avec en premier la page de garde, ensuite les trois pages descriptifs, le devis excel et enfin les conditions de vente, quel fonction dois-je utiliser.
Merci encore.
Cris...!
Bonjour,
pour la deuxième question, par exemple :
Sub devicris()
Dim lesInit As String, numDEvis As String
On Error Resume Next
lesInit = InputBox("Merci de saisir vos initiales", "MPFE nouveau devis")
If lesInit = "" Then
MsgBox "Procédure interrompue par l'utilisateur !", vbExclamation, "MPFE"
Exit Sub
End If
numDEvis = UCase(lesInit) & Right(Year(Date), 1) & "_" _
& Application.WorksheetFunction.Rept("0", 4 - Len([a1])) & [a1]
MsgBox numDEvis
[a1] = [a1] + 1
End Sub
dans un module standard
--
Amicales Salutations
XL 97 / 2000 / 2002
Retirer A_S_ pour répondre en privé.
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"cris570" <cris570@hotmail.com> a écrit dans le message de news:OglR6svpEHA.2764@TK2MSFTNGP11.phx.gbl...
Bonjour à tous,
J'ai trois questions à poser, merci d'avance à ceux qui me répondront .
1) Je créer sur Excel un petit programme " Devis" et j'aimerais intégrer à
ce petit programme des pages "Word". Une page de garde, trois pages
"descriptifs" et deux pages "conditions de vente".
Comment dois-je procéder pour importer ces feuilles ?
2) Comment faire pour que la numérotation des devis ce fasse
automatiquement. Exemple le numéro sera sous la forme : 2 lettres pour le
rédacteur du devis (Initiales), 1 chiffre pour l'année , et 4 chiffres pour
la numérotation ( CH4-0001).
3) Une fois le devis fini (Entrée des quantités et références, et valeur de
la remise), je souhaite lancer l'édition de ce devis, avec en premier la
page de garde, ensuite les trois pages descriptifs, le devis excel et enfin
les conditions de vente, quel fonction dois-je utiliser.
Sub devicris() Dim lesInit As String, numDEvis As String On Error Resume Next lesInit = InputBox("Merci de saisir vos initiales", "MPFE nouveau devis") If lesInit = "" Then MsgBox "Procédure interrompue par l'utilisateur !", vbExclamation, "MPFE" Exit Sub End If numDEvis = UCase(lesInit) & Right(Year(Date), 1) & "_" _ & Application.WorksheetFunction.Rept("0", 4 - Len([a1])) & [a1] MsgBox numDEvis [a1] = [a1] + 1 End Sub
dans un module standard -- Amicales Salutations XL 97 / 2000 / 2002 Retirer A_S_ pour répondre en privé. Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"cris570" a écrit dans le message de news:
Bonjour à tous,
J'ai trois questions à poser, merci d'avance à ceux qui me répondront .
1) Je créer sur Excel un petit programme " Devis" et j'aimerais intégrer à ce petit programme des pages "Word". Une page de garde, trois pages "descriptifs" et deux pages "conditions de vente". Comment dois-je procéder pour importer ces feuilles ?
2) Comment faire pour que la numérotation des devis ce fasse automatiquement. Exemple le numéro sera sous la forme : 2 lettres pour le rédacteur du devis (Initiales), 1 chiffre pour l'année , et 4 chiffres pour la numérotation ( CH4-0001).
3) Une fois le devis fini (Entrée des quantités et références, et valeur de la remise), je souhaite lancer l'édition de ce devis, avec en premier la page de garde, ensuite les trois pages descriptifs, le devis excel et enfin les conditions de vente, quel fonction dois-je utiliser.
