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

Auto_Close()

Auto_Close()

Sub Auto_Close()       
IF A1=1 THEN ¨ú¾PÃö³¬Àɮװʧ@ ,¸õ¦^­ì§@¥Îµøµ¡
END SUB

¬õ¦âªº»yªk¬O??

'  ¦b ThisWorkbook ¸Ì­±©ñ¤J
'  A1 ¦Û¤v§ï¦¨¥þ°ìÅܼÆ

Private Sub Workbook_BeforeClose(Cancel As Boolean)
  If A1 Then Cancel = True
End Sub

TOP

'  ¦b ThisWorkbook ¸Ì­±©ñ¤J
'  A1 ¦Û¤v§ï¦¨¥þ°ìÅܼÆ

Private Sub Workbook_BeforeClose(Cancel As Bo ...
bobomi µoªí©ó 2014-10-24 19:18


³oµª®×§¹¥þ¥¿½T¡AÁÂÁ«ü¾É

TOP

        ÀR«ä¦Û¦b : ¡i®É¤é²öªÅ¹L¡j¤@­Ó¤H¦b¥@¶¡°µ¤F¦h¤Ö¨Æ¡A´Nµ¥©ó¹Ø©R¦³¦hªø¡C¦]¦¹¥²¶·»P®É¶¡Ävª§¡A¤Á²ö¨Ï®É¤éªÅ¹L¡C
ªð¦^¦Cªí ¤W¤@¥DÃD