|
* 답변하시는 분들께 도움이 되도록 자신의 환경을 아래 항목 옆에 기재해 주세요.
1. 엑셀 버전(95,97,2000,2002):2000
2. 윈도우즈의 버전(win95,win98,winME,winNT,win2000,winXP):2000
3. CPU (486,PentiumI/II/III/IV...):iv
4. RAM (32,64,128,256,512MB,1G...): 512
* 아래줄에 질문을 작성하세요 >>
아래 코드는 제가 작업하고 있는 것 중 일부입니다.
질문이 간단해서 연관되는 코드값만을 적었어요.
For Each rng In .SpecialCells(xlCellTypeVisible)
Application.Goto .Offset(0, 2) '선택한 셀
Selection.FormulaArray = "=myNumtoDate(" & .offsets(0, -5).Value & ")" '윗줄의 선택한 셀에서 왼쪽으로 다섯번째 셀(상대셀참조)에 vba함수를 이용하여 계산(여기에서 myNumtoDate함수내에 상대참조셀을 입력하는게 질문입니다.)
Next rng
VBA 코드에서 '임의의 셀에 그 셀의 상대참조셀을 함수적용하여 계산된 값을 입력'하려고 하는데 원하는대로 잘 안됩니다.
고견바랍니다.
감사합니다. |
|