Private Sub cmd예매_Click()
참조행 = cmb공연명.ListIndex + 5
입력행 = [C4].Row + [C4].CurrentRegion.Rows.Count
Cells(입력행, 3) = Date
Cells(입력행, 4) = txt공연장
Cells(입력행, 5) = cmb공연명
Cells(입력행, 6) = txt좌석수
Cells(입력행, 7) = Cells(참조행, 12)
Cells(입력행, 8) = Cells(참조행, 13)
Cells(입력행, 9) = Format(Cells(입력행, 6) * Cells(입력행, 8), "#,###원")
txt공연장.SetFocus
Cells(입력행, 7) = Cells(참조행, 12)
Cells(입력행, 8) = Cells(참조행, 13)
에서 왜 12, 13 값이 나오는거죠?
안녕하세요.
Cells(참조행, 12)에서 12는 12열로, 워크 시트에서 A열부터 1씩 세면 '구분' 필드가 됩니다.
- 즉, Cells(입력행,7열) 셀에 cmb공연명에서 선택한 공연의 구분 정보를 넣으라는 것입니다.
Cells(참조행, 13)에서 13은 13열로 A열부터 1씩 세면 '가격' 필드가 됩니다.
- 즉, Cells(입력행,8열) 셀에 cmb공연명에서 선택한 공연의 가격 정보를 넣으라는 것입니다.
좋은 하루 보내세요.
-
*2018-09-12 22:01:13
안녕하세요.
Cells(참조행, 12)에서 12는 12열로, 워크 시트에서 A열부터 1씩 세면 '구분' 필드가 됩니다.
- 즉, Cells(입력행,7열) 셀에 cmb공연명에서 선택한 공연의 구분 정보를 넣으라는 것입니다.
Cells(참조행, 13)에서 13은 13열로 A열부터 1씩 세면 '가격' 필드가 됩니다.
- 즉, Cells(입력행,8열) 셀에 cmb공연명에서 선택한 공연의 가격 정보를 넣으라는 것입니다.
좋은 하루 보내세요.