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

작성자:  

 Nothig (sicrice)

추천:  2
파일:     조회:  1637
제목:   Excel VBA (일반)텍스트상자 입력받는 법(부탁드립니다)
     
  * 답변하시는 분들께 도움이 되도록 자신의 환경을 아래 항목 옆에 기재해 주세요.

 - 엑셀 버전(95,97,2000,xp,2003,2007):2013

* 아래줄에 질문을 작성하세요 >>

안녕하십니까?
Excel에서 Active X 텍스트 상자를 VBA에서 입력받는 법이 아닌!

메뉴 - 삽입 - 텍스트 상자에서 입력되어 있는 값을 VBA에서 입력 받는 법을 알고 싶습니다. 검색을 해도 Active X 텍스트 상자만 나와서 답답해서 질문 하게 되었네요. 부탁드리겠습니다. 감사합니다.
 
[불량 게시물 신고]  
조삿갓텍스트 상자의 이름이 "TextBox 1"이라면, 일단

ActiveSheet.Shapes.Range("TextBox 1").Select

명령으로 해당 개체를 선택해야 합니다. 그리고

Selection.ShapeRange(1).TextFrame2.TextRange.Characters.Text

속성을 참조하거나 조작(좌변에 놓고 문자열 대입)하면
해당 텍스트 상자의 내용을 확인하거나 수정할 수 있습니다.
06-20 (10:16)
삭제 ■신고
조삿갓주의할 것은 보통의 경우에는 위 두 줄을

ActiveSheet.Shapes.Range("TextBox 1").ShapeRange(1).TextFrame2.TextRange.Characters.Text

로 줄여 써도 되지만,

이 경우에는 이렇게 쓰면 오류가 발생합니다.
반드시 먼저 Select 메소드로 선택을 해 주고 나서
Selection 개체의 멤버로 참조해야 합니다.
06-20 (10:18)
삭제 ■신고
        
  

작성일 : 2018-06-19(14:17)
최종수정일 : 2018-06-19(14:17)