Private Sub cmd검색_Click()
참조행 = cmb가입자명.ListIndex + 4
txt상품종료.Value = Cells(참조행, 3)
txt지점명.Value = Cells(참조행, 4)
txt성별.Value = Cells(참조행, 5)
txt가입일.Value = Cells(참조행, 6)
txt납입시점.Value = Cells(참조행, 7)
txt연이율.Value = Format(Cells(참조행, 8), "0.0%")
txt월불입액.Value = Format(Cells(참조행, 9), "#,###")
End Sub
txt상품종류 로 입력하셔야 하는데 종료로 입력하셔서 오타 때문에 오류가 발생했네요.
수정 후 확인 해 보세요.
좋은 하루 되세요.
-
관리자2021-02-18 21:30:37
Private Sub cmd검색_Click()
참조행 = cmb가입자명.ListIndex + 4
txt상품종료.Value = Cells(참조행, 3)
txt지점명.Value = Cells(참조행, 4)
txt성별.Value = Cells(참조행, 5)
txt가입일.Value = Cells(참조행, 6)
txt납입시점.Value = Cells(참조행, 7)
txt연이율.Value = Format(Cells(참조행, 8), "0.0%")
txt월불입액.Value = Format(Cells(참조행, 9), "#,###")
End Sub
txt상품종류 로 입력하셔야 하는데 종료로 입력하셔서 오타 때문에 오류가 발생했네요.
수정 후 확인 해 보세요.
좋은 하루 되세요.