ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

[µo°Ý] ¦Û°Ê´¡¤J¹Ï¤ù

¥»©«³Ì«á¥Ñ 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
  1.     With .Pictures.Insert(Mypath & E(2, 2) & ".jpg")
½Æ»s¥N½X
­×§ï¦¨
  1.     ActiveSheet.Pictures.Insert(Mypath & E(2, 2) & ".jpg").Select
  2.     With Selection
½Æ»s¥N½X
©Î¬O
  1.     .Pictures.Insert(Mypath & E(2, 2) & ".jpg").Select
  2.     With Selection
½Æ»s¥N½X
³o¬O¦]¬°§A¤w¸g¦ì¦b With Sheets("xxxxx") ¤º¤F¡AActiveSheet §Y¬O«ü Sheets("xxxxx")¡C
¥H¤Î
  1.         For y = 0 To 9
  2.             For x = 0 To 2
½Æ»s¥N½X
­×§ï¦¨
  1.         For y = 0 To 1
  2.             For x = 0 To 1
½Æ»s¥N½X
´N²Å¦X§Aªº´£°Ý¤F¡C

TOP

¦^´_ 6# ML089
§Ú¥u¬O¸Ñµª #3 ªº´£°Ý¦Ó¤w¡A¨ä¹ê§A #5 ªº½d¨Ò
¤]ÆZ¤£¿ùªº¡C¤×¨ä¬O¹Ï¤ù­×¹¢ªº»yªk¡C

TOP

        ÀR«ä¦Û¦b : ¦¨¥\¬OÀuÂIªºµo´§¡A¥¢±Ñ¬O¯ÊÂIªº²Ö¿n¡C
ªð¦^¦Cªí ¤W¤@¥DÃD