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결재형태
txt제품명 = ""
txt수량 = ""
txt단가 = ""
cmb결재형태 = ""
End If
책이랑 똑같이 입력한 것 같은데 저 부분에서 '텍스트형식으로 저장이 된 숫자'로 되어있어서
책이랑 같은 결과가 나오지 않네요. 즉, 셀의 오른쪽이 아닌 왼쪽으로 정렬되어 입력이 됩니다.
왤까요 ㅠㅠ???
format과 val 을 사용하면 숫자로 입력되어야 하는데
왜 문자로 입력되는지는 그림만 봐서는 알기 어렵습니다.
오른쪽 클릭 하신 부분에서 숫자로 변환을 누르셔도 상관은 없을 것 같네요.
좋은 하루 되세요.
"-
*2014-03-30 06:08:33
format과 val 을 사용하면 숫자로 입력되어야 하는데
왜 문자로 입력되는지는 그림만 봐서는 알기 어렵습니다.
오른쪽 클릭 하신 부분에서 숫자로 변환을 누르셔도 상관은 없을 것 같네요.
좋은 하루 되세요.
"