worksheet automatisch mailen en opslaan in een specifieke map

Status
Niet open voor verdere reacties.

wouterik

Nieuwe gebruiker
Lid geworden
14 nov 2008
Berichten
3
Hallo iedereen,
Dit is mijn eerste vraag op dit forum! Ik wil voor mijn werk het administreren van ziekmelden, betermelden enz. automatiseren via VBA. Heb wel het een en ander geprobeerd maar het lukt gewoon niet om het worksheet wat actief is via een knop automatisch te laten mailen en tevens te laten opslaan in een specifieke map.Verder zou het mij erg helpen als het Email onderwerp en het op te slaan bestand de naam van het persoon (zie werkblad Master) en de datum van verzenden/opslaan meekrijgt.Voor mij lijkt dit onmogelijk, maar voor jullie cracks misschien een eitje?
Ik hoop het!
 

Bijlagen

Uitgaande van Blad1 met in E9 de naam van de medewerker

Code:
Sub verzend()
  Blad1.copy
  With Activeworkbook
    .saveas "E:\" & .sheets(1).range("E9") & format(date,"yyyymmdd") & ".xls"
    .sendmail "ontvanger@test.nl"
    .close
  end With
End Sub
 
Laatst bewerkt:
Hartelijk bedankt voor je snelle reactie! Ik zal hem toe gaan passen, alleen... de map waar hij in moet is:\\filer01\home\HaeserWout\Rijndwarsweg\ziek en betermeldingen. Waar en hoe zet ik deze in de macro?
 
Ik heb het zojuist toegepast en getest: GEWELDIG !
Je hebt me Extreem goed geholpen!

Heel veel dank !

gr. Wout
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan