Issue with Text in Shapes

[Robnrolla]

Hello,

For some reason whenever I open up my workbook, the text in my shapes has automatically moved to the back so that it appears like there is no text in the shapes. So every time I re-open the workbook, the first thing I have to do is click on a shape and send the text to the front. This then moves all the text in each shape on the worksheet to the front.

There must surely be a way to stop this happening? please can someone help me fix this issue.

Thanks,

Rob

 

[Worf]

Hello Rob



Is the text an independent shape per se? Can you provide more detail on the objects you are working with?

 

[Robnrolla]

Yes apologies, it's a very simple flow chart. I am using a basic shape and using connector arrows to link each shape. The text in the shapes is dynamic as it links to a cell with text in another sheet. The text on the other sheet is using a very simple custom function written in VBA to replicate the name of the worksheet. Each shape also has a hyperlink to the worksheet that it represents.

I hope that makes sense? Thank you for your assistance.

 

[Worf]

My idea is to use VBA and force the shape to update. See if the code below does the trick.

' sheet module

Private Sub Worksheet_Activate()
Me.Shapes("Diamond 22").OLEFormat.Object.Formula = "=plan1!h41"
End Sub