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

[µo°Ý] ¦³¨â­Ó¿W¥ßEXCEL¡A¦p¦óª¾¹D¤Á´«¨ì¥t¤@­Ó¿W¥ßEXCEL¡H

Sub testxxx()
bookcount = Application.Windows.Count
For i = 1 To bookcount
    Debug.Print Application.Windows(i).Caption
Next
End Sub

TOP

¥»©«³Ì«á¥Ñ no3-taco ©ó 2015-7-25 12:20 ½s¿è

¦^´_ 6# justintoolbox

¤£¦n·N«ä¡A­è­è§Ú¶Kªº¦æ¤£³q
§Ú·Ó§Aªº¤èªk¶}±Òexcel¡A¯uªº¤£¦æ

TOP

        ÀR«ä¦Û¦b : ¯u¥¿ªº·R¤ß¡A¬O·ÓÅU¦n¦Û¤vªº³oÁû¤ß¡C
ªð¦^¦Cªí ¤W¤@¥DÃD