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

§Q¥ÎFind§ä¤é´Á¡A¥X²{¿ù»~!!

¥[¤J is nothing
Set A = Sheets("¦æ¨Æ¾ä").Range("G3:G10000").Find(ST)
If A Is Nothing Then
    '¦Û¦æ¥[¤J§ä¤£¨ìST³o­Ó¦r¦ê©Î¼Æ¦r®Éªº°Ê§@
Else
    A = A.Offset(0, 0).Row
End If

TOP

        ÀR«ä¦Û¦b : §Ú­Ì­n°µ¦nªÀ·|ªºÀô«O¡A¤]­n°µ¦n¤º¤ßªºÀô«O¡C
ªð¦^¦Cªí ¤W¤@¥DÃD