파란바람 이야기

안녕하세요. 셀에 값을 입력하면 자동으로 동작하는 작업을 원하는 경우가 있습니다. Worksheet_change 이벤트가 이럴 때 사용하는 이벤트입니다. 완성 파일 다운로드 [G2:H4], [J2:K4] 셀 범위에 값을 입력하면 [D2:E4] 셀 범위 수식이 계산되고 D열과 E열 값이 1 이상이고, 두 값이 같으면 A열에 'a'를 나타내고 B열에 시간을 나타내는 동작을 합니다. Private Sub Worksheet_Change(ByVal Target As Range) Dim KeyCells As Range Set KeyCells = Range("G2:H2,J2:K2") If Not Application.Intersect(KeyCells, Range(Target.Address)) Is Nothing Th..

완전히 구현된 것이 아닙니다. 이곳 저곳 정보를 검색해 적당히 수정했습니다. github.com/anteater333/8-puzzle anteater333/8-puzzle 부경대학교 2020 컴퓨터공학과 인공지능 과목 과제#2. Contribute to anteater333/8-puzzle development by creating an account on GitHub. github.com 이곳에 문제 정의와 C#으로 해결한 코드가 있습니다. ddae9.tistory.com/8 [백준-11112] Eight Puzzle (Astar Algorithm) 문제 요약 8-Puzzle 게임을 푸는 문제이다. 3x3 보드판에 한칸의 빈공간, 나머지 칸에는 1~8 숫자가 무작위로 위치해 있다. 빈칸과 숫자의 자리를..

거래일자, 거래시간, 거래금액이 입력된 데이터가 있습니다. 실습 파일 다운로드 [C5] 셀 -149,900 은 [C3] 셀 149,900이 취소된 값을 의미합니다. VBA로 작성했습니다. Public Sub 찾기() i = 3 cnt = 0 Do If Range("C" & i).Value < 0 Then cnt = cnt + 1 Range("D" & i).Value = cnt j = i - 1 Do If Range("C" & j).Value = Abs(Range("C" & i).Value) And Range("D" & j).Value = "" Then Range("D" & j).Value = cnt Exit Do End If j = j - 1 Loop End If i = i + 1 Loop While R..

안녕하세요. 자주 찾는 커뮤니티 사이트에 엑셀 관련 질문이 올라와 있었습니다. www.clien.net/service/board/kin/16003781?od=T31&po=6&category=0&groupCd=community 엑셀에서 중복값 강조와 제거를 같이 할 수 있을까요? : 클리앙 제가 원하는건 중복이 있었던건 표시된 후, 하나만 남기고 삭제되는건데용 중복값 표시 후 중복값 제거하면 중복되는 데이터가 없기 때문에 표시가 사라집니다 ㅠ countif를 써서 다른 셀에서 중 www.clien.net 이미 답글이 달려 있었고, VBA로 처리한 댓글도 있었습니다. VBA 반복문으로 처리하는 작업입니다. Sub 중복제거얍() Dim i As Double Dim j As Double Dim firstRow ..

안녕하세요. 데이터 파일 없이 글로 올려진 질문에 답을 할 때는 고급 필터에 COUNTIF 함수로 조건을 설정하면 되는 작업으로 보였었습니다. 막상 메일로 받은 데이터 파일을 보니 생각했던 것과는 다른 모습이었습니다. 6시 근무자와 14시 근무자를 D열부터 R열에 적었고, S열부터 근무하지 않은 명단을 나타내는 것입니다. 전체 명단은 AA열과 AB열에 기록되어 있습니다. 한참 생각해 봤지만 함수나 엑셀 기능으로 나타낼 방법은 없어 보입니다. 방법은 VBA로 작성하는 것입니다. 사용자 지정 함수로 만들고 싶었지만 결과값이 한 셀에만 나타나는 것이 아니라 여러 셀에 나타나는 것이라 프로시저로 처리했습니다. 커서는 결과를 나타낼 셀 [S7]에 둡니다. 매크로를 실행하야 하는데, [보기]-[매크로]-[매크로 보..

안녕하세요. VLOOKUP 함수 마지막 인수 Range_lookup과 MATCH 함수 마지막 인수 Match_type은 찾는 방법을 정하는 인수 입니다. Range_lookup 인수는 0, 1의 두 가지 값 중 하나를 입력하고, Match_type 인수는 1, 0, -1의 세가지 값 중 하나를 입력합니다. 0은 두 인수 모두 정확하게 찾기를 선택하는 값이고, 나머지는 비슷하게 찾기를 선택하는 값입니다. 확인된 내용은 아니지만, VLOOKUP 함수는 INDEX 함수와 MATCH 함수를 이용해 찾기/참조 수식을 작성하다 자주 사용되는 경우에 사용할 수 있도록 나중에 개발된 함수인 것으로 생각됩니다. 그래서 MATCH 함수 인수보다 VLOOKUP 함수 인수는 간단하게 만들어져 있습니다. MATCH 함수 마지막..

안녕하세요. 평균을 구할 범위와 기간을 정하면 범위로 선택한 데이터 중 최근 데이터 순서로 지정한 기간만큼 평균을 구하도록 사용자 지정 함수를 만들어 보겠습니다. 선택한 범위 모든 셀에 값이 들어 있는 것이 아니기 때문에 값이 들어 있는 셀만 대상으로 작업을 해야 합니다. VBE를 실행해 코드를 작성합니다. Public Function 주어진범위평균(범위 As Range, 개월 As Integer) Dim 배열(100) Dim 합 As Double i = 1 For Each 셀 In 범위 If 셀 "" Then 배열(i) = 셀 i = i + 1 End If Next 셀 i = i - 1 If i < 개월 Then 주어진범위평균 = "값 부족" Else For j = i To i - 개월 + 1 Step..

안녕하세요. 한글 기능 중 개요와 문단 번호 기능은 비슷한 역할을 하는 기능으로 어떨 때 어떤 기능을 써야할지 헷갈립니다. 두 기능을 섞어 쓰거나 스타일은 문단 번호/글머리기호 기능까지 설정하면 번호가 꼬이는 경우가 많습니다. 두 기능의 공통점과 차이점을 알아 보겠습니다. 개요와 문단 번호 기능은 각각 7수준까지 번호를 매기고, 번호를 매긴 문장의 순서가 바뀌면 번호도 자동으로 바뀌는 기능을 제공합니다. 개요 기능은 구역 단위로 모양을 바꿀 수 있고, 같은 구역 안에서는 한가지 개요 모양을 가지며, 앞 개요 번호에 이어서 번호를 매기게 됩니다. 문단 번호 기능은 문단마다 서로 다른 번호 모양을 가질 수 있고, 시작 번호도 임의로 변경할 수 있습니다. help.hancom.com/hoffice/webhel..

데이터베이스 프로그램에서처럼 여러 개의 테이블로 나뉘어져 여러 시트에 나타낸 데이터를 피벗 테이블로 분석할 때 관계를 설정해 나타내는 방법을 소개합니다. 여러 시트를 통합한 피벗테이블 생성하기 feat.데이터모델링 - YA-Hwang 기술 블로그 Excel에서 여러 시트를 통합하는 데이터모델링에 대해 알아본다. yahwang.github.io 문제는 엑셀에 이렇게 시트를 나눠 입력할 정도라면 그냥 데이터베이스 프로그램을 이용해 구성하는 경우가 대부분이라는 것입니다.

질문을 받아 처리했습니다. 자주 받는 질문인데, 많은 내용을 알지 못해도 여러 상황에서 이용할 수 있는 방법입니다. 매일 매출과 입금 내역을 특정 셀 범위에 입력한 뒤 정해진 셀 위치로 복사하는 작업입니다. 매크로를 이용하면 쉽게 처리할 수 있습니다. 두가지 작업인데, 첫번째는 매출입력입니다. [W4] 셀에 작업일이 있고, 아래에 카드사별 매출을 입력한 뒤 매출입력 단추를 누르면 해당 날짜에 나타나는 것입니다. 두번째는 입금입력입니다. [C39:M46] 셀 범위에 입력된 데이터를 해당 날짜 해당 위치로 복사합니다. Public Sub 매출입력() '작업일 확인 작업일 = Day(Range("W4")) 행 = 작업일 + 5 ' 1일인 경우 6행에 입력 Range("C" & 행).Value = Range("..