|
* 답변하시는 분들께 도움이 되도록 자신의 환경을 아래 항목 옆에 기재해 주세요.
1. 엑셀 버전(95,97,2000,2002):
2. 윈도우즈의 버전(win95,win98,winME,winNT,win2000,winXP):
3. CPU (486,PentiumI/II/III/IV...):
4. RAM (32,64,128,256,512MB,1G...):
* 아래줄에 질문을 작성하세요 >>
아까도 올려서 죄송하지만...해결이 안되고 있어 이렇게 다시올려봅니다.
아래의 코드를 사용했는데,
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
With MessageForm
.CaseNumBox.Value = Target.Value
.MessageIDBox.Value = Target.Offset(, 2).Value
.DateBox.Value = Target.Offset(, 3).Value
.MessageIDBox.Value = "ladsfjlksdfj"
.CaseNumBox.Value = Target.Offset(, 4).Value
.DateBox.Value = Target.Offset(, 5).Value
.FromBox.Value = Target.Offset(, 10).Value
.ToBox.Value = Target.Offset(, 39).Value
.CCBox.Value = Target.Offset(, 40).Value
.SubjectBox.Value = Target.Offset(, 1).Value
.MessageBox.Value = Workbooks("emailtable").Worksheets("Message").Range("B2").Value
End With
End Sub
자꾸 마지막, .MessageBox.Value = Workbooks......
이부분에서 subscript out of range 라는 에러가 나옵니다. 분명히 화일 이름도 맞고, 시트이름도 맞고한데...왜그럴까요? 답변좀 부탁드려요...ㅠ.ㅠ 지금 몇시간째 검색만 해보지만 아직도 답을 못찾았습니다..
|
|