• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

opslaan bij 1 blad niet andere wel

Status
Niet open voor verdere reacties.

Gijsbert1960

Gebruiker
Lid geworden
5 jul 2017
Berichten
135
Hallo allemaal

Ik heb in mijn bestand een aantal bladen die we uitprinten en als PDF opslaan in een map om later in een bestand op de server van het bedrijf kunnen uploaden. het zijn dezelfde formule's alleen bij 1 krijg ik wel uitgeprint maar niet opgeslagen. De volgende regel wordt geel .ExportAsFixedFormat xlTypePDF, locatie & naam 'opslaan

Code:
With Sheets("3 mnd opr tr") 'of specificeer de*sheet*als*Sheets("Factuur") ofzo
locatie = "C:\Users\Gebruiker\Desktop\Trainingen\"  'of "C:\Documents and Settings\Documenten\.."
naam = .Range("A8") & " " & .Range("E10") 'de cel met de bestandsnaam
  .PrintOut 'uitprinten
  .ExportAsFixedFormat xlTypePDF, locatie & naam 'opslaan

End With

M vr gr
Gijs
 
werkt prima bij mij, plaats je bestand eens.

staan er zulke tekens in cellen A8 of E10?
•Hekje (#)
•Procent (%)
•En-teken (&)
•Sterretje (*)
•Accolades ({})
•Backslash (\)
•Dubbele punt :))
•Punthaken (<>)
•Het vraagteken (?)
•Slash (/)
•Plusteken (+)
•Sluisteken (|)
•Aanhalingsteken (")
 
Laatst bewerkt:
3 MAANDELIJKSE OPERATIONELE TRAINING / OPLEIDING

Dit staat in A8, en daar staat toch duidelijk een teken tussen die niet in een bestandsnaam mag staan.
 
Hallo SjonR

Heb het verandert en het werkt nu, wist dat niet en na Uw opmerking in aangepast. Bedankt voor de hulp

M vr gr
Gijs
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan