- ©«¤l
- 84
- ¥DÃD
- 13
- ºëµØ
- 0
- ¿n¤À
- 104
- ÂI¦W
- 0
- §@·~¨t²Î
- XP
- ³nÅ骩¥»
- SP3
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2012-8-10
- ³Ì«áµn¿ý
- 2018-4-21
|
¦^´_ 4# GBKEE
ü§r¡I§Ú«ç»òªá¶O³o»ò¦h®É¶¡¦b³o¨à¡Aì¨Ó¥un§â¿ï¶µ§ï¤@§ï´N¦n¤F¡A®`§Ú¼g¤F¤@°ï»yªk¡C¤£¹L§Ú¤]±q¤¤¾Ç¤F¤@¨Ç¡C
¹³³o¼Ë¥ý§R°£¹Ï¤ù¡A¥H§K²Ä¤G¦¸¶}¬¡¶Ã¯´N·|¥X²{¹Ï¤ù¤j°ïÅ|
ActiveSheet.Shapes.SelectAll
Selection.Delete
¦A¨Ó´N¬O¦b¥t¤@Ó¬¡¶Ã¯¶K¹Ï¡A±q¨º¨à½Æ»s¹L¨Ó
Sheets("sheet1").Shapes(1).Copy
ActiveSheet.Paste Destination:=Sheets("¦¨ÁZ³æ").Range("a" & 1 + 26 * j) |
|