실시간 데이터 값이 같을때 그 값을 어떻게 기록하나요?

VBA
작성자
나민준
작성일
2023-01-27 15:05
조회
1750
엑셀버전 : M365

운영체제 : 윈도우10

질문 요약 : 각 행에 셀 값이 같을 때 값을 기록

안녕하세요 엑셀 작업하다 문제가 생겨서 글 올립니다.

실시간으로 변하는 값이 있습니다. 각 행마다 2개의 셀이 붙은상태로 차례로 있는데요.

이때 2셀이 서로 같은 값일 때 그 값을 오른쪽 셀에 각각 기록할려고 합니다.

몰론 숫자 값만 붙여넣고 실시간 데이터는 반영되지 않도록 하는 것입니다.

그냥 if 함수로 하면 기록되지 않고 자꾸 변해서 기록이 되지 않습니다.

그래서 vba 코드를 만들기 했는데 잘 되지 않습니다. 좀 도와주시면 감사하겠습니다.

설명이 부족하거나 잘못된 점이 있으면 언제든지 말해주세요

캡처.PNG

신고
스크랩
공유
회원등급 : 4레벨
포인트 : 161 EP
총질문 : 1 개 (마감율 : 100%)
채택답변 : 0 개
전체 7

  • 2023-01-27 15:50

    @나민준 님 함수를 사용해보시는건 어떨까요?

    C3에는 =if($A3=$B3,A3,"")

    D3에는 =if($A3=$B3,"O","X")

     

    vba로 하실려면

    sub 매크로1()

    dim K as integer

    dim i as integer

    with sheet1

    K = .cells(.rows.count,1).end(xlup).row

    for i = 3 to k

    if .range("A" & i) = .range("B" & i) then

    .range("C" & i) = .range("A" & i).value

    .range("D" & i) = "O"

    else

    .range("C" & i) = ""

    .range("D" & i) = "X"

    end if

    next

    end with

    end sub


    • 2023-01-27 15:58

      @또가즈아 님 댓글은 감사하지만 제 설명이 부족한건지 "O" 또는 "X"가 아니고 같은(중복)값을 오른쪽 셀에 표시하고 싶습니다. 그리고 말씀하신 IF함수로 적용했을 때는 두 값이 일치해도 값이 달라지면 기록한 값이 사라지기 때문에 제가 원하는 결과는 아닙니다 ㅠ 그래도 감사합니다


      • 2023-01-27 17:00

        @나민준 님 이렇게 하면 기존 값은 사라지지 않고 계속 있을듯 싶어요 제가 이해한게 맞나 잘 모르겠네요ㅠㅠ

        sub 매크로1()

        dim K as integer

        dim i as integer

        with sheet1

        K = .cells(.rows.count,1).end(xlup).row

        for i = 3 to k

        if .range("C" & i) = "" then

        if .range("A" & i) = .range("B" & i) then

        .range("C" & i) = .range("A" & i).value

        end if

        end if

        next

        end with

        end sub


  • 2023-01-27 16:08

    @나민준 님 저 코드만 보면 값이 같을때만 카피를 하는데,

    연속적으로 값이 입력되어서 다른 값이 나온다면 카피를 안하는게 맞습니다.

    실시간으로 값이 바뀐다는게 업데이트 될때 두 셀이 동시에 비워졌다가 새 값을 받아서 써지는거라면

    비어있는 셀 끼리도 같은 값인걸로 보고 사라지는거 같은데

    단순히 저 if 안에 if를 하나 더 넣어서 ="" 나 isempty일때 copy를 실행하지 않게 하면 될거 같네요


    • 2023-01-27 16:41
      채택된 답변

      sheet2 에서 f9를 눌러 계속 계산해보세요

      rand 함수로 임의 숫자를 나오게해서 같을 경우 c열에 값을 넣도록 구현했습니다.

      2023-01-27-163945.gif

      첨부파일 : 예제-1.xlsm


      • 2023-01-27 16:49

        @춘식 님 오오 이거 맞는거 같습니다. 진짜 감사드립니다 도와주셔서 정말 감사드려요


    • 2023-01-27 16:47

      @춘식 님 먼저 댓글 써주셔서 감사합니다.

      여기서 실시간 값은 DDE(엑셀 연동 시스템)으로 증권사에서 바로 데이터를 받아 오는건데 셀이 비워졌다가 새 값을 받는 건 아닌것 같아요 여러번 확인했습니다. 좀더 이해하기 쉽게 동영상을 올려야 할걸 제 실수로 못했습니다. 아 그리고 값이 기록되고 사라지는 것은 IF vba코드가 아니고 IF함수를 셀에 작성했을 때 이고요 vba 코드에서는 실제로 원하는 결과가 나왔지만 그거는 매크로를 실행 했을때 순간만 된거고 실시간으로 계속 매크로가 실행되지는 않았습니다.혹시 실시간으로 매크로를 실행하는 법만 아시면 그거만이라도 알려주시면 감사하겠습니다.


전체 18,532
번호 카테고리 제목 작성자 작성일 추천 조회
알림
[📚진짜쓰는 실무엑셀] IT/오피스 '1위' 베스트셀러! 엑셀 공부, 이 교재로 마스터하세요! (315)
오빠두엑셀 | 2022.02.03 | 추천 575 | 조회 609830
오빠두엑셀 2022.02.03 575 609830
공지사항 문서서식
⭐ [더 나은 커뮤니티 문화를 위한 Q&A 글 작성 규칙] ⭐ (197)
오빠두엑셀 | 2021.10.28 | 추천 310 | 조회 35557
오빠두엑셀 2021.10.28 310 35557
78582 함수/공식
New 조건 함수 의 관한 문의 엑셀파일첨부파일 (4) 답변완료
예쁜나야 | 2025.05.13 | 추천 0 | 조회 56
예쁜나야 2025.05.13 - 56
78580
New 날짜와 시간 분할 방법 알려 주세요 엑셀파일첨부파일 (2) 답변완료
계양산 지기 | 2025.05.13 | 추천 0 | 조회 46
계양산 지기 2025.05.13 - 46
78575 VBA
New 엑셀 재고관리 프로그램 문의드립니다.. 첨부파일 (2)
SJ | 2025.05.13 | 추천 0 | 조회 82
SJ 2025.05.13 - 82
78570 대시보드
New 대시보드에 표 형식으로 표현도 가능한가요? 첨부파일 (2)
룰루랄라 | 2025.05.12 | 추천 0 | 조회 83
룰루랄라 2025.05.12 - 83
78569 함수/공식
New 서로 다른 양식의 견적서 엑셀 파일 한곳에 정리 하기 (5)
gh**** | 2025.05.12 | 추천 0 | 조회 108
gh**** 2025.05.12 - 108
78565 함수/공식
New 검색보고서 만들기 질문드립니다. 엑셀파일 (9) 답변완료
만식이햄 | 2025.05.12 | 추천 0 | 조회 92
만식이햄 2025.05.12 - 92
78563 VBA
New VBA 수정 부탁드립니다. ㅠ (3)
서비 | 2025.05.12 | 추천 0 | 조회 84
서비 2025.05.12 - 84
78560 함수/공식
New 어떻게 내용을 가져올수 있을지 고수님들의 해결방법들을 공유 받고 싶습니다!!.... 엑셀파일첨부파일 (2)
꾸르형 | 2025.05.12 | 추천 0 | 조회 49
꾸르형 2025.05.12 - 49
78559 파워쿼리/피벗
New 엑셀 자동화 질문 입니다... 엑셀파일 (2) 답변완료
안녕하세여11 | 2025.05.12 | 추천 0 | 조회 69
안녕하세여11 2025.05.12 - 69
78555 함수/공식
New 시트에서 원하는 열의 자료만 가져오고싶은데 아무리 해도 수식오류가 나서 도움을 구하고자 합니다 엑셀파일 (4) 답변완료
khs**** | 2025.05.12 | 추천 0 | 조회 47
khs**** 2025.05.12 - 47
78554 함수/공식
New 변동하는 절대참조값 적용 (6) 답변완료
화이또! | 2025.05.12 | 추천 0 | 조회 71
화이또! 2025.05.12 - 71
78553 대시보드
New 대시보드_슬라이서 자동으로 눌러지게 하는방법 첨부파일 (1)
검도림 | 2025.05.12 | 추천 0 | 조회 52
검도림 2025.05.12 - 52
78548 대시보드
New 어떤 엑셀을 적용해야하는 지 문의드립니다! (1)
룰루랄라 | 2025.05.11 | 추천 0 | 조회 71
룰루랄라 2025.05.11 - 71
78546 함수/공식
New 월별 매출액 자동입력할 수 있는 방법 또는 함수 궁금합니다! 엑셀파일 (2)
mmm1010 | 2025.05.11 | 추천 0 | 조회 89
mmm1010 2025.05.11 - 89
78544 함수/공식
New 중복값 제거 함수에 관하여 엑셀파일첨부파일 (1) 답변완료
김지훈(Derek) | 2025.05.11 | 추천 0 | 조회 80
김지훈(Derek) 2025.05.11 - 80
78543 함수/공식
New 데이터 추출 및 정렬관련 초보질문 엑셀파일첨부파일 (5) 답변완료
김지훈(Derek) | 2025.05.11 | 추천 0 | 조회 76
김지훈(Derek) 2025.05.11 - 76
78540 함수/공식
New 오빠두LIVE 219회 - 엑셀 '셀 병합' 자동화 보고서 만들기 오빠두엑셀님의 방법이 궁금합니다. 첨부파일
AURIC | 2025.05.10 | 추천 0 | 조회 64
AURIC 2025.05.10 - 64
78536 함수/공식
New 월별로 금액적용후 최종월에 차액을 가감 함수가 필요해요 엑셀파일 (1) 답변완료
낮은자 | 2025.05.10 | 추천 0 | 조회 68
낮은자 2025.05.10 - 68
78535 기능/도구
New 엑셀로 25x25 인쇄가 가능한가요? (1)
망나 | 2025.05.10 | 추천 0 | 조회 52
망나 2025.05.10 - 52
78534 파워쿼리/피벗
New 쿼리에 함수 적용한 열 추가 시 24:00:00 활용한 계산 함수 필요할 때. 첨부파일 (2) 답변완료
신노스케 | 2025.05.10 | 추천 0 | 조회 69
신노스케 2025.05.10 - 69
78531 차트/그래프
New 엑셀 차트 데이터테이블 엑셀파일첨부파일 (1)
| 2025.05.09 | 추천 0 | 조회 76
2025.05.09 - 76
78530 구글시트
New 구글 스프레드시트 함수 관련 질문입니다. 엑셀파일첨부파일 (2)
동그이 | 2025.05.09 | 추천 0 | 조회 68
동그이 2025.05.09 - 68
78528 구글시트
New 구글 스프레드시트를 외부 엑셀 파일과 연동하는 방법이 궁금합니다. (3)
머우터덩 | 2025.05.09 | 추천 0 | 조회 72
머우터덩 2025.05.09 - 72
78525 문서서식
New 업무가 진행이 안 될 정도로, 해당 파일이 느립니다! 엑셀파일 (2)
빌스택스 | 2025.05.09 | 추천 0 | 조회 96
빌스택스 2025.05.09 - 96
78520 기능/도구
New 하이퍼링크 명칭 해제 (1)
min | 2025.05.09 | 추천 0 | 조회 54
min 2025.05.09 - 54
78518 피벗테이블
New 피벗테이블 관련 화살표 질문 첨부파일
이모비니 | 2025.05.09 | 추천 0 | 조회 50
이모비니 2025.05.09 - 50
78516 함수/공식
New 호봉산정 엑셀 문의드립니다. 엑셀파일첨부파일 (2) 답변완료
아르카디안 | 2025.05.08 | 추천 0 | 조회 61
아르카디안 2025.05.08 - 61
78515 함수/공식
New 엑셀 질문 드립니다.ㅠ.ㅠ 첨부파일 (1)
숲의사제 | 2025.05.08 | 추천 0 | 조회 57
숲의사제 2025.05.08 - 57
78511 함수/공식
New 입사일자로 부터 매년 알림 (2)
국빱 | 2025.05.08 | 추천 0 | 조회 73
국빱 2025.05.08 - 73
78510 문서서식
New 조건부 서식 적용 문의 엑셀파일첨부파일 (2) 답변완료
장수벌레 | 2025.05.08 | 추천 0 | 조회 103
장수벌레 2025.05.08 - 103