Top-Themen

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

gelöst Bild per Makro in Word 2000 einfügen

Mitglied: imebro

imebro (Level 2) - Jetzt verbinden

25.11.2014, aktualisiert 12:35 Uhr, 1435 Aufrufe, 4 Kommentare, 1 Danke

Hallo,

ich möchte gerne ein Bild (jpg) mit einer Unterschrift per Makro in ein Word-Dokument einfügen.
Grundsätzlich funktioniert das gut...
Ich stehe mit dem Cursor an der Stelle, wo die Unterschrift stehen soll und klicke auf das Makro, welches ich in der Symbolleiste hinterlegt habe.

Dadurch wird die Unterschrift (also das JPG-Bild) auch eingefügt.
Allerdings wird die Unterschrift dann nicht korrekt angezeigt, da sie nicht mit "vor den Text" formatiert ist.

Das gleiche habe ich dann über ein weiteres Word-Dokument versucht, in die ich lediglich die Unterschrift eingefügt habe.
Diese Unterschrift habe ich dann schon mit Layout "vor dem Text" formatiert.
Wenn ich dann mit dem Makro diese Datei öffnen und die Unterschrift in das andere Word-Dokument einfügen lasse, wird die Unterschrift immer ganz oben im Dokument eingefügt und nicht dort, wo ich mit dem Cursor stehe.

Nun meine Fragen dazu:

1) Wie kann ich ein JPG automatisch so in ein Word-Dokument an einer bestimmten Stelle einfügen, dass es VOR DEM TEXT steht?

....1a) Gibt es ggf. eine Möglichkeit, das JPG selbst so zu speichern, dass es immer VOR DEM TEXT eingefügt wird?

2) Wie kann ich die in einem Word-Dokument eingefügte und richtig formatierte Unterschrift an meiner Cursor-Position einfügen lassen?

Danke und Gruss,
imebro
Mitglied: colinardo
LÖSUNG 25.11.2014, aktualisiert um 12:35 Uhr
Hallo imebro,
habe jetzt kein altes Word 2000 da um es zu testen ob die verwendeten Funktionen und Eigenschaften dort schon verfügbar sind, aber probier's mal hiermit:
01.
Sub InsertPicture() 
02.
    Dim img As InlineShape, shp As Shape 
03.
    Set img = Selection.InlineShapes.AddPicture("E:\Bilder\Unterschrift.png") 
04.
    Set shp = img.ConvertToShape 
05.
    shp.WrapFormat.Type = wdWrapNone 
06.
End Sub
Grüße Uwe
Bitte warten ..
Mitglied: imebro
25.11.2014 um 12:37 Uhr
Hallo Uwe,

WOW... danke für die schnelle Hilfe.
Hat wunderbar funktioniert.
Zwar ist die Unterschrift noch etwas zu groß für den Zwischenraum für die Unterschrift, aber das kann ich ja einfach dadurch ändern, dass ich die Unterschrift im JPG einfach verkleinere.

Von daher - klappt prima!!

Danke und schöne Grüße,
imebro
Bitte warten ..
Mitglied: colinardo
25.11.2014 um 13:00 Uhr
Zitat von imebro:
Zwar ist die Unterschrift noch etwas zu groß für den Zwischenraum für die Unterschrift,
das kannst du wenn du willst auch im Code mit
01.
shp.Width = 200 
02.
shp.Height = 150
anpassen.

Grüße Uwe
Bitte warten ..
Mitglied: imebro
25.11.2014 um 13:35 Uhr
...oh, danke,
das ist natürlich noch einfacher

Schöne Grüße,
imebro
Bitte warten ..
Ähnliche Inhalte
Grafik

Stapelverarbeitung Bild in neues Bild einfügen

Frage von KodaCHGrafik3 Kommentare

Guten Morgen Ich habe hier einen Ordner mit ganz vielen Bildern. Die grösse ist komplett unterschiedlich. Nun habe ich ...

Microsoft Office

Bilder in Excel automatisch einfügen

gelöst Frage von GundelputzMicrosoft Office2 Kommentare

Hallo alle da draussen, ich möchte in Excel ein Angebot erstellen welches mir auf Grund der Artikelnummer ein Bild ...

Microsoft Office

Excel Makro - Bild einbetten zur Offlineverwendung

gelöst Frage von schuhmannMicrosoft Office2 Kommentare

Hallo zusammen, ich habe eine Excel-Datei mit dutzenden Artikelnummern und möchte neben jede Artikelnummer ein Artikelbild per Makro einfügen. ...

Windows 10

Bilder aus der Zwischenablage einfügen - unterschiedliches Verhalten auf Word vs. Wordpad

Frage von DerWoWussteWindows 108 Kommentare

Moin Kollegen, ich will mein Problem nicht in Gänze ausbreiten, denn es ist komplex, um nicht zu sagen "bizarr". ...

Neue Wissensbeiträge
Humor (lol)

WhatsApp-Nachrichten endlich auch per Bluetooth versendbar

Information von BassFishFox vor 10 StundenHumor (lol)2 Kommentare

Genau darauf habe ich gewartet! ;-) Der beliebte Messaging-Dienst WhatsApp erhält eine praktische neue Funktion: Ab dem nächsten Update ...

Google Android

Googles "Android Enterprise Recommended" für Unternehmen

Information von kgborn vor 22 StundenGoogle Android3 Kommentare

Hier eine Information, die für Administratoren und Verantwortliche in Unternehmen, die für die Beschaffung und das Rollout von Android-Geräten ...

Sicherheit

Intel gibt neue Spectre V2-Microcode-Updates frei (20.02.2018)

Information von kgborn vor 23 StundenSicherheit

Intel hat zum 20. Februar 2018 weitere Microcode-Updates für OEMs freigegeben, um Systeme mit neueren Prozessoren gegen die Spectre ...

Microsoft
ARD-Doku - Das Microsoft Dilemma
Tipp von Knorkator vor 1 TagMicrosoft3 Kommentare

Hallo zusammen, vor einigen Tagen lief in der ARD u.a. Reportage. Das Youtube Video dazu dürfte länger verfügbar sein. ...

Heiß diskutierte Inhalte
Windows Server
AD DS findet Domäne nicht, behebbar?
Frage von schapitzWindows Server45 Kommentare

Guten Tag, ich habe bei einem Kunden ein Problem mit den AD DS. Umgebung ist folgende: Windows Server 2016 ...

Router & Routing
LANCOM VPN CLIENT einrichten
Frage von Finchen961988Router & Routing27 Kommentare

Hallo, ich habe ein Problem und hoffe ihr könnt mir helfen, wir haben einen Kunden der hat einen Speedport ...

Router & Routing
ISC DHCP 2 Subnetze
gelöst Frage von janosch12Router & Routing19 Kommentare

Hallo, ich betreibe bei mir im Netzwerk einen ISC DHCP Server auf Debian, der DHCP verwaltet aktuell ein /24 ...

Server-Hardware
Welche Rolle spielt Design bei Enterprise IT Hardware?
Frage von ApolloXServer-Hardware16 Kommentare

Ich arbeite für einen internationalen Elektronikhersteller in der Forschung und meine Aufgabe ist es, Feedback von Nutzern in Hinsicht ...