Problem with the Fill property

N

nartla

Hello,

I am working on an app developped with Access/VBA, and which creates
Excel Reports.

I have developed a function which creates a textbox (Shape object) in
the Excel document, writes a character into it, and makes it
transparent. The code runs perfectly on several PCs, but on some
machines, I get an error message displaying "Invalid type".

I do not understand where the problem comes from, as all the PCs
where I made the testings run the same version of Excel (2003) and
Access (2003).

Here is the code where the problem occurs :
The bug occurs in the line N° 59, where I try to access the .Fill
property of the shape object.

Dim shpSymbole As Shape

(some code goes here)

58 With shpSymbole
59 With .Fill
60 .Visible = msoTrue
61 .Transparency = 1#
62 End With

(some code goes here)

Thank you for any idea or hint.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top