excel opslaan celnaam en email

Status
Niet open voor verdere reacties.
Ok.
Dat is Office 2010, maar dat zou niet uit moeten maken.
 
Dag edmoor, het lukt, heb office 2016 versie geïnstalleerd en nu werkt het
nog een vraagje, wordt het bestand, na drukken van de knop, ergens bewaard ?
mvg
 
Ok dan, dus toch het verschil.
Ja, het bestand wordt opgeslagen in de map waar je je document hebt geopend.
 
Tuurlijk.
Kijk in de code achter Bestandsnaam =
Daar wordt het bestand opgeslagen.
 
dus hier moet ik iets veranderen

Bestand = ThisWorkbook.Path & "" & Range("D17") & ".xlsm"
ThisWorkbook.SaveCopyAs Bestand

sorry, maar dit is echt nieuw voor mij
 
wat ik bedoel is, het originele bestand staat ergens op de schijf
en de bestanden nadien op andere plaats op de schijf in een mapje
mvg
 
Dit stukje bepaalt waar het wordt opgeslagen:
Code: 
ThisWorkbook.Path & "\"

Daar kan dus bijvoorbeeld ook dit staan:
Code: 
"D:\johnym\Excel documenten\"
 
werkt perfect, je bent geniaal, bedankt
tot een volgende keer
:thumb::thumb::thumb:
want ik vermoed dat ik nog met pdf aan de slag zal moeten gaan :D
 
dag edmoor, het is al zover, ik zou bij het document ook een knopje willen plaatsen met de opdracht: bewaren in een map als pdf en email als pdf. met bestandsnaam als inhoud cel D17

alvast bedankt
 
Sub PDF()
Dim FacName As String
FacName = ActiveSheet.Range("D17").Value
If Dir("S:\Ertvelde\Logistiek\RECEPTIE BIODIESEL\complaints 3163 PDF" & FacName & ".pdf") <> "" Then
MsgBox "Het bestand: " & FacName & ".pdf bestaat reeds"
Exit Sub
Else
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:="S:\Ertvelde\Logistiek\RECEPTIE BIODIESEL\complaints 3163 PDF" & FacName & ".pdf", Quality:=xlQualityStandard, IncludeDocProperties:=False, IgnorePrintAreas:=False, From:=1, to:=1, OpenAfterPublish:=False
End If
End Sub

dit heb ik nu, zou dit graag ook mailen
 
Begin eerst maar met code tags.
 
Sorry, latijn voor mij. ik wil gewoon een vba die mijn excel bestand ergens opslaat en emailt als pdf.
en dat de pdf de titel krijgt van cel D17

mvg
 
?
ik heb al eerder voorbeeldbestand gepost, denk dat mijn titel duidelijk was...
zie het niet, sorry
 
Het gaat om het gebruik van codetags als je code plaatst, niet om een voorbeeld bestand.
Lees dus het stukje over codetags. Kennelijk heb je daar nu overheen gekeken.

Verder:
Hier zou je voldoende aan moeten hebben.
Ook om het eventueel naar eigen wens aan te passen:
Bekijk bijlage Kopie van complaint 3163-1-1.xlsm
 
hey edmoor, zie nu dat het ook een excel opslaat, zou enkel een pdf moeten zijn, mvg
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan