Microsoft 365 Erreur 400 VBA

[Huggy22]

Bonjour à tous.

Je suis novice en VBA mais je tiens à tenter l'expérience

Je cherche à envoyer une feuille excel via mail à plusieurs personnes (destinataire, cc et cci). J'ai trouvé un code VBA mais celui-ci me renvoie une erreur 400 (voir dans le fichier joint).

J'avoue y perdre mon latin.

Merci d'avance !

 

[Phil69970]

Bonjour @Huggy22

Déjà il y a une erreur ici

NbLignBe n'existe pas

Sur quelle ligne as tu une erreur ?

@Phil69970

 

[Huggy22]

Bonjour.

Il semble que le remplacement de NbLignbe soit suffisant.

Un tout grand merci !!!

 

[Huggy22]

Bonjour @Huggy22

Déjà il y a une erreur ici

Regarde la pièce jointe 1162359

NbLignBe n'existe pas

Sur quelle ligne as tu une erreur ?

@Phil69970

Je rectifie, cela a fonctionné une seule fois et j'obtiens désormais un message d'erreur (voir capture en annexe).

 

[Phil69970]

Re

J'ai trouvé un code VBA

C'est bien beau de trouvé un code VBA encore faut il qu'il soit fonctionnel
Cela fait donc au moins 2 problèmes sur ton code !!!!!

Tu as des exemples fonctionnels plein le forum

==> https://excel-downloads.com/threads...stalle-sur-ma-machine.20073682/#post-20563188

@Phil69970

 

[Huggy22]

Re


C'est bien beau de trouvé un code VBA encore faut il qu'il soit fonctionnel
Cela fait donc au moins 2 problèmes sur ton code !!!!!


Regarde la pièce jointe 1162375

Tu as des exemples fonctionnels plein le forum

==> https://excel-downloads.com/threads...stalle-sur-ma-machine.20073682/#post-20563188

@Phil69970

Bonjour et merci pour ces renseignements mais lorsque je regarde dans les références disponibles, elles ne sont pas manquantes (voir ci-dessous).
Je crois que la matière est un peu trop complexe pour moi actuellement. Je vais envisager une formation sur le sujet
Je vais donc m'en tenir au bon vieux copier-coller pour résoudre temporairement mon problème.
Un grand merci pour ta patience.

Bien cordialement,

 

[patricktoulon]

re
et oui c'est ca quand on utilise mailenveloppe on doit rester en early binding et donc avoir les bonnes version de référence
chez moi c'est 15 et non 16 par exemple

early binding --> liaison précoces 'référence activée
late binding--> liaison tardive creation de l'object avec "createobject"'utilise la référence dispo du system

trouve toi un code avec la creation d'un object outlook en latebinding
je donne un indice

set OutlK=createobject("outlook.application")
Set OLmail = OutlK.CreateItem(olMailItem)

with OLmail
.From = moimeme@hotmail.com"
 .To = lautre@trucmuche.fr
 .Body="salut coucou et compagnie"
 .Subject = ""juste pour un test"
'si il y a des fichier a envoyer
.Attachments.Add "c:\undossier\monficher.extention"

'.send'envoie
'.display'affiche outlook
'.save'enregistre dans les brouillon


end with


end sub

etc etc....
createobject créra l'object avec ta reference automatiquement


voir moult exemples ici dans le forum et les ressource

pour que mail enveloppe ou l'object outlook fonctionne il faut que outlook aie au moins un compte configuré ,sinon tu oublie tu envoie avec un timbre

 

[Huggy22]

re
et oui c'est ca quand on utilise mailenveloppe on doit rester en early binding et donc avoir les bonnes version de référence
chez moi c'est 15 et non 16 par exemple

early binding --> liaison précoces 'référence activée
late binding--> liaison tardive creation de l'object avec "createobject"'utilise la référence dispo du system

trouve toi un code avec la creation d'un object outlook en latebinding
je donne un indice

set OutlK=createobject("outlook.application")
Set OLmail = OutlK.CreateItem(olMailItem)

with OLmail
.From = moimeme@hotmail.com"
 .To = lautre@trucmuche.fr
 .Body="salut coucou et compagnie"
 .Subject = ""juste pour un test"
'si il y a des fichier a envoyer
.Attachments.Add "c:\undossier\monficher.extention"

'.send'envoie
'.display'affiche outlook
'.save'enregistre dans les brouillon


end with


end sub

etc etc....
createobject créra l'object avec ta reference automatiquement


voir moult exemples ici dans le forum et les ressource

pour que mail enveloppe ou l'object outlook fonctionne il faut que outlook aie au moins un compte configuré ,sinon tu oublie tu envoie avec un timbre

Bonjour Patrick et merci pour ta réaction.

Ouille, ouille, ouille, je me demande si il ne serait pas plus simple pour moi de me dénicher un vieux fax
Bon, je vais me pencher sur ta solution.

Avec tous mes remerciements,

Huggy.

 

[Phil69970]

Re

Bonjour Patrick , c'est bien pour ça que je lui ai mis un lien fonctionnel qui utilise CreateObject et que j'ai testé !

@Phil69970

 

[patricktoulon]

re
@Phil69970
oui j'ai zappé dans mon élan

 

[Phil69970]

@Huggy22

Pour info on ne valide pas son propre post car tu n'as rien trouvé du tout mais le post qui correspond à la réponse que tu as choisi.

@Phil69970

 

[Huggy22]

@Huggy22

Pour info on ne valide pas son propre post car tu n'as rien trouvé du tout mais le post qui correspond à la réponse que tu as choisi.

@Phil69970

Bonsoir.

Maladresse de ma part (gros problème de vue et d'arthrose dans les doigts). J'espère avoir corrigé mon erreur.

Encore désolé et bonne soirée.