Unhide Picture Using msoFalse
I suppose it cannot find the picture and fails on the ActiveSheet
instruction. No need to select - Sub test() s$ = "Rectangle 1" HideUnhide s, False Stop HideUnhide s, True End Sub Sub HideUnhide(sName As String, bVisible As Boolean) ActiveSheet.Shapes(sName).Visible = bVisible End Sub Regards, Peter T "Marvin" wrote in message ... I am using Excel 2003 and executed the following macro command; ActiveSheet.Shapes("P25%").Select Selection.ShapeRange.Visible = msoFalse I cannot reverse the process and receive and error if I use msoTrue. I suppose it cannot find the picture and fails on the ActiveSheet instruction. I cannot find any menu item to unhide this picture. HELP! |
All times are GMT +1. The time now is 02:13 PM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com