- ©«¤l
- 549
- ¥DÃD
- 152
- ºëµØ
- 0
- ¿n¤À
- 691
- ÂI¦W
- 0
- §@·~¨t²Î
- WIN7
- ³nÅ骩¥»
- OFFICE 2010
- ¾\ŪÅv
- 50
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2013-8-10
- ³Ì«áµn¿ý
- 2022-9-7
|
¦^´_ 9# ã´£³¡ªL
·PÁª©¤j,§Ú±q¥H«e´N¤@ª½¤£«Å§iµ{¦¡½X,¦ý¹ê»Ú¤W¤£¬O¦]¬°§Ö³t,¦Ó¬O¦]¬°¤£ª¾¹D«¬ºA
¦³¤FTypeName,´N¥i¥Hª¾¹D©Ò¦³ªº«¬ºA¤F,«D±`·PÁª©¤j
¦]¬°¨C¦¸¬Ý°ª¤â¼gµ{¦¡½X,³£·|±j¨î«Å§i,ÁקK¿ù»~,¦ý¦Û¤vµLªk¿ì¨ì,²{¦b´N¥i¥Hª¾¹D©Ò¦³ªº«¬ºA¤F,·PÁª©¤j
¥B
For Each SHP In ActiveSheet.DrawingObjects
If TypeName(SHP) = "Picture" Then SHP.Delete
Next
³o¬qµ{¦¡½X¤]«Ü¦n¥Î®@!·P®¦! |
|