시나공

시험에

나오는 것만

공부한다!

해설대로 프로시저를 입력하면 프로시저가 잘 작동합니다. 그런데 수량*단가인 금액 부분에 오류 문구가 잡히네요. '텍스트로 서식이 지정 되었거나 아포스트로피가 앞에 옵니다'라고요. 셀에 \이 붙어 있고 회계 형식으로 입력되어 '\숫자'식으로 작성됩니다. 그럼 아포스트로피 때문인 것 같은데 어떻게 해결해야 할까요?

Private Sub cmd등록_Click()
If txt제품명 = "" Then
MsgBox "제품명을 입력하시오."
ElseIf txt수량 = "" Then
MsgBox "수량을 입력하시오."
ElseIf txt단가 = "" Then
MsgBox "단가를 입력하시오."
ElseIf cmb결재형태 = "" Then
MsgBox "결재형태를 입력하시오."
Else
기준행위치 = [b3].Row
기준범위행수 = [b3].CurrentRegion.Rows.Count
입력행 = 기준행위치 + 기준범위행수
Cells(입력행, 2) = CDate(txt판매일자)
Cells(입력행, 3) = txt제품명
Cells(입력행, 4) = Val(txt수량)
Cells(입력행, 5) = Val(txt단가)
Cells(입력행, 6) = Format(Val(txt수량) * Val(txt단가), "currency")
Cells(입력행, 7) = cmb결재형태