| ©«¤l23 ¥DÃD4 ºëµØ0 ¿n¤À39 ÂI¦W0  §@·~¨t²ÎWin7 ³nÅ骩¥»Office2007 ¾\ŪÅv10 ©Ê§O¤k µù¥U®É¶¡2011-10-27 ³Ì«áµn¿ý2021-5-13 
 | 
[µo°Ý] ¨Ï¥ÎwithªºÆ[©À, ¦³½Ð¥ý¶i´À§ÚÂç²M 
| ¥»©«³Ì«á¥Ñ thps51134 ©ó 2011-11-3 09:45 ½s¿è 
 ·Q½Ð±Ð¹ï©ó"With" ¨Ó»¡
 With Sheet1  »P
 With Sheets("Sheet1") ¨âªÌªº¤£¦P
 
 ¦bwith¤¤
 "ª«¥ó¥i¬Ù²¤(.)"
 ³o¬OÓ»~·|¡BÁÙ¬O¬O¦³±ø¥ó©Êªº?
 
 ===
 ·Q°µ¤@Ó¤@¶}Àɮ׮ɴN¦bSheet1ªºC1¼g¥X"OH!"ªºcode
 
 è¶}©l¼g¦¨³o¼Ë¡G
 Private Sub Workbook_Open()
 With Sheet1
 Cells(1, "C").Value = "OH!"
 End With
 End Sub
 ¡@¡@'¦]¬°¤§«e¬Ý¨ì¦³»¡with¤§¤¤, ª«¥ó¥i¥H¬Ù²¤ªºÃö«Y§a...µ²ªG¬Ù²¤´N¦b¿ùªºSheet¤W°Ê§@¤F'
 
 ·í¤U¤£ª¾¹D¬°¤°»ò¨C¦¸¶}±Ò³£¬O°Ê¨ì¶}±Ò®ÉªºSheet¦Ó«DSheet1
 ¤Wºô¬d®Éµo²{»P§O¤Hªº¼gªk¤£¦P
 ©ó¬OÅܦ¨¤F³o¼Ë
 
 Private Sub Workbook_Open()
 With Sheets("Sheet1")
 .Cells(1, "C").Value = "OH!"
 End With
 End Sub
 ¡@'³o®Éµo²{¶}±ÒÀÉ®×®É, Work_Open() ´N¤£°Ê§@¤F'
 
 ³Ì«á...
 Private Sub Workbook_Open()
 With Sheet1
 .Cells(1, "C").Value = "OH!"
 End With
 End Sub
 ¡@¡@'¦¨¥\!'
 
 ³Ì«á³o¼Ë´N¦¨¥\¤F
 =====
 ı±oÆ[©À·d¤£²M·¡«ÜÄY«
 ÁÙ¬O»¡¨ä¹ê§Ú¿ùªº¬O¨ä¥L¦a¤è¦Ó¤£¦Ûı (¨º´N§óÁV¿|¤F)
 ³Â·Ð¤j®a«ü¾É, ÁÂÁÂ!
 | 
 |