ªð¦^¦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 : ¡i®É¶¡¦pÆp¥Û¡j®É¶¡¹ï¤@­Ó¦³´¼¼zªº¤H¦Ó¨¥¡A´N¦pÆp¥Û¯ë¬Ã¶Q¡F¦ý¹ï·M¤H¨Ó»¡¡A«o¹³¬O¤@§âªd¤g¡A¤@ÂI»ù­È¤]¨S¦³¡C
ªð¦^¦Cªí ¤W¤@¥DÃD