- ©«¤l
- 3
- ¥DÃD
- 0
- ºëµØ
- 0
- ¿n¤À
- 4
- ÂI¦W
- 0
- §@·~¨t²Î
- windows
- ³nÅ骩¥»
- 8
- ¾\ŪÅv
- 10
- µù¥U®É¶¡
- 2015-5-9
- ³Ì«áµn¿ý
- 2016-8-29
|
¥u·Q¨ì¦bThisWorkbook¸Ì±³o¼Ë°µ¡A¦ý¬O¥u¦³¦b¡u·s¼W¡vªº®ÉÔ·|±Ò°Êµ{¦¡½X¡A
Private Sub Workbook_NewSheet(ByVal Sh As Object)
Range("H7") = Date & Time
End Sub
¦Ü©ó½Æ»sªº®ÉÔ¦Û°Ê¥[¤W¤é´Á¤Î®É¶¡¡A¦b¤U¥u·Q¨ì¦b³Q½Æ»sªºªíH7¶ñ¤Jnowªº¨ç¼Æ¡A
¦ý³o¼Ë¤@¨Ó¨C±iªíªº®É¶¡³£·|«·spºâ¡A¦ýY§â¹Bºâ§ï¤â°Ê¡A½Æ»s·sªíªº®ÉԮɶ¡¤S¤£·|°Ê¡A
¥t¥~ÁöµM¥i¥H¦bActivate¸Ì±³]©wY¦³½Æ»s¤u§@ªí®É Range("H7") = Date & Time¡A
¦ý³o¼Ë¤@¨Ó®£©È·|¦]¬°¤@ª½°õ¦æ§PÂ_¦¡¦Ó¼vÅTExcelªº³B²z®Ä²v¡C |
|