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

Msgbox ªº¦^¶Ç­È°ÝÃD??

Msgbox ªº¦^¶Ç­È°ÝÃD??

Dear ¤j¤j

     ¤p§Ìªº°ÝÃD¦p¤U

    MsgBox "½Ð½T»{¬O§_­n§R°£¶×¥Xªº¸ê®Æ", Buttons:=vbYesNo + vbQuestion, Title:="¬O§_§R°£"
     if MSGBOX«ö¤U½T©w«á,´N°õ¦æ§R°£
      ¦ý¦p¦ó§ì¨ì«ö½T©w®É,·|IJ°Ê§R°£ªº«ü¥O
     If ????????????? Then
         Sheet9.Rows("7:2000").Delete
     End If

¦^´_ 2# GBKEE


    ÁÂÁ¤j¤j~ §Úªº°ÝÃD¤w¸g¸Ñ¨M¤F~ ¤]¦³°O¿ý¨Ã¾Ç²ß«ç»ò¹B¥Î¤F~ ·P®¦~

TOP

¦^´_ 1# hugh0620
  1. Sub Ex()
  2.     If MsgBox("½T©w§R°£ ???", vbQuestion + vbYesNo, "§R°£") = vbYes Then
  3.         MsgBox "§R°£§¹²¦  !!", , "§R°£"
  4.     Else
  5.         MsgBox "¨ú®ø§R°£  !!", , "§R°£"
  6.     End If
  7. End Sub
½Æ»s¥N½X

TOP

        ÀR«ä¦Û¦b : ­×¦æ­nô½t­×¤ß¡AÂǨƽm¤ß¡AÀH³B¾i¤ß¡C
ªð¦^¦Cªí ¤W¤@¥DÃD