Verwijzing naar cel met variabele bestandsnaam vanuit VBA ivm opslaan als pdf

[MirHes]

Hoi,

Eerste keer op dit forum en hoop op een positieve ervaring

Ik heb in VBA een macro gemaakt voor het automatisch opslaan van mijn excel-document als pdf. (Excel 2016 / Mac)

Dit is redelijk gelukt. Het enige lastige in deze is dat de naam van mijn pff-bestand 'variabel' moet zijn. Deze variabel staat als tekst-veld in cel A1 van mijn excel document. Nu heb ik volgende macro gemaakt:

Sub bewaarPDF()
'
' bewaarPDF Macro
'

'
ActiveWorkbook.SaveAs filename:= _
"/Users/mirjamheskes/Documents/TEST/" & ActiveSheet.Range("A1"), _
FileFormat:=xlPDF, PublishOption:=xlSheet
End Sub

Echter, krijg ik dan de foutmelding "er heeft zich een fout voorgedaan bij het afdrukken".
Als ik bij filename een vaste waarde in zit, werkt de functie wel...

Enig idee wat ik fout doe?

Alvast bedankt!
Groeten,
Mirjam.

 

[HSV]

Ik heb geen ervaring met een Mac, maar is cel A1 toevallig samengevoegd met meerdere cellen?
probeer anders eens.

[COLOR=#333333]ActiveSheet.Range("A1")[/COLOR][COLOR=#0000ff].value[/COLOR][COLOR=#333333][/COLOR]

 

[VenA]

Mogelijk

Range("A1").value

 

[MirHes]

Hoi,

Bedankt! Cel A1 is idd een formule bestaande uit tekst en verwijzing.

="MIS-140 JC AP winkels 2017_W12_ "&A8&".pdf"

Ik heb ook jouw optie geprobeerd met de ".value" maar helaas hetzelfde resultaat.....

 

[HSV]

Wat staat er in cel A8 ?

Of; wat is het resultaat in cel A1.

 

[MirHes]

Resultaat in cel A1 = MIS-140 JC AP winkels 2017_W12_ 101.pdf

Dit moet de bestandsnaam worden waarbij cel A8 het winkelnummer 101 is.....

 

[HSV]

Werkt onderstaand ook op een Mac?

thisworkbook.exportasfixedformat 0, [COLOR=#3E3E3E]"/Users/mirjamheskes/Documents/TEST/"[/COLOR] & range("a1").value