VBA for border change

[Guest]

Hi All

Is there a method to alter the border of an inbedded picture (it is unbedded
as it is the company logo so will not bloat too much). It works fine with
most other controls just not this logo.

Something like

If Me.SomeField1 = 123 Then
Me.SomePicture.SpecialEffect = raised
Else
Me.SomePicture.SpecialEffect = flat
End If


Looks as if it should be really simply and I am sure it's possible - I just
like the idea if it is possible.

Many thanks

 

[Douglas J. Steele]

That's exactly what it is, but the values for SpecialEffect are integer:

Setting Value Constant
Flat 0 acEffectNormal
Raised 1 acEffectRaise
Sunken 2 acEffectSunken
Etched 3 acEffecteEtched
Shadowed 4 acEffectShadow
Chiseled 5 acEffectChisel