선생님 일반 수량세는것은 되는데 0보다 큰값만 세려면 어떠케되나요 아무리해도 안되네요 ~~~조언 부탁드려요 Dim 갯수세기 As Long ' 갯수세기 = Sheet4.Cells(Rows.Count, "p").End(xlUp).Row - 1 Me.전체미수건 = 갯수세기 ' 테스트 박스나 콤보박스에 넣기 'Sheet1.Range("f13") = 갯수세기 ' 다른시트 셀에다 넣기
@정욱채쌤_정보처리와2 жыл бұрын
[사용자정의폼]에서 실행하시는 건가요? 이때 '전체미수건' 이라는게 Label명 이고요? 그렇다면 [Me.전체미수건.caption = 갯수세기] 라고 하시면 Sheet4의 P열 기준으로 '행수-1'의 값이 전체미수건Label에 표시될 겁니다. 물론 '전체미수건' 이라는게 Textbox 이름이라면 caption 대신 value 를 써야 겠죠. 질문은 P열의 값에서 0보다 큰 값의 갯수를 세려고 하는 것이라면, 반복문을 이용하여 '1~갯수세기' 까지 반복하며 IF문을 써야 되겠지만, 이런 경우라면 VBA보다는 그냥 함수를 사용하는게 속 편하겠네요. =countif(sheet4!p:p,">"&0)