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

[µo°Ý] ¦p¦óÀˬd¤u§@ªí¤ºªºÀx¦s®æ¬O§_¦³#N/A

¦^´_ 1# michael101772
  1. Function HasErr() As Boolean
  2. On Error Resume Next
  3. HasErr = IsError(Cells.SpecialCells(xlCellTypeFormulas, 16))
  4. End Function
  5. Sub ´ú¸Õ¿ù»~()
  6. MsgBox HasErr
  7. End Sub
½Æ»s¥N½X
¾Ç®üµL²P_¤£®¢¤U°Ý

TOP

        ÀR«ä¦Û¦b : ¶¢¤HµL¼Ö½ì¡A¦£¤HµL¬O«D¡C
ªð¦^¦Cªí ¤W¤@¥DÃD