I'm wondering. Are there any Macros that hide objects
Thank you. It is perfect. I want another way of hiding objects. I select the object and run "Macro" the unselected object will be hidden
Does anyone help me?
Sub HideUnselected()Dim sr As ShapeRange, asr As ShapeRangeSet sr = ActiveSelectionRangeSet asr = ActivePage.Shapes.Allasr.RemoveRange srActiveDocument.BeginCommandGroup (hide_unselected)For Each sh In asrsh.Visible = FalseNext
ActiveDocument.EndCommandGroupEnd Sub
Instead of using a for...next loop, could you instead use the ShapeRange.Hide method?
ShapeRange .Hide method is much better solution then a loop. Thanks