Beste allemaal,
Sinds enige tijd werk ik met een excel bestand incl macro's voor het maken van mijn facturen. Als ik
een bepaalde toetsencombinatie gebruik, slaat hij het bestand op als .pdf en telt hij automatisch een factuurnummer
op. Nu heb ik een andere pc, windows 8.1 met dezelfde versie Office 2007. Maar ik krijg steeds foutmelding 5 wanneer
ik het op wil slaan. Macro's zijn ingeschakeld en de bestandslocatie is aangepast in de macro. Wat gaat er fout? Hellupie
dit is de macro code:
Sub VolgFact()
Range("F9").Value = Range("F9").Value + 1
Range("D1318").ClearContents
Range("F8").Value = Date
End Sub
Public Sub OpslBestand()
Dim NieuwFact As Variant
ActiveWorkbook.ExportAsFixedFormat _
Type:=xlTypePDF, _
Filename:="C:\Users\jacht\Documents\Facturen 2016\Fact" & Range("F9").Value & ".pdf", _
Quality:=xlQualityStandard, _
IncludeDocProperties:=True, _
IgnorePrintAreas:=False, _
OpenAfterPublish:=False
VolgFact
End Sub
alvast bedankt
Sinds enige tijd werk ik met een excel bestand incl macro's voor het maken van mijn facturen. Als ik
een bepaalde toetsencombinatie gebruik, slaat hij het bestand op als .pdf en telt hij automatisch een factuurnummer
op. Nu heb ik een andere pc, windows 8.1 met dezelfde versie Office 2007. Maar ik krijg steeds foutmelding 5 wanneer
ik het op wil slaan. Macro's zijn ingeschakeld en de bestandslocatie is aangepast in de macro. Wat gaat er fout? Hellupie
dit is de macro code:
Sub VolgFact()
Range("F9").Value = Range("F9").Value + 1
Range("D1318").ClearContents
Range("F8").Value = Date
End Sub
Public Sub OpslBestand()
Dim NieuwFact As Variant
ActiveWorkbook.ExportAsFixedFormat _
Type:=xlTypePDF, _
Filename:="C:\Users\jacht\Documents\Facturen 2016\Fact" & Range("F9").Value & ".pdf", _
Quality:=xlQualityStandard, _
IncludeDocProperties:=True, _
IgnorePrintAreas:=False, _
OpenAfterPublish:=False
VolgFact
End Sub
alvast bedankt