K
karmela
Hi,
I have sheet, where there is a picture named Object 1 (an in formula bar is
formula =INSERT("Word.Picture.8";"") ) - this I need to leave on the Sheet.
Then there is Group11, which I need to delete
I have this part of macro but it deletes both objects.
Sheets(hlavni).Select
ActiveSheet.DrawingObjects.Delete
I tried also this code, but it didn't find anything.
For Each shp In ActiveSheet.Shapes
If shp.Type = msoGroup Then
shp.Delete
End If
Next shp
Could anyone find a mistake?
Thanks karmela
I have sheet, where there is a picture named Object 1 (an in formula bar is
formula =INSERT("Word.Picture.8";"") ) - this I need to leave on the Sheet.
Then there is Group11, which I need to delete
I have this part of macro but it deletes both objects.
Sheets(hlavni).Select
ActiveSheet.DrawingObjects.Delete
I tried also this code, but it didn't find anything.
For Each shp In ActiveSheet.Shapes
If shp.Type = msoGroup Then
shp.Delete
End If
Next shp
Could anyone find a mistake?
Thanks karmela