Macro to work on picture   

Hi i need to record macro which inserts an image(From file) in to the image 
control. How do i go about doing this

date: Wed, 2 Jul 2008 03:55:01 -0700   author:   Geetha Naidu

Re: Macro to work on picture   

Hello Geetha
you can try this

    Dim sFile As String
    Dim myDialog As Dialog
    Set myDialog = Dialogs(wdDialogInsertPicture)

    With myDialog
        .Display
        sFile = .Name
    End With

    Image1.Picture = Nothing
    Image1.Picture = LoadPicture(sFile)
    Image1.AutoSize = True



"Geetha Naidu"  写入消息 
news:D1484F61-95DA-4471-A9D4-D230D791B5E9@microsoft.com...
> Hi i need to record macro which inserts an image(From file) in to the 
> image
> control. How do i go about doing this

date: Fri, 5 Sep 2008 00:10:35 +0800   author:   Kyle.Zhang