I searched the forum but couldnt find a sure answer. Is PDF Creator currently not compatible with win8 as coding works fine on win7 comps but on new win8 machine no pdf is created.
Cheers
Andy
Hi,
can you post your setuplog.txt here.
Does printing a testpage from the PDFcreator options still work?
PDFCreator is fully compatible with win8, it is probably a system specific problem.
regards,
Robin
Hi Robin,
----- Setup - Start: 2013-01-03 08:35:55 -----
Install PDFCreator: 1.6.1
InstallerDirectory: C:\Users\Andy\AppData\Local\Temp\is-8LHKH.tmp
X64: yes
Start AnalyzeCommandlineParameters
Parameter /VERYSILENT: false
Parameter /SILENT: false
Parameter /FORCEINSTALL: false
Parameter /REMOVEOPTIONS: false
Parameter /DONTINSTALLPRINTERS: false
Parameter /EXPERT: false
No Parameter /LoadInf
No Parameter /SaveInf
No Parameter /REGFile
No Parameter /PPDFile
No Parameter /Printername
End AnalyzeCommandlineParameters
WindowsVersionNumber: 6.2.9200
Silent installation: false
GUITS (7000, 50): 15
PreviousApplicationPath: C:\Program Files (x86)\PDFCreator
Update: 1
Installed PDFCreator version: 1.6.1
Installed PDFCreator version is lower 1.5.1 = false
nationCode: 242
InstallPDFCreatorPrinter = false
SBC: 0
OS: 3.2
AppPath: C:\Program Files (x86)\PDFCreator
InstalledPDFCreatorVersion: 1.6.1
DontInstallPrinters: true
SPT: false
IR2D: 1
IC:1|1.6.1|1|en|b4|c0
— Systeminformation - Start —
Windowsversion: 6.02.9200
WinDir: C:\windows
Win64: true
ProcessorArchitecture: X64
.Net 2.0: true
.Net 2.0 regasm.exe:C:\Windows\Microsoft.NET\Framework\v2.0.50727\RegAsm.exe
SystemDir: C:\windows\system32
TempDir: C:\Users\Andy\AppData\Local\Temp\
CurrentDir: C:\windows\system32
Computername: ANDY
Username: Andy
UILanguage: 2057
Internet Explorer version: 9.10.9200.16453
Path: C:\Program Files (x86)\Intel\iCLS Client\;C:\Program Files\Intel\iCLS Client\;C:\windows\system32;C:\windows;C:\windows\System32\Wbem;C:\windows\System32\WindowsPowerShell\v1.0\;C:\Program Files\Intel\Intel® Management Engine Components\DAL;C:\Program Files\Intel\Intel® Management Engine Components\IPT;C:\Program Files (x86)\Intel\Intel® Management Engine Components\DAL;C:\Program Files (x86)\Intel\Intel® Management Engine Components\IPT;C:\Program Files (x86)\Intel\OpenCL SDK\2.0\bin\x86;C:\Program Files (x86)\Intel\OpenCL SDK\2.0\bin\x64;C:\Program Files\Intel\WiFi\bin\;C:\Program Files\Common Files\Intel\WirelessCommon\;C:\Program Files (x86)\proXPN\bin
C:\windows\system32\Wbem\framedyn.dll: NOT found
framedyn.dll: found in path
— Systeminformation - End —
— Environment - Start —
ALLUSERSPROFILE=C:\ProgramData
APPDATA=C:\Users\Andy\AppData\Roaming
CommonProgramFiles=C:\Program Files (x86)\Common Files
CommonProgramFiles(x86)=C:\Program Files (x86)\Common Files
CommonProgramW6432=C:\Program Files\Common Files
COMPUTERNAME=ANDY
ComSpec=C:\windows\system32\cmd.exe
FP_NO_HOST_CHECK=NO
HOMEDRIVE=C:
HOMEPATH=\Users\Andy
LOCALAPPDATA=C:\Users\Andy\AppData\Local
LOGONSERVER=\\MicrosoftAccount
NUMBER_OF_PROCESSORS=4
OS=Windows_NT
Path=C:\Program Files (x86)\Intel\iCLS Client\;C:\Program Files\Intel\iCLS Client\;C:\windows\system32;C:\windows;C:\windows\System32\Wbem;C:\windows\System32\WindowsPowerShell\v1.0\;C:\Program Files\Intel\Intel® Management Engine Components\DAL;C:\Program Files\Intel\Intel® Management Engine Components\IPT;C:\Program Files (x86)\Intel\Intel® Management Engine Components\DAL;C:\Program Files (x86)\Intel\Intel® Management Engine Components\IPT;C:\Program Files (x86)\Intel\OpenCL SDK\2.0\bin\x86;C:\Program Files (x86)\Intel\OpenCL SDK\2.0\bin\x64;C:\Program Files\Intel\WiFi\bin\;C:\Program Files\Common Files\Intel\WirelessCommon\;C:\Program Files (x86)\proXPN\bin
PATHEXT=.COM;.EXE;.BAT;.CMD;.VBS;.VBE;.JS;.JSE;.WSF;.WSH;.MSC
PROCESSOR_ARCHITECTURE=x86
PROCESSOR_ARCHITEW6432=AMD64
PROCESSOR_IDENTIFIER=Intel64 Family 6 Model 58 Stepping 9, GenuineIntel
PROCESSOR_LEVEL=6
PROCESSOR_REVISION=3a09
ProgramData=C:\ProgramData
ProgramFiles=C:\Program Files (x86)
ProgramFiles(x86)=C:\Program Files (x86)
ProgramW6432=C:\Program Files
PSModulePath=C:\windows\system32\WindowsPowerShell\v1.0\Modules\
PUBLIC=C:\Users\Public
SystemDrive=C:
SystemRoot=C:\windows
TEMP=C:\Users\Andy\AppData\Local\Temp
TMP=C:\Users\Andy\AppData\Local\Temp
USERDOMAIN=ANDY
USERDOMAIN_ROAMINGPROFILE=ANDY
USERNAME=Andy
USERPROFILE=C:\Users\Andy
windir=C:\windows
__COMPAT_LAYER=Installer
— Environment - End —
----- Setup - End: 2013-01-03 08:36:32 -----
It would seem I can manually print a pdf but it doesn’t produce when executing the vba code from excel. Still working perfectly on 5 win7 machines but fails only on new win8 machine. Is there any extra code or settings needed you can think of?
Cheers
Andy
Hi,
do you get any kind of error messages?
Can you somehow tell at what point it gets stuck?
regards,
Robin
Dim dtWaitingtime As Date
Dim dtHr As Date, dtMnt As Date, dtSec As Date
Application.ScreenUpdating = False
With Worksheets("Quotation")
.Visible = -1 ' <- make your hidden worksheet 'visible'
Dim pdfjob As PDFCreator.clsPDFCreator
Dim sPDFName As String
Dim sPDFPath As String
Dim bRestart As Boolean
'/// Change the output file name here! ///
sPDFName = Reference & ".pdf"
sPDFPath = "Z:\\####\" & ##### & "\" & Application.PathSeparator
If Dir(sPDFPath, vbDirectory) = "" Then MkDir sPDFPath
'Check if worksheet is empty and exit if so
If IsEmpty(ActiveSheet.UsedRange) Then Exit Sub
'Activate error handling and turn off screen updates
On Error GoTo EarlyExit
Application.ScreenUpdating = False
Set pdfjob = New PDFCreator.clsPDFCreator
'Check if PDFCreator is already running and attempt to kill the process if so
Do
bRestart = False
Set pdfjob = New PDFCreator.clsPDFCreator
If pdfjob.cStart("/NoProcessingAtStartup") = False Then
'PDF Creator is already running. Kill the existing process
Shell "taskkill /f /im PDFCreator.exe", vbHide
DoEvents
Set pdfjob = Nothing
bRestart = True
End If
Loop Until bRestart = False
'Amend the PDF Name if it already exists
' If Dir(sPDFPath & sPDFName) = sPDFName Then
' sPDFName = sPDFName & "_1"
' End If
'Assign settings for PDF job
With pdfjob
.cOption("UseAutosave") = 1
.cOption("UseAutosaveDirectory") = 1
.cOption("AutosaveDirectory") = sPDFPath
.cOption("AutosaveFilename") = sPDFName
.cOption("AutosaveFormat") = 0 ' 0 = PDF
.cClearCache
End With
'Print the document to PDF
ActiveSheet.PrintOut Copies:=1, ActivePrinter:="PDFCreator"
'Wait until the print job has entered the print queue
Do Until pdfjob.cCountOfPrintjobs = 1
DoEvents
Loop
pdfjob.cPrinterStop = False
'Wait until the file shows up before closing PDF Creator
' Do
' DoEvents
' Loop Until Dir(sPDFPath & sPDFName) = sPDFName
Application.Wait Now + TimeValue("00:00:02")
Dim str_folder As String
str_folder = "Z:\\#####\" & #### ' folder to open
Using the above code pulled from the website. I get no error messages, it shows as all the code gets executed and executes code after this point to send an email, but no physical pdf is created.