- ©«¤l
- 2035
- ¥DÃD
- 24
- ºëµØ
- 0
- ¿n¤À
- 2031
- ÂI¦W
- 0
- §@·~¨t²Î
- Win7
- ³nÅ骩¥»
- Office2010
- ¾\ŪÅv
- 100
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2012-3-22
- ³Ì«áµn¿ý
- 2024-2-1
|
¥»©«³Ì«á¥Ñ c_c_lai ©ó 2016-5-26 09:10 ½s¿è
¦^´_ 3# «Ø»Ê
±Nµ{¦¡¶K¦Ü ThisWorkbook ©Î¬O §Aªº¤u§@ªí³æ¤º (Ä´¦p¡G"Sheet1" ¡B"¤u§@ªí1") ©Î¬O¼Ò²Õ¤º (¦p¡GModule1¡B¼Ò²Õ1) §¡¥i¡C
¶¶¤â±N- With .Pictures.Insert(Mypath & E(2, 2) & ".jpg")
½Æ»s¥N½X ק令- ActiveSheet.Pictures.Insert(Mypath & E(2, 2) & ".jpg").Select
- With Selection
½Æ»s¥N½X ©Î¬O- .Pictures.Insert(Mypath & E(2, 2) & ".jpg").Select
- With Selection
½Æ»s¥N½X ³o¬O¦]¬°§A¤w¸g¦ì¦b With Sheets("xxxxx") ¤º¤F¡AActiveSheet §Y¬O«ü Sheets("xxxxx")¡C
¥H¤Î- For y = 0 To 9
- For x = 0 To 2
½Æ»s¥N½X ק令- For y = 0 To 1
- For x = 0 To 1
½Æ»s¥N½X ´N²Å¦X§Aªº´£°Ý¤F¡C |
|