나눔터  
  HOME > 나눔터 > 묻고답하기 > 엑셀
엑셀
엑셀에 대한 질문과 답변을 올려주세요. 단, 취지에 맞지 않는 글은 운영자가 삭제합니다.
 "000 님, 도와주세요", "부탁 드립니다.", "급합니다!" 등과 같이 막연한 제목을 달지 말아주세요.
[필독] 빠르고 정확한 답변을 얻는 16가지 Tip !
[필독] 저작권법 개정에 따른 이용안내

작성자:  

 MsgBox (bosso123)

추천:  2
파일:     조회:  2244
제목:   가르쳐 주세요..
     
 
* 아래줄에 질문을 작성하세요 >>
textbox1.value 에서.. c 열을 검색 해서...
그 이름이 있으면 선택을 해 주고.. 없으면 
msgbox "없는 회원성명 입니다."
이렇게 나오게 할려는데..  

갈켜주세요~ㅠ;ㅠ;
 
[불량 게시물 신고]  
사내안녕하세요..^^

미흡하지만 제가 답변을..

아래의 코드를 살펴봐주세요..

Dim Tval As Variant
Dim Trng As Range


Tval = textbox1.Value
Set Trng = Columns(3).Find(Tval, LookIn:=xlValues, LookAt:=xlPart)
If Not Trng Is Nothing Then
    Trng.Select
Else
    MsgBox "없는 회원성명입니다."
End If

..도움이 되셨기를..
07-25 (15:59)
삭제 ■신고
천태식특정한 셀을 선택하는 매서드를 몰라, 그냥 메세지박스에 뜨도록 했습니다.
응용해서 사용하세요..

Private Sub CommandButton1_Click()
For k = 1 To 10000
    If TextBox1 = Sheets("Sheet1").Cells(k, 1) Then
        MsgBox Sheets("sheet1").Cells(k, 1)
    Exit For
    End If
Next
    If TextBox1 <> Sheets("Sheet1").Cells(k, 1) Then
        MsgBox "없는 회원성명 입니다.", vbOKOnly, "없는회원"
    End If
End Sub
07-25 (16:19)
삭제 ■신고
        
  

작성일 : 2003-07-25(15:53)
최종수정일 : 2003-07-25(15:53)