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

[µo°Ý] EXCEL³]©w¬Y¤é´Á¨ìÀÉ®×µLªk¶}±Ò

¦^´_ 4# rouber590324


·PÁÂrouber590324¦^´_,´ú¸Õ«á¥i!! ÁÂÁÂ~~
¤p«B

TOP

¦p¤U   ¸Õ¸Õ

Private Sub Workbook_Open()
   Application.DisplayAlerts = False
   If Date < "02/23/2015" Then
   
   ¥¨¶°
   
   End If
End Sub
ù

TOP

¦p¤U  ·Ðcopy·sexcel ¸Õ¸Õ (­ìexcel«O¯d³Æ¥Î)  

Private Sub Workbook_Open()
   Application.DisplayAlerts = False
   If Date > "02/23/2015" Then
   ThisWorkbook.Close False
   End If
End Sub
ù

TOP

½Ð±ÐEXCEL VBA ¬Y¤é´Á¨ì­­¨î¬Y¥¨¶°ªº¨Ï¥Î

½Ð±Ð°ª¤â,§Ú¦bEXCEL³]¤F¤@­Ó¥¨¶°,¦ý§Ú§Æ±æ¦b¤@­Ó¤ë«á³o­Ó¥¨¶°´NµLªk¨Ï¥Î,­n«ç»ò°µ? ÁÂÁÂ

TOP

        ÀR«ä¦Û¦b : ¨ü¤HÂI¤ô¤§®¦¡A¶··í´é¬u¥H³ø¡C
ªð¦^¦Cªí ¤W¤@¥DÃD