Userform bladwijzers

Status
Niet open voor verdere reacties.

The Mad Man

Gebruiker
Lid geworden
15 aug 2007
Berichten
16
Ik heb de volgende code:

Code:
Private Sub CommandButton1_Click()

With ActiveDocument
    Selection.InlineShapes.AddPicture FileName:="C:\image.jpg", LinkToFile:= _
    False, SaveWithDocument:=True
End With

UserForm1.Hide
End Sub

Hiermee kan ik een afbeelding vanuit een userform in een document zetten. Het vervelende is dat de afbeelding aan het begin van het document word gezet. Weet iemand hoe ik de afbeelding bij een bladwijzer (bookmark) kan plaatsen?

Edit:
Met behulp van een macro is het me nu gelukt om de afbeelding te plakken bij een bladwijzer. Heeft iemand een idee hoe ik in het userform een optie kan maken dat je kunt kiezen tussen de afbeeldingen? Bijvoorbeeld met een combobox of een selectie button (radio button).
 
Laatst bewerkt:
Als je vantevoren een bookmark "plaatje" hebt gemaakt op de locatie waar het plaatje moet komen, dan kun je de volgende code gebruiken:
Code:
    Dim myRange As Range
    
    Set myRange = ActiveDocument.Bookmarks("plaatje").Range
    myRange.InlineShapes.AddPicture FileName:="C:\image.jpg", LinkToFile:= _
      False, SaveWithDocument:=True
 
Status
Niet open voor verdere reacties.

Nieuwste berichten

Terug
Bovenaan Onderaan