If I follow you correctly I think you should do something like this:

Selection.Height = Range("A4:H15").Height
Selection.Width = Range("A4:H15").Width

--
Jim
"Christina" wrote in message
...
| Hello All,
|
| I Have a problem of using Excel Camera command in my macro. Here is my
codes:
|
| ActiveSheet.Range("A4:H15").Select
| Selection.Copy
| ActiveSheet.Pictures.Add(201.75, 192.75, 375, 328.5).Select
| Selection.Height = 294
| Selection.Width = 410.25
|
| It works well in most of my computer. However, I have a problem in one
| computer. The content of the range A4:H15 that I size it to fit with the
| width 410.25 and the height = 294 is larger than the normale and it also
move
| a little to the left. I think the problem is from the printer
configuration
| but I do not know which part. Any clue will be very appreciated.
|
| Christine