- ©«¤l
- 552
- ¥DÃD
- 3
- ºëµØ
- 0
- ¿n¤À
- 578
- ÂI¦W
- 0
- §@·~¨t²Î
- win7
- ³nÅ骩¥»
- office 2010
- ¾\ŪÅv
- 50
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2015-2-8
- ³Ì«áµn¿ý
- 2024-7-9
  
|
¦^´_ 10# starry1314
°£¤F Set wsTarget = Workbooks("«È¤á©ú²Ó-«ÈªA±M¥Î.xlsm").Sheets(.cells("¤@¤ë") ³o¦C
¨ä¥LªºY®³±¼¥i¥H¥¿±`¤u§@®³±¼¤]µL§Ï¡I
.Activate¬O«ü©w§@¥Î¤¤ªº¤u§@ï¡B¤u§@ªí¡A¤]´N¬O»¡§A²{¦b¦b³o¸Ì¤u§@¡C¦bµ{§Ç¤¤°£«D§A«ü©w«á¦³¯S§O§@¥Î¡A§_«h¨S¦³¤°»ò·N¸q¡I
.Select¬O«ü©w¥h¿ï¾Üþ¤@Ó¤u§@ªí©ÎÀx¦s®æ¡AµM«á¦b³o¤u§@¡C¦bµ{§Ç¤¤°£«D§A«ü©w«á¦³¯S§O§@¥Î¡A§_«h¨S¦³¤°»ò·N¸q¡I |
|