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

[µo°Ý] ¨S¦³³]©wª«¥óÅܼƩÎwith°Ï¶ôÅÜ¼Æ ?

[µo°Ý] ¨S¦³³]©wª«¥óÅܼƩÎwith°Ï¶ôÅÜ¼Æ ?

Private Sub CommandButton21_Click()
     A = Application.Large(Range("G160:G228"), 1)
  MsgBox A 'aªº­È¬°39
Set bb = Range("g160:g228").Find(What:=A, SearchOrder:=xlByRows, LookIn:=xlValues)
MsgBox bb.Row  '¨S¦³³]©wª«¥óÅܼƩÎwith°Ï¶ôÅÜ¼Æ ?
End Sub

        ÀR«ä¦Û¦b : µêªÅ¦³ºÉ¡D§ÚÄ@µL½a¡AµoÄ@®e©ö¦æÄ@Ãø¡C
ªð¦^¦Cªí ¤W¤@¥DÃD