- ©«¤l
- 561
- ¥DÃD
- 160
- ºëµØ
- 0
- ¿n¤À
- 725
- ÂI¦W
- 0
- §@·~¨t²Î
- WINDOWS
- ³nÅ骩¥»
- xp
- ¾\ŪÅv
- 50
- ©Ê§O
- ¨k
- ¨Ó¦Û
- ®ç¶é
- µù¥U®É¶¡
- 2014-9-10
- ³Ì«áµn¿ý
- 2024-8-7
|
[µo°Ý] ¨Ì¸ê®Æ®w¦P¦W¦r¦ý¤£¦P¶µ¥Ø·J¾ã¦Ü¦P¤@¦C¤§¤è¦¡-VBA
DEAR ALL ¤j¤j
1.SHEET1=¸ê®Æ®w AÄæ=®Æ¸¹ BÄæ=¤º®e ½d¨Ò¦p¤U -
SHEET1.RANGE("A1")=®Æ¸¹ SHEET1.RANGE("B1")=¤º®e
SHEET1.RANGE("A2")=S19001A SHEET1.RANGE("B2")=2B
SHEET1.RANGE("A3")=S19003A SHEET1.RANGE("B2")=3B
SHEET1.RANGE("A4")=S19001A SHEET1.RANGE("B2")=6AB
SHEET1.RANGE("A5")=S19003A SHEET1.RANGE("B2")=5AA
SHEET1.RANGE("A6")=S19001A SHEET1.RANGE("B2")=10B
SHEET1.RANGE("A7")=S19002A SHEET1.RANGE("B2")=21B
..................................................................................................................................
2.SHEET2=µ²ªG»Ý¨D¦p¤U.¨Ì¸ê®Æ®w¦P¦W¦r¦ý¤£¦P¶µ¥Ø·J¾ã¦Ü¦P¤@¦C¤§¤è¦¡(¤º®e¥Î , °Ï¹j) ½d¨Òµ²ªG¦p¤U-
SHEET2.RANGE("A1")=®Æ¸¹ SHEET2.RANGE("B1")=¤º®e
SHEET1.RANGE("A2")=S19001A SHEET1.RANGE("B2")= 2B,6AB,10B
SHEET1.RANGE("A3")=S19003A SHEET1.RANGE("B3")= 3B,5AA
SHEET1.RANGE("A4")=S19002A SHEET1.RANGE("B4")= 21B
...................................................................................................................................
3.·Ð¤£§[½ç±Ð THANKS*10000 |
|