VB ³]©wªí³æ¿é¤J¦WºÙ«á¥´¶}¸ê®Æ§¨°ÝÃD¡C
- ©«¤l
- 63
- ¥DÃD
- 32
- ºëµØ
- 0
- ¿n¤À
- 125
- ÂI¦W
- 0
- §@·~¨t²Î
- WIn10
- ³nÅ骩¥»
- OFFICE2013
- ¾\ŪÅv
- 20
- µù¥U®É¶¡
- 2018-7-19
- ³Ì«áµn¿ý
- 2022-8-11
|
VB ³]©wªí³æ¿é¤J¦WºÙ«á¥´¶}¸ê®Æ§¨°ÝÃD¡C
§Ú·Q§Ë¤@Óªí³æ,Åý§Ú¿é¤J¤@Ó¦WºÙ¤§«á«ö½T©w,¥L·|¥´¶}§Ú©Ò¿é¤J¦WºÙªº¸ê®Æ§¨¥X¨Ó,½Ð°Ý³oÓªì¨B¤]¬On¦p¦ó¥h°µ,¬O¤£¬O¥ý§â¦WºÙ©w¸q¬°¸ê®Æ§¨¥Ø¼Ð¦ì¸m,·í§Ú¦bªí³æ¤º¿é¤J¸Ó¦WºÙ«á,¥L·|¦Û°Ê¥´¶}¬ÛÃöªº¸ê®Æ,½Ð°Ýªì¨BÀ³¸Ó¬O¦p¦ó¥h¾Þ§@,ÁÂÁ¤F :Q |
|
|
|
|
|
|
¡@¼ÊºÙ: 温©_ ¡@ÀY»Î: ij½×ªÌ
¤¤¾Ç¥Í
- ©«¤l
- 104
- ¥DÃD
- 5
- ºëµØ
- 0
- ¿n¤À
- 110
- ÂI¦W
- 0
- §@·~¨t²Î
- win7
- ³nÅ骩¥»
- Office2007
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2017-11-14
- ³Ì«áµn¿ý
- 2019-4-30
|
¦^´_ 1# stephenlee
¶}±ÒExcel¤èªk¡AÃþ¦ü½d¨Ò°Ñ¦Ò- Dim WB, XL, oSheet As Object
- XL = CreateObject("Excel.Application")
- XL.Visible = True
- WB = XL.Workbooks.Open("\\¸ô®|\¤u§@ªí.xlsx")
- oSheet = XL.Workbooks("¤u§@ªí.xlsx").Sheets("¤u§@ªí1")
½Æ»s¥N½X |
|
¤@¤À§V¤O¡A¤@¤À¦¬Ã¬¡C
µo°ÝÃD«e¥i¥H¥ý·j¯Á¤º¤å¬O§_¦³¬ÛÃö½d¨Ò¡C
|
|
|
|
|