![]() |
|
#1
|
|||
|
|||
|
Hello
![]() I need a macro, which opens a folder, where I have my pictures. Then, depending on which picture I choose, it should insert a certain text. The pictures will be inserted in a table cell and the text should appear in the next table cell. For better understanding, I need it to insert warning signs in manuals and the description of the warning signs. So the pictures and descriptions are always the same. To open the Folder, I thought, something like this could work: Code:
Dim sPath As String
Dim sPicPath As String
Dim lRes As Long
sPicPath = "C:\Temp"
sPath = Options.DefaultFilePath(path:=wdPicturesPath)
Options.DefaultFilePath(path:=wdPicturesPath) = sPicPath
lRes = Application.Dialogs(wdDialogInsertPicture).Show
Options.DefaultFilePath(path:=wdPicturesPath) = sPath
Thank you for your time
|
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
| Mail Merge Rules - IF, OR Function to Insert Specific text | larry11 | Mail Merge | 2 | 06-25-2017 06:15 AM |
| Insert Text with specific Font Size | Nick70 | PowerPoint | 1 | 08-10-2016 09:56 AM |
| How to insert text at specific location as bold | PRA007 | Word VBA | 7 | 01-05-2016 10:12 PM |
Macro to Insert text into the beginning on specific paragraphs unless the paragraph is blank
|
caboy | Word VBA | 2 | 04-01-2015 07:00 AM |
how to create menu shortcut to insert specific picture
|
msworddave | Word | 1 | 05-08-2013 02:00 AM |