Ga naar inhoud

Kaasboer

Lid
  • Items

    6
  • Registratiedatum

  • Laatst bezocht

Berichten die geplaatst zijn door Kaasboer

  1. Hallo allemaal,

    Bedankt voor de aanreiking van mogelijke oplossingen. Die had ik ook reeds geprobeerd. Niets werkte...

    Naar een gespecialiseerde site gaan die de documenten converteert, was geen optie.

    Soms zijn er vertrouwelijke documenten bij...

    Ik heb nu zelf een oplossing gevonden via het programmeren van een macro!

    Hieronder de macro voor wie het nodig heeft:

    Sub DosSavenAlsPdf()

    '

    ' DocSavenAlsPdf Macro

    '

    Dim strBestandnaam As String

    Dim strPad As String

    Dim strVolledig As String

    Dim intLengte As Long

    Dim strpdfNaam As String

    'Naar de juiste directory gaan

    ChangeFileOpenDirectory "C:\"

    With Dialogs(wdDialogFileOpen)

    .Show

    End With

    Set Source = ActiveDocument

    strPad = ActiveDocument.Path & Application.PathSeparator

    strBestandnaam = ActiveDocument.Name

    strVolledig = ActiveDocument.Path & Application.PathSeparator & ActiveDocument.Name

    intLengte = Len(strVolledig)

    strpdfNaam = Left(strVolledig, intLengte - 5) & ".pdf"

    'Document saven als pdf

    ActiveDocument.ExportAsFixedFormat OutputFileName:= _

    strpdfNaam, ExportFormat:=wdExportFormatPDF, _

    OpenAfterExport:=False, OptimizeFor:=wdExportOptimizeForPrint, Range:= _

    wdExportAllDocument, From:=1, To:=1, Item:=wdExportDocumentContent, _

    IncludeDocProps:=True, KeepIRM:=True, CreateBookmarks:= _

    wdExportCreateNoBookmarks, DocStructureTags:=True, BitmapMissingFonts:= _

    True, UseISO19005_1:=False

    ActiveDocument.Close

    End Sub

    Het probleem is hierbij opgelost.

    Grtjs - Kaasboer

    Ten behoeve van wie het kan gebruiken

  2. Hallo Clarkie,

    Bedankt voor het aanreiken van mogelijke oplossingen.

    Had de meeste dingen reeds geprobeerd - zonder resultaat.

    Heb een aantal van de laatste updates verwijderd - zonder resultaat.

    Denk er aan van het office programma in zijn geheel te verwijderen en opnieuw te installeren.

    Andere suggesties zijn nog steeds welkom.

    Grtjs

    kaasboer

  3. Sinds een tweetal weken kan ik een WORD document niet meer saven als pdf. (Word 2007 professional)

    Dit onderwerp stond enkele dagen geleden op het forum. Ik heb toen gemeld met hetzelfde probleem te zitten doch heb nog steeds geen oplossing. Even werd er gesuggereerd dat het waarschijnlijk te maken had met een beveiligingsprogramma, maar niet direct hoe dit kon opgelost worden. Mogelijk is het probleem ontstaan na een automatisch update. Wie kan hier helpen. Met dank.

  4. Hallo,

    Voor de aankomst van een stratenloop beschik in over een handscanner. Bij elke klik wordt het borstnummer op een excelblad geregistreerd. Hoe kan ik daar telkens de tijd naast krijgen? Bestaat hiervoor een formule binnen Excel zelf? Let op! Bij elke klik moet de nieuwe tijd worden geregistreerd zonder de vorige tijden te wijzigen...

    Met heel veel dank voor een oplossing.

×
×
  • Nieuwe aanmaken...

Belangrijke informatie

We hebben cookies geplaatst op je toestel om deze website voor jou beter te kunnen maken. Je kunt de cookie instellingen aanpassen, anders gaan we er van uit dat het goed is om verder te gaan.