Verzenden facturen

[basblok]

Beste Edmoor,

Ik ondervind op dit moment grote problemen met het niet kunnen verzenden van de facturen.
Waarschijnlijk ergens een fout gemaakt welke ik niet boeven water krijg.
Op mijn scherm zie ik dat de factuur met succes is verzonden, maar hij komt niet binnen bij de ontvangers.
Wil jij mij a.u.b. even helpen?
Bij voorbaat dank voor je hulp.

--edit by YdieresiS--
Bijlagen zijn verwijderd omdat hier gebruikersgegevens in stonden.

 

[edmoor]

Krijg je de mail wel binnen als je aan jezelf verstuurd?

 

[basblok]

Nee Edmoor, helemaal niets.
Alvast dank voor je aandacht aan dit bestandje.

 

[edmoor]

Volg dan de code eens in debug mode.
Dan kan je zien wat er per regel code precies gebeurd.

 

[basblok]

Die opmerking gaat mij boven de pet, en begrijp het ook niet, sorry hiervoor.

--edit by YdieresiS--
Bijlagen zijn verwijderd omdat hier gebruikersgegevens in stonden.

 

[edmoor]

Lees dit over het gebruik van Debug mode in Excel:

Debugging VBA Code in Excel - GeeksforGeeks

A Computer Science portal for geeks. It contains well written, well thought and well explained computer science and programming articles, quizzes and practice/competitive programming/company interview Questions.

www.geeksforgeeks.org

 

[basblok]

Is het bestand misschien eenvoudiger te krijgen?

 

[mvdvlist]

Is DIT wat?

 

[basblok]

Dankjewel voor het bijgeleverde bestandje.
Ik ga ermee aan de slag.
Dit item kan worden gesloten.

 

[basblok]

Ik kom er niet uit, kunnen de facturen hier met een knop ook per mail worden verzonden met een Voorjaarsnota en een Najaarsnota zoals in de bijgeleverde bestandje?

 

[basblok]

Beste Edmoor,
Wil jij mij a.u.b. even helpen, ik krijg bij de foutmelding dit te zien.
Wat staat er fout in de gele gemarkeerde regel?
In een ver verleden heb je dit gemaakt voor mij, maar ik weet niet hoe ik dat uit het archief kan halen.
Wil je mij het nog een keer toezenden?
Bij voorbaat dank voor je medewerking.

 

[edmoor]

Zonder de foutmelding kan ik daar niets over zeggen.
Maar het lijkt erop dar je een \ mist.
Maak er eens dit van: ThisWorkbook.Path & "\" en dan de rest van de regel.

 

[basblok]

Ik zal het wel niet goed hebben gedaan, nu staat dit er, maar het probleem is nog niet opgelost.
Wil je a.u.b. de volledige regel tonen hoe die er uit moet zien?

 

[basblok]

Heb het aangepast en krijg nu onderstaande melding te zien.

 

[edmoor]

Dat is ook niet wat ik zei:

Set HW = Workbooks.Open(ThisWorkbook.Path & "\Verzenden factuur 1e hj.xlsx", , True)

En dus de jiuste extensie achter de punt zetten.

 

[basblok]

Zoals je ziet staat het er nu goed in, doch

 

[edmoor]

Dat zou moeten werken.
In je bericht in #14 staat het fout.

Als je nog een foutmelding krijgt plaats dan je bestand hier.

 

[basblok]

Beste Edmoor,
Op het moment dat ik klik op Factuur verzenden krijg ik deze melding.
Wat

 

[edmoor]

Die melding lijkt me toch duidelijk.

 

[AD1957]

Volgens de bijlage in bericht #10 is de extensie xlsm en niet xlsx