Resizing Inkpicture ink before pasting

[shim3001]

Hi,

Is there any way to resize the ink from an inkpicture control before pasting from a userform to a bookmark in Word.

Current code

InkPicture1.Ink.ClipboardCopy
ActiveDocument.Bookmarks("signature").Select
Selection.Paste

However due to the current size of the inkpicture control on the userform being large to input a signture, it pastes at the same size into the bookmark on the word document.
I was wondering if there was a way to resize the ink before pasting into the document.

Any help would be appreciated.

[Aussiebear]

This section of code adjusts your image size. Perhaps this might give you some ideas?

Sub PicResize()
    Dim PercentSize As Integer
    PercentSize = 75
    If Selection.InlineShapes.Count > 0 Then
        Selection.InlineShapes(1).ScaleHeight = PercentSize
        Selection.InlineShapes(1).ScaleWidth = PercentSize
    Else
        Selection.ShapeRange.ScaleHeight Factor:=(PercentSize / 100), RelativeToOriginalSize:=msoCTrue
        Selection.ShapeRange.ScaleWidth Factor:=(PercentSize / 100), RelativeToOriginalSize:=msoCTrue
    End If
End Sub