컴퓨터를 만나는 기쁨

1. 문제 아래와 같이 전기 재고가 있고, 입고와 출고가 되었을 때 먼저 들어온 것이 먼저 나가도록 한 후 재고를 구하는 것이 선입선출법(FIFO : First In First Out)입니다. 입고 순서는 아래와 같습니다. 예를 들어 A품목의 경우 전기 재고가 20개 있고, 출고가 140개 되었으므로 입고 물량을 120개 차감해야 하는데, 선입선출이므로 1월 물량부터 순서대로 차감합니다. 1월 물량이 20, 2월 물량이 30, 3월 물량이 30, 4월 물량 30을 더하면 110이 되므로 5월 물량 20개 중 10개가 남고, 6월 물량 10개는 모두 남아서 재고 금액은 5월 10개 * 53 + 6월 10개 * 54 = 1,070이 됩니다. 이와 반대되는 것으로 나중에 들어온 것부터 차감하는 것을 후입선출법..

복사할 범위와 붙여 넣을 범위가 모두 필터링된 경우에 복사해서 붙여 넣기를 다뤄보겠습니다. 1. 작업 내용 사례로서 적합한 데이터는 아니지만 첫 번째 시트에는 가락2동으로 필터 된 데이터가 있고, 두 번째 시트는 가락1동으로 필터 된 데이터가 있어서 첫 번째 시트의 내용을 복사해서 두 번째 시트에 붙여 넣으면 9행이 아니라 숨겨진 행인 7,8행에 붙여 넣기가 됩니다. 따라서, 매크로를 작성해서 처리해야 합니다. 2. 논리 복사할 범위도 필터링되어 있기 때문에 for c in PasteRange for d in CopyRange 라고 CopyRange에서 화면에 보이는 셀(범위)만 하나씩 실행하는 것을 생각할 수 있는데, 이렇게 하면 이중 반복문이므로 붙여 넣을 범위의 행수 * 복사할 범위의 행수만큼 반복..

1. 구문 VBA에서 사용하는 AutoFilter 메서드의 구문은 아래와 같습니다. expression.AutoFilter (Field, Criteria1, Operator, Criteria2, SubField, VisibleDropDown) ㅇ expression : Range 오브젝트를 반환하는 표현, 예, ActiveCell, Selection, Range("A1") 등 ㅇ Field : filter를 배치하려고 하는 영역의 offset(상대적 위치) 순번(index)으로 목록의 가장 왼쪽이 1 임. 따라서, 목록(list)이 A열부터 시작한다고 하면 A열이 1이지만, B열부터 시작한다고 하면 B열이 1이 됨 ㅇ Criteria1 : 조건1 ㅇ Operator : 필터에 적용되는 조건과 관련된 연산..

1. CurrentRegion의 주소 확인하기 CurrentRegion(현재 영역)의 설정 범위를 알아보기 위해 VB Editor를 실행한 후 코드를 작성해 보겠습니다. 가. 코드 작성 모듈을 삽입한 다음 아래와 같이 코드를 작성합니다. Sub cur_range_addr() Dim cur_range As Range Set cur_range = Range("a2").CurrentRegion MsgBox cur_range.Address End Sub 나. 코드 설명 Dim cur_range As Range : 현재 영역을 저장하기 위한 변수 cur_range를 Range(범위) 형식으로 선언합니다. Set cur_range = Range("a2").CurrentRegion : - 일반적인 변수는 cur_ra..

1. 다른 시트 참조 데이터는 Sheet1에 있고, 검색은 Sheet2에서 한다고 할 때 Shee2의 B2셀에 커서를 넣고, =vlookup(a2, 까지 입력한 후 아래 부분의 Sheet1 탭을 클릭하고, 마우스 왼쪽 버튼을 누른 후 B2셀에서 D16셀까지 끈 다음 왼쪽 버튼을 뗍니다. 그러면 Sheet1!B2:D16이 입력되는데, 절대 참조형식으로 바꾸기 위해 F4키를 누릅니다. =VLOOKUP(A2,Sheet1!$B$2:$D$16까지 입력됐는데, 지점명을 구해야 하므로 열 순번 2를 입력하고, 정확히 일치하는 값을 찾기 위해 False 또는 0을 입력하고, (괄호를 닫은 다음) 엔터 키를 누릅니다. 그러면 A가 구해지고 B3셀로 이동하는데, B2셀을 클릭하면 수식은 아래와 같습니다. 수식 A2에서 A..