That did it !! THANKS !!

Richard

Michel Pierron wrote:
Hi Richard,

With myPictArea
.Placement = xlMoveAndSize
.Object.BackColor = RGB(255, 255, 255) ' White background
.Object.BorderStyle = 0
End With

Regards,
MP


"Richard" a écrit dans le message de news:
...
Help: I create an object using:
myPictArea = ActiveSheet.OLEObjects.Add(ClassType:="Forms.Image .1"
etc...

HOW can I have NO discernable border on that created Area?? Each time I
load up an image in that object, I get a Border around it.

I tried giving it the xlLineStyleNone (see below) to no avail - there
is still a BLACK border appearing around the object. Is there a way to
have no border/frame, so it is not visible at all ? (

With myPictArea
.Placement = xlMoveAndSize
.Object.BackColor = RGB(255, 255, 255) ' White background
.Border.LineStyle = xlLineStyleNone
End With

Thanks for your help!

R