PDF thumbnails from VBA
I was asked to develop a form where user can see a pdf thumbnail of a pdf file. It was pretty far from what I have been developing so I decided to use "uncle" google to find a solution. There are some solutions but nothing what was expecting. You can use paid version of Adobe or free Adobe Acrobat ActiveX (Acropdf1) or some others free tools that can work along a pdf file. I tested only the free version of Acrobat ActiveX component and it was really nightmare. Then I found a C# project using the GhostScript tool for creating a pdf thumbnail. Unfortunatelly VBA cannot work with this project directly. Read more to find solution.
As I mentioned you can use the Acropdf1 activeX which is automatically installed with the Adobe Reader application.
How to add the Acropdf1 activeX on a VBA form
At the first time the activeX seemed to be a good solution but then I found two "bugs". The first one is more important than the second one. The activeX takes focus and never give it back and if you press the "TAB" key, then the whole application will crash. It's very known bug but Adobe cannot fix it for some reason. And the second bug rather behavior - of the activeX control is uncomfortable - it always takes focus and never give it back and also you don't have option to find out if a pdf document is fully loaded or not. My client was complaining about that for many times so I decided to find another solution.
I found code from Matthew Ephraim. where he uses a free tool Ghostscrip and .NETFramework 3.5 and C#. Form Visual Studio you can use his tool without any problems just include it into your project. Unfortunately we cannot use his dll directly from VBA. That was the reason why I took his code and made a little adjustment to expose methods from his project to the COM object.
Now - after registration the dll to your system - you can reference the dll as usually and use it !!! And it works great.
Who is interested how to create a C# dll that can work with VBA I attached the zip file with entire C# solution. Look at the Attachment section.
And who just want to use it as soon as possible, download the installer and install it. I also prepare a sample and you can find everything in the Attachment section.
The installer just check if your system contains the .NETFramework 4 and if not, it will suggest to download it and then register the dlls into your system.
Your code can look like this one
and then you can take the output file as an ordinary image file and load it - for example - to an image control.
Option Explicit
'********************************************************************************
'TestPDFThumbnailGeneration
'
' Purpose: It uses reference to GhostscriptWrapper library.
' From a pdf file creates a jpg file that represents a thumbnail of the pdf.
' You can set page number and DPI quality.
'
' Inputs: -none-
'
' Outputs: -none-
'
' Created: 02/10/2011 Premysl Lazecky
'
' Modified: .
'
'********************************************************************************
Sub TestPDFThumbnailGeneration()
Dim PDF As GhostscriptWrapper
Dim strPath As String
Dim strInputFile As String
strInputFile = "Test.pdf"
strPath = ActiveWorkbook.Path
If Right$(strPath, 1) <> Application.PathSeparator Then
strPath = strPath & Application.PathSeparator
End If
Set PDF = New GhostscriptWrapper
PDF.GeneratePDFThumb inputPath:=strPath & strInputFile, _
outputPath:=strPath & "Output.jpg", _
Page:=1, _
Width:=72, Height:=72
Set PDF = Nothing
End Sub
As the result of this code you will get a jpg file called Output.jpg with thumbnail of defined page in the pdf file - in this case page 1 - with defined resolution.
Attachments
Installer and sample files
C# project
Komentáře
Přehled komentářů
https://telegra.ph/Igrovye-avtomaty-v-yakutske-12-17#Ргровые автоматы РІ якутске
https://telegra.ph/Filmy-s-ogrableniyami-kazino-12-18#Фильмы с ограблениями казино
https://telegra.ph/Besplatnye-igrovye-avtomaty-igrat-admiral-12-17#Бесплатные игровые автоматы играть адмирал
https://telegra.ph/Igrovye-avtomaty-90-h-poker-12-18#Ргровые автоматы 90 С… покер
https://telegra.ph/Igra-banki-igrovye-avtomaty-12-18#РРіСЂР° банки игровые автоматы
https://telegra.ph/Igrovye-avtomaty-slot-igrat-besplatno-onlajn-vse-igry-igrat-12-17#Ргровые автоматы слот играть бесплатно онлайн РІСЃРµ РёРіСЂС‹ играть
https://telegra.ph/Vulkan-avtomaty-bezdepozitnyj-bonus-12-17#Вулкан автоматы бездепозитный бонус
https://telegra.ph/Igrovoj-avtomat-super-dzhamp-igrat-i-12-17#РРіСЂРѕРІРѕР№ автомат супер джамп играть i
https://telegra.ph/Igrovye-avtomaty-fresh-12-17#Ргровые автоматы фреш
https://telegra.ph/Sozdadim-i-kazino-12-18#Создадим i казино
https://telegra.ph/Kazino-royal-film-agent-007-12-17#Казино рояль фильм агент 007
https://telegra.ph/Besplatno-igrat-v-igrovye-avtomaty-bez-registracii-i-sms-admiral-12-17#Бесплатно играть в игровые автоматы без регистрации и смс адмирал
https://telegra.ph/Igrovye-avtomaty-stavka-ot-50-rublej-12-17#Ргровые автоматы ставка РѕС‚ 50 рублей
https://telegra.ph/Igrovoj-avtomaty-onlajn-besplatno-igrat-bez-registracii-777-12-17#РРіСЂРѕРІРѕР№ автоматы онлайн бесплатно играть без регистрации 777
https://telegra.ph/Simulyator-igrovyh-avtomatov-igra-besplatno-12-18#Симулятор игровых автоматов игра бесплатно
https://telegra.ph/Demo-sloty-pragmatik-12-17#Демо слоты прагматик
https://telegra.ph/Onlajna-kazino-12-17#Онлайна казино
https://telegra.ph/Igrovye-amerikanskie-avtomaty-igrat-besplatno-onlajn-12-17#Ргровые американские автоматы играть бесплатно онлайн
https://telegra.ph/Kazino-ruletku-12-18#Казино рулетку
https://telegra.ph/Posmotret-vse-igrovye-avtomaty-igrat-12-18#Посмотреть все игровые автоматы играть
https://telegra.ph/Poker-dom-sloty-kakie-12-17#Покер дом слоты какие
https://telegra.ph/Igrat-v-2000-goda-igrovye-avtomaty-besplatno-bez-registracii-12-17#Рграть РІ 2000 РіРѕРґР° игровые автоматы бесплатно без регистрации
https://telegra.ph/Igrat-v-demo-azartnye-igry-besplatno-bez-registracii-na-igrovyh-avtomatah-12-18#Рграть РІ демо азартные РёРіСЂС‹ бесплатно без регистрации РЅР° игровых автоматах
https://telegra.ph/Igrovaya-zona-vladivostok-foto-12-17#Ргровая Р·РѕРЅР° владивосток фото
https://telegra.ph/Vulkan-akcii-12-17#Вулкан акции
zaaheng.com เว็บหวย เปิดใหม่ จ่ายเยอะ
(Briansip, 15. 1. 2023 22:52)zaaheng.com เว็บหวย เปิดใหม่ จ่ายเยอะ https://zaaheng.com - https://zaaheng.com
https://telegra.ph/Cassinos-em-brasil-01-08#Cassinos em brasil
(Geraldstarm, 15. 1. 2023 1:12)
https://telegra.ph/Casinos-online-brasil-01-08#Casinos online brasil
https://telegra.ph/Best-time-to-play-live-poker-01-08#Best time to play live poker
https://telegra.ph/Live-poker-coverage-01-08#Live poker coverage
https://telegra.ph/Betfair-live-roulette-01-08#Betfair live roulette
https://telegra.ph/Real-live-poker-online-01-08#Real live poker online
what is the passto?
(Charlessem, 14. 1. 2023 23:37)PassTo, making currency transactions easy, is committed to becoming the currency exchange benchmark in the financial industry. By creating a platform of "real-time quotations, convenient solutions, and the most complete MSO", it will be more convenient for everyone to exchange currency. During your currency transactions, PassTo will never be absent. home page: <u>https://www.passto.io/</u>
TilsPlosyIcojemiwele
(VernonDon, 12. 1. 2023 16:44)
https://vk.com/@-190536737-hardcore-naked-metal-girls
XXX site listing
(Tyronecem, 12. 1. 2023 8:02)
Source:
- https://fucktubeporn.xyz
tube porn
best womens gifts for christmas
(GeraldLeami, 11. 1. 2023 3:35)best womens gifts for xmases https://amzn.to/3BEmtev
best womens gifts for christmas
(GeraldLeami, 10. 1. 2023 22:37)best females presents for christmas https://amzn.to/3BEmtev
what is the passto?
(Charlessem, 10. 1. 2023 16:43)PassTo, making currency transactions easy, is committed to becoming the currency exchange benchmark in the financial industry. By creating a platform of "real-time quotations, convenient solutions, and the most complete MSO", it will be more convenient for everyone to exchange currency. During your currency transactions, PassTo will never be absent. home page: <u>https://www.passto.io/</u>
video cp
(RihardKaf, 7. 1. 2023 1:32)
Lolita Girls Fuck Collection
loli video cp
yal.su/jCs
s.yjm.pl/BbtC
tw.uy/tw11l
This is my new video What do you think?
(Alexevacy, 6. 1. 2023 4:43)
Look my new video at Youtube https://www.youtube.com/watch?v=ePnGcs-M-4w
ice hack torches 13 lbs each week Plac\e ic\\e below to go down 2 lbs over night Ice + THIS = 2 pounds lighter by tomorrow
(JohnnyTwIva, 6. 1. 2023 0:44)
10-Second Metabolic Process Rate Examination.
10-Sec At Home Examination for Slow Metabolic Rate.
Inspect Your Metabolic Rate With This 10-Sec Test.
https://healthyfit.yivesites.com/that-instantly-turbo-charges-your-metabolism-by-450-or-more
ice hack lanterns 13 lbs weekly Put ic\\e HERE to go down 2 lbs over night Ice + THIS = 2 lbs lighter by tomorrow
(JohnnyTwIva, 5. 1. 2023 21:10)
1 Breakfast Mistake Packs On Flab.
Do not do THIS in the early morning (boosts stubborn belly fat).
# 1 Breakfast Error Slows Down Metabolic Rate. https://healthyfit.yivesites.com/that-instantly-turbo-charges-your-metabolism-by-450-or-more
ice hack lanterns 13 lbs every week Plac\e ic\\e right here to drop 2 lbs over night Ice + THIS = 2 pounds lighter by tomorrow
(JohnnyTwIva, 5. 1. 2023 15:53)
Fat mother now appears like THIS (down 62 lbs).
5-sec ice hack assists Mommy of 3 thaw 62 lbs.
Mom's revenge on her stubborn belly fat.
https://healthyfit.yivesites.com/that-instantly-turbo-charges-your-metabolism-by-450-or-more
Jaké stránky představují sex jako umění?
(TonyaAgeme, 5. 1. 2023 11:19)
Ahoj všichni!
Přemýšlel jsem, kde najít dobré články o sexu a erotice, se správnými radami a popisem praktické stránky.
Po procházení mnoha webů jsem se osobně rozhodl pro https://www.erotical.ru
Žádná reklama a něco vulgárního a špinavého, jen text a nejdůležitější informace!
Nestyďte se, sex a erotika jsou důležitými motivátory v životě lidí a párů)
Budu rád, když se vám tyto informace hodí!
Přeji vám dobré čtení a vývoj!
ice hack torches 13 pounds each week Put ic\\e below to drop 2 lbs over night Ice + THIS = 2 lbs lighter by tomorrow
(JohnnyTwIva, 5. 1. 2023 3:34)
Fat mama now resembles THIS (down 62 lbs).
5-sec ice hack helps Mama of 3 thaw 62 lbs.
Mommy's revenge on her belly fat.
https://hop.clickbank.net/?affiliate=ivobee&vendor=alpilean&pg=vid
Girls Girls
(Lerybiato, 4. 1. 2023 18:36)
Lolita Girls Fuck Garnering
loli video cp
yal.su/jCs
s.yjm.pl/BbtC
tw.uy/tw11l
https://colab.research.google.com/drive/1Ydo7wlR3yUHa4PIUqLGbd2MabF-vUAa0?usp=sharing
(Thomasjex, 3. 1. 2023 12:14)
https://colab.research.google.com/drive/1c5gThRuN5lBuqLLoG9kGLab_58szrMyN?usp=sharing
https://colab.research.google.com/drive/10-8lxKlErq94R7CqmUzGiHGF8gXlT6zO?usp=sharing
https://colab.research.google.com/drive/1_OdtEErjvxW3iLhwPKh0wvH5xT_1pBfw?usp=sharing
https://colab.research.google.com/drive/1pH5bXr6oF7C5WIuE4rN54x9TSMdWi2ED?usp=sharing
https://colab.research.google.com/drive/1YX1UkHyXx1vi2_JmSHCFpEDTY8cwkAXW?usp=sharing
education for crna
(Dennisdouby, 3. 1. 2023 9:08)
Education and learning is the process of obtaining or providing organized direction, specifically at a official setting. Understanding is the procurement of understanding or abilities via research, experience, or being educated.
https://theeducationtraining.com/ - shin se-kyung education...
1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 | 11 | 12 | 13 | 14 | 15 | 16 | 17 | 18 | 19 | 20 | 21 | 22 | 23 | 24 | 25 | 26 | 27 | 28 | 29 | 30 | 31 | 32 | 33 | 34 | 35 | 36 | 37 | 38 | 39 | 40 | 41 | 42 | 43 | 44 | 45 | 46 | 47 | 48 | 49
https://telegra.ph/Fresh-casino-201-12-17#Fresh casino 201
(Dennisbot, 16. 1. 2023 8:40)