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

작성자:  

 강원 (nozip)

추천:  2
파일:     조회:  2268
제목:   특정 작업대상 범위 선택방법? --- VBA 에서...
     
  * 답변하시는 분들께 도움이 되도록 자신의 환경을 아래 항목 옆에 기재해 주세요.

1. 엑셀 버전(95,97,2000,2002): xp
2. 윈도우즈의 버전(win95,win98,winME,winNT,win2000,winXP):
3. CPU (486,PentiumI/II/III/IV...):
4. RAM (32,64,128,256,512MB,1G...): 

* 아래줄에 질문을 작성하세요 >>
 고수님들 수고 많으십니다.

 다름이 아니라, VBA로 어떤 작업을 실행시킬때, 대상범위를 특정 열(또는 범위)를 선택하여 실행 시킬 수 있는 VBA 구문 좀 알려주십시요.(즉, 실행버튼을 누르면 작업대상 열을 선택하게 하는 메시지박스를 보여주고 여기에 해당 특정 열을 입력하면, 입력한 열을 작업대상 Range 로 인식케 하는 구문)

 질문이 애매한지 모르겠군요.... 

 VBA 초보라.... 솔직히 다른분이 만든 예제에다 위의 도움요청사항을 추가하여 활용 할려하니 무척 어렵군요.  도움 부탁드립니다.
 
[불량 게시물 신고]  
최강자폐제가 잘못이해 했는지도 모르겠지만은...
열을 선택하는 방법은..
a = Val(InputBox("몇번째 열을 선택하시겠습니까?"))
Range(Cells(1, a), Cells(65536, a)).Select
도움이 되셨기를..
08-06 (12:28)
삭제 ■신고
졸따구안녕하세요.
다음의 코드를 참조하세요

Sub RngSer()
  Dim Rng As Range
  On Error GoTo QQQ
  Set Rng = Application.InputBox(prompt:="원하는 범위를 선택하세요", Type:=8)
  If Not Rng Is Nothing Then
    MsgBox "지금 선택한 범위는 " & Rng.Address & "입니다"
  Else
QQQ:
    MsgBox "아무것도 선택하지 않았습니다."
  End If
End Sub
08-06 (12:50)
삭제 ■신고
강원위 두분의 답변 고맙습니다. 헌데 특정 열(범위)을 선택한후 그이후의 (별도 프로그램인) VBA 구문이 앞서 선택한 열을 작업대상범위로 인식케 하는 구문은 알 수 없을까요?08-06 (13:08)
삭제 ■신고
        
  

작성일 : 2003-08-06(12:25)
최종수정일 : 2003-08-06(12:25)