[Excel] 엑셀 재고관리 툴 만들기. -02.

 

 

 

 

 

 

 

[Excel] 엑셀 재고관리 툴 만들기. -02.

 

 

넣어놨던 데이터를 삭제하는 매크로를 만들어줍니다.

Sub 삭제()

   If IsNumeric([C5]) Then
       행 = Range("B21:B1048576").Find([C5]).Row
       Rows(행).Delete
       Call 신규등록모드
   End If

End Sub

 

 

 

 

 

---

 

많은 양의 데이터들을 적제하게 되면 데이터를 찾는데에 번거러움이 생기게 됩니다.

 

이때 "고급필터"를 활용해서 데이터를 찾아보겠습니다.

고급필터를 만들기 전에, 매크로 기록을 눌러줍니다.

 

 

 

필터의 범위를 지정하고, 확인을 눌러준 후에, 기록을 중지해주면,

vba창에 module2라는 창이 새로 생기게 됩니다.

 

 

    Range("B20:J26").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:= _
        Range("B17:J18"), Unique:=False

 

이 부분을 복사해서

 

모듈 1에 넣어줍니다.

 

 

데이터셋의 범위는 계속 늘어날 수 있기 때문에,

B20부터의 범위를

 

 

현재까지의 범위로 인식하게 만들어줍니다.

 

 

필터가 적용되면,  조건열에 입력하는 데이터에 따라서,

데이터셋의 데이터들이 sort 되게 됩니다.

 

 

 

매크로를 개별적으로 실행시키지 않고

검색만 하면 바로 나올 수 있도록

 

 

 

 

 

이렇게 해주게 되면

검색에 따라서 데이터 시트가 변화하는 것을 볼 수 있습니다.

 

---

 

 

 

 

 

입고/출고 등 정해진 조건값을 잘 못 입력하게 되면 추후에 데이터를 집계할 때 불편한 일이 발생하게 됩니다.

 

그렇기 때문에 입력조건에 '제한'을 줘서 의도한대로 입력되도록 만들어주겠습니다.

 

 

 

 

 

이렇게 조건을 걸어주면

 

 

 

요롷게 선택 버튼이 만들어지게 되면서

지정된 값에서 벗어난 값을 적으면

 

"이 셀에 정의된 유효성 검사 제한에 부합하지 않습니다"라고 나오게 됩니다.

 

---

 

이 방식은 클릭할게 다소 많기 떄문에,

VBA를 통해 좀 더 간결하게 만들어보겠습니다.

 

매크로 기록을 통해, 색상의 코드를 따주고,

 

 

 

 

 

클릭에 따라서, 값이 변경되게 바꿔주면

버튼 클릭에 따라 값이 변경됩니다.(리엑트나, 플러터의 onclick과 비슷하네요)

 

 

 

(아 ! 매크로 지정해주는 것은 잊으면 안됩니다)

 

 

 

 

 

---

품목을 선택하기 편하도록

별도의 테이블을 만들어서 관리한다면

 

이렇게 데이터셋을 만들 수 있을 것이고,

 

 

이 데이터를 편리하게 불러오려면

 

삽입- 사용자 정의폼을 활용해줍니다.

 

 

RowScouce: 품목관리!A2:B21

Column count : 2

ColumnHead: True

 

 

 

 

이제 데이터셋은 준비되었으니,

데이터를 받을 매크로를 만들어줍니다.

 

 

도형까지 만들어서, 품목코드&품목명 자리에 놓고, 채움&윤곽선을 없애고 매크로를 지정하면,

클릭 할 때 유저폼을 불러오게 됩니다.

 

 

유저폼 안에 리스트 박스를 더블클릭하면, 

설정창이 나오게 되는데

 

여기서 우측상단에 DBcLICK을 선택해주면,

LIST방식 안에 담긴 값을 더블 클릭했을 때의 모션을 만들 수 있게 됩니다.

 

Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
  [C8] = ListBox1.List(ListBox1.ListIndex, 0)
   [C9] = ListBox1.List(ListBox1.ListIndex, 1)
End Sub

 

이렇게 적어주면

 

 

[팁: 틀고정 : ALT + W +F + F ]

 

 

 

 

 

 

#상대참조와 절대참조로 선택한 행, 색깔 칠하기

 

 

 

 

 

 

 

 

 

 

---

#완성본,

재고관리.xlsb

0.03MB