Hei.
Mitenköhän alla olevan makron saisi toimimaan niin että makro osaisi hakea tallennettavan tiedoston nimen solusta B1.
Sub Makro4(tallenna PDF:nä)
'
' Makro4 Makro
'
'
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"C:\Users\käyttäjä\Desktop\Testi5.pdf", Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
True
End Sub
Mitenköhän alla olevan makron saisi toimimaan niin että makro osaisi hakea tallennettavan tiedoston nimen solusta B1.
Sub Makro4(tallenna PDF:nä)
'
' Makro4 Makro
'
'
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"C:\Users\käyttäjä\Desktop\Testi5.pdf", Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
True
End Sub
Vastaukset 2
Vanhimmat
Tiedosto on nimettävä väliaikaisesti tällä B1 solussa olevalla nimellä.
höpö höpö...
ei tartte tallentaa ennen makron suorittamista
muuta taulukon nimi sopivaksi
Sub TallennaPDF()
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"C:\Users\Kunde\Desktop\" & Worksheets("Taul1").Range("B1") & ".pdf", Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
True
End Sub
Keep EXCELing
@Kunde