¦³ÃöÂà¶K¤å³¹"For...Next »P For Each...Next °j°éªº°ò¥»·§©À"ªº°ÝÃD
- ©«¤l
- 172
- ¥DÃD
- 39
- ºëµØ
- 20
- ¿n¤À
- 177
- ÂI¦W
- 0
- §@·~¨t²Î
- Microsoft Windows XP
- ³nÅ骩¥»
- Microsoft Office 2003
- ¾\ŪÅv
- 100
- ©Ê§O
- ¨k
- ¨Ó¦Û
- °ª¶¯
- µù¥U®É¶¡
- 2010-5-1
- ³Ì«áµn¿ý
- 2023-3-19
 
|
¥»©«³Ì«á¥Ñ Min ©ó 2010-9-5 19:36 ½s¿è
Set a = Workbooks("ÀÉ®×A.xls").Sheets(1)
Set b = Workbooks("ÀÉ®×B.xls").Sheets(1)
³o¥ó¬Oª«¥óÅܼƪü ¬O¤u§@ªíª«¥óªºÅܼÆ!
lastrow = a.[A1].End(xlDown).Row
lastcol = a.[A1].End(xlToRight).Column
¬O¼ÆÈÅÜ¼Æ ¦pinteger long...
¦Ü©ó¤°»ò®ÉÔn¥Îset... ¥un¬O"ª«¥ó"´N»Ýn¥Îset~ |
|
Y¬O§Ú¦^µª¡A¨Ï±zº¡·N¡A½Ð±zÅý§Úª¾¹D¡I
Y¬O§Úªº¦^ÂСA±z¤´¦³¨ä¥L¨£¸Ñ¡A¤]½Ð±z¤£¶Þ«ü±Ð¡I
|
|
|
|
|