Entering image in to a worksheet from user form

HI every one

I have a user form that uploads and image from file into an image box/frame, the form also has a couple of Combo boxes and textboxes. I am trying to save the information from the user form to a worksheet with the following code:

Private Sub Cmdadd_Click()
Dim iRow As Long
Dim ws As Worksheet
Set ws = Worksheets("Area 1")

'find first empty row in database
iRow = ws.Cells.Find(What:="*", SearchOrder:=xlRows, _
SearchDirection:=xlPrevious, LookIn:=xlValues).Row + 1

With ws
.Cells(iRow, 1).Value = Me.Image1.Value
.Cells(iRow, 2).Value = Me.ComboBox1.Value
.Cells(iRow, 3).Value = Me.ComboBox2.Value
.Cells(iRow, 4).Value = Me.TextBox2
.Cells(iRow, 5).Value = Me.TextBox3
.Cells(iRow, 6).Value = Me.TextBox6
.Cells(iRow, 9).Value = Me.TextBox4
.Cells(iRow, 8).Value = Me.TextBox5
End With

End Sub

All the information apart from the image are being moved to the worksheet. I'm not to sure what I am doing wrong.

Thank you for your help

Tony

Here's something that you can maybe modify or at least send you in the right direction.

Thanks guitarsweety

I am very new to VBA and can't work out where I would have to change the code, to get the information from the userform to the correct location on my worksheet.

thanks for your help anyway

Tony

Can you attached your workbook?

HI guitarsweety

The wookbook is to large to upload on to the site.

thaks

Tony

Good luck to you, I'm afraid I'm not much help to you without seeing what you're working with

HI Norie

I have added ActiveX image control to sheet, which worked fine with the first picture, but when trying to add another picture it is replacing the first and not moving down to the next row??