내일도 화이팅

※ 코드와 파일은 상업적 이용, 개인적 이용이 모두 가능합니다. 다만, 블로그나 게시판 업로드 목적이라면 출처를 꼭 남겨주세요. Undo와 Redo 시연영상 1 Undo와 Redo 시연영상 2 안녕하세요. 오랜만입니다. 매크로 사용의 단점이 뒤로가기랑 앞으로 가기가 안된다는 점인데요. 그러면 데이터를 잘못입력했을 때 상당히 곤란하겠죠? 원본 데이터는 날라가고 재고는 바꼈고 매우 곤란해집니다. 그래서 Undo(뒤로가기)와 Redo(앞으로가기)를 구현했습니다. 코드가 조금 많기도하고 견적서 입력코드와 제거 코드도 약간의 변경이 있습니다. 1. 입고견적서입력 코드 Sub 입고견적서입력() Dim data As Integer Dim Transcation As Integer Dim overlap As Boolea..

※ 코드와 파일은 상업적 이용, 개인적 이용이 모두 가능합니다. 다만, 블로그나 게시판 업로드 목적이라면 출처를 꼭 남겨주세요. 해당 프로그램을 사용하다보면, 실수로 두 세번 누르거나, 견적서를 바꾸지않은채로 한번 더 클릭할 때가 있습니다. 그럴때 밑에까지 스크롤을 내리며 내가 잘못 입력했던 전표가 맞는지 확인하고 delete해야합니다. 그런데, 차라리 넣은 바로 직후 잘못된걸 깨달으면 그나마 지우기 쉽겠지만, 혹시라도 중간에 중복데이터가 섞여들어갔다면 일일히 확인하고 찾아내야되는데, 이게 보통일이 아니죠.. 그래서 중복 확인을 하고 중복된 견적서를 업로드하려고하면 이를 억제하여 업로드를 못하도록 업그레이드하였습니다. 중복 확인을 하는 가장 좋은 방법은 거래마다 넘버를 부여하고 해당 넘버가 이미 존재한다..

※ 제 코드와 파일은 상업적 이용, 개인적 이용이 모두 가능합니다. 다만, 게시판이나 블로그에 업로드할 목적이라면 꼭 출처를 남겨주시기바랍니다. 안녕하세요. 저번시간엔 입고와 출고시 견적서의 데이터만으로 자동으로 데이터를 입력하는 것에 대해 얘기했죠? 오늘은 입고와 출고를 할 경우 보유하고 있던 재고가 자동으로 변화하는 프로그램을 만들어보겠습니다. 우선 영상부터 보시죠. 영상잘보셨나요? 영상에서 보신 것처럼 입고견적서의 데이터를 갱신하기 위해 갱신 버튼을 누르면 재고가 +되고, 출고견적서의 데이터를 갱신하기 위해 갱신 버튼을 누르면 재고가 -되는데요. 견적서에 중복된 데이터가 있으면 그 두개의 합만큼 재고가 늘어나거나 줄어드는 것도 보실 수 있습니다. 거두절미하고 코드부터 공개할게요. 1. 입고시 재고 ..

안녕하세요 반갑습니다. 저번 업로드는 입고견적서의 데이터를 입고데이터로 옮기는 코드를 제공해드렸는데요. 그럼 출고 견적서의 데이터도 출고 데이터로 옮길 수 있는 프로그램이 되어야겠죠? 코드는 아래와 같습니다. Sub 출고견적서입력() Dim input_data As String Dim data As Integer data = 3 Do While (Cells(data, "B").Value "") data = data + 1 Loop input_data = "B" & Trim(Str(data)) & ":" & "E" & Trim(Str(data + 100)) Range(input_data).Value = Worksheets("출고견적서").Range("B3:E100").Value End Sub 입고견적서의 ..