|
* 답변하시는 분들께 도움이 되도록 자신의 환경을 아래 항목 옆에 기재해 주세요.
- 엑셀 버전(95,97,2000,xp,2003,2007):
* 아래줄에 질문을 작성하세요 >>
안녕하세요 vba로 함수 적용 질문이 있습니다.
구현 동작은 w셀에 f셀과 g셀을 concatenate 하는데 g셀의 값이 1~9일 경우 0을 사이에 붙이는 동작입니다.
Dim ws As Worksheet 'worksheet 선언
Dim ws1 As Worksheet
Dim ws123 As Worksheet
Set ws = Worksheets("sheet1")
Set ws1 = Worksheets("sheet2")
Set ws123 = Worksheets("sheet3")
Dim vdd3 As Long
Dim vrng3 As Range
vdd3 = ws.Cells(Rows.Count, "g").End(xlUp).Row
Set vrng3 = ws.Range("w2:w" & vdd3)
vrng3 = "=IF(OR(G2=1, G2=2, G2=3, G2=4, G2=5, G2=6, G2=7, G2=8, G2=9),CONCATENATE(F2,".","0",G2),CONCATENATE(F2,".",G2))"
이렇게 구현시 맨 마지막줄에서 구문오류가 발생해서 이부분을 어떻게 변경해야 할 지 잘 모르겠습니다. 해당 부분 도움을 받고 싶습니다! |
|