I've forgotten something, I can't use OCX cause this code has to work from different workstations with different OSs. But maybe there is another way to solve the problem.
I have the same problem. There is a prog called PDF-Append but I didn't get this tool correct to work.
But here is my Codepiece:
Dim stDocName As String
stDocName0 = "Ber 25 Übersicht Fahrzeuge"
stDocName1 = "Ber Diagr 290 Gemischadaption additiv"...
Hi!
I've a lil' problem here:
Private Sub Befehl27_Click()
On Error GoTo Err_Befehl27_Click
Dim stDocName As String
Dim stLinkCriteria As String
Dim Welche As Variant
Dim Statusr As String
If option1 = 1 Then
Welche = -1
Statusr = "[status]>"
End...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.