für meine jetzigen Zwecke war der Code ausreichend, da die Bilder schon in der richtigen Größe vorliegen und ich aus dem Dokument eine PDF erstellen lasse.
Die Funktion zum Skallieren habe ich mir jedoch trotzdem mal genauer betrachtet, weil das u.U. interessant für andere Projekte sein könnte.
Bei der Dekleration von "Original_SizePixel" , "Size_max" und "Size" habe ich jedoch ein Problem, weil ich nicht weiß worauf ich die Objekte deklarieren muss.
Ich habe es jetzt erst einmal so probiert:
Code: Alles auswählen
Dim Original_SizePixel As Object = oSM.createInstance("com.sun.star.awt.Size")
Dim Size_max As Object = oSM.createInstance("com.sun.star.awt.Size")
Dim Size As Object = oSM.createInstance("com.sun.star.awt.Size")
Sprich er kann mit ".width" und ".height" nichts anfangen, weil ich wohl das Objekt falsch deklariert habe.