F1:N1 범위만 누적하려면 해당 범위만 선택해 복사하면 됩니다. Range("F1:N1").Copy 그리고, 당연하지만 배경색도 구분해 처리할 수 있습니다. If Range("F1").Interior.Color = RGB(색상번호, 색상번호, 색상번호) Then ' 복사 코드 End If 답변을 참고해 보시고, 매크로를 업무에 활용하려면 VBA에 대한 공부를 제대로 시작하는 것을 권합니다.
함수(Function)와 매크로(Sub)는 동작되는 방식이 다릅니다. 이런 방식으로 누적시키는 작업은 함수로 처리하는 것이 아니라 매크로로 동작시켜야 합니다. 매크로가 불편한다면, 이벤트를 활용할 수 있지만, 이벤트는 제대로 제어하지 않으면 잘못된 결과를 반환할 수도 있으므로, 현재와 같은 방법을 가장 추천합니다.
코드를 원하는 방식으로 수정하려면 VBA에 대한 이해가 필수적입니다. 아래 코드 부분을 Range("B3:G3").Copy 기록위치 다음과 같이 수정하면 됩니다. With Range("B3").CurrentRegion .Offset(1).Resize(.Rows.count-1).Copy 기록위치 End With 매크로를 업무에 활용하려면 [매크로&VBA 바이블] 책을 꾸준하게 참고해 학습해 보세요~
1개의 시트에서 다른 1개의 시트로 옮기는 것은 이 영상을 참고하면 너무나 도움이 될 것 같습니다! 그치만 현재 저는 위 영상에서 DB 시트같은게 1개 있고 매일매일 시트가 1개씩 추가가 됩니다. 그리고 추가적으로 DB시트 말고 첫 번째 시트에서 넘어온 데이터가 DB시트에 쌓이면 +1 카운트를 하고 다음날 시트에서도 데이터를 불러오는데 첫 번째 시트에 있는 값과 중복이면 또 +1이고 새로운 데이터면 그 아래행에 입력하고 싶습니다... 이럴 경우엔 어떻게 하면 좋을까요..?! ㅠㅠ
한동안 일이 있어 댓글에 답변이 늦었습니다. 그런 식으로 작업하려면, 값이 있는지 여부를 찾아.. 값을 증가 시키도록 코드를 짜야 하는데.. 댓글로 모두 설명 드리기는 어려우니.. 카페에 파일 첨부해 다른 분들의 도움을 받아 보세요! 다만.. 제가 영상에서도 설명 드렸듯, 기본적으로 매크로를 업무에 활용하려면 VBA 공부를 하셔야 합니다. 열공하세요~
컴파일 오류가 발생했다는 것은 구문 오류, 즉 오타가 발생했을 가능성이 높습니다. 코드가 입력된 화면을 중단하고, 작성하신 코드와 비교해 보세요! 해결이 되지 않는다면, 카페 내 [질문/답변] 란에 코드가 작성된 파일을 첨부해 질문해 주세요 매크로는 이런 영상 만으로는 제대로 배우긴 쉽진 않습니다. [매크로&VBA 바이블] 책이나 [매크로&VBA 업무 공략집] 책 중 하나를 참고해서 꾸준하게 학습해 보세요~
그러면 선택하여 붙여 넣기 기능이 동작되도록 코드를 수정해야 합니다. 데이터를 복사하는 코드 부분을 다음과 같이 수정해 보세요~ Range("B3:G3").Copy Sheets("DB").Select Range("B11").PasteSpecial xlPasteValues Application.CutCopyMode = False
확인이 늦었습니다. 오른쪽으로 보내려면 [기록위치] 변수를 다음과 같이 설정하면 됩니다. Set 기록위치 = Sheets("DB").Cells(3, Columns.Count).End(xlToLeft).Offset(, 1) 위 코드를 보고 바로 활용할 수 있다면 다행이겠지만, VBA에 대한 지식이 없다면 제대로 활용하기 어려울 수 있습니다. 그런 경우라면 [매크로&VBA 바이블] (한빛미디어) 책을 꾸준하게 먼저 공부해 보세요~~
코드는 심플해서 따로 속도가 느릴 이유는 없지만, 다른 위치에 수식을 많이 사용하고 있다면 느린 반응이 나올 수 있습니다. 기타 다른 문제가 있을 수 있으니, 좀 더 자세한 답변을 원한다면 네이버 카페 [엑셀..하루에하나씩]의 [질문/답변] 란을 이용해 파일 첨부해 문의하세요~
스프레드시트에서도 가능은 하겠지만, 매크로(=구글에서는 스크립트라고 합니다.)로 처리하려면 java script을 이용할 수 있어야 합니다. 또한 구글 스프레드시트에서 스크립트를 사용하기 위한 단계나 절차가 엑셀 매크로와는 다르므로, 이런 부분에 맞춰 모두 설명 드리려면 따로 영상을 제작해야 할 것 같은데, 구글 스프레드시트 관련 주제에 대한 영상이 별로 인기가 없어 이 부분은 고민해 봐야 할 것 같습니다. 참고하세요!
이 영상의 후속 영상이 등록되었으니.. 아래 영상을 함께 참고하시면 도움이 되실 겁니다.
- ruclips.net/video/TWFTpLikKqM/видео.html
와!! 누적데이터용 매크로 필요했는데 너무 감사합니다! 7년전에 하루하나님 카페에서 참 많이 공부했었는데 이렇게 유튜브로도 배울 수 있어서 너무 좋습니다!!
도움이 되셨다면 다행입니다. 열공하세요 ^^
감사합니다. 엘셀신이다. ㅠㅠㅠㅠ 너무나 감사해요 저의 삶이 나아졌습니다
도움이 되셨다면 다행입니다. 열공하세요
제가 정확히 원하던 것입니다. 감사합니다. 선생님
인사 감사합니다. 이 영상이 도움이 되셨다면, 아래 영상도 함께 참고해 보세요!
- ruclips.net/video/TWFTpLikKqM/видео.html
와... 너무 감사합니다! 자주 영상보고 열심히 공부해볼게요! 감사합니다!
도움이 되셨다니 다행입니다. 열공하세요~
천재다…
감사합니다! 너무 필요했던 정보인데 그대로 따라하기만 했더니 사용할수있게됐습니다!! :) 하나씩 따라가면서 배워볼게요 ㅎ 감사합니다
도움이 되셨다니 다행입니다. 그래도 매크로는 책 한권 정도는 꾸준하게 공부하는 것을 권합니다.
선생님, 도움이 많이 되었습니다ㅜㅜ! 문의 드릴 게 있는데 선택된 범위가 C1:N1일 경우 F1:N1 열에 값이 있는 행만 누적해서 기록하는 방법이 있을까요? 그리고 행마다 배경색이 입혀져 있는데 특정 배경색이 적용된 행만 붙여넣는 방법이 있을지 궁금합니다!
F1:N1 범위만 누적하려면 해당 범위만 선택해 복사하면 됩니다.
Range("F1:N1").Copy
그리고, 당연하지만 배경색도 구분해 처리할 수 있습니다.
If Range("F1").Interior.Color = RGB(색상번호, 색상번호, 색상번호) Then
' 복사 코드
End If
답변을 참고해 보시고, 매크로를 업무에 활용하려면 VBA에 대한 공부를 제대로 시작하는 것을 권합니다.
선생님 강의 하신내용을 함수로 만들수 있는 방법이 있나요 ? 불가능한가요? 누적만시키면됩니다.
함수(Function)와 매크로(Sub)는 동작되는 방식이 다릅니다.
이런 방식으로 누적시키는 작업은 함수로 처리하는 것이 아니라 매크로로 동작시켜야 합니다. 매크로가 불편한다면, 이벤트를 활용할 수 있지만, 이벤트는 제대로 제어하지 않으면 잘못된 결과를 반환할 수도 있으므로, 현재와 같은 방법을 가장 추천합니다.
감사합니다~~ 하나만더 문의 하겠습니다
하단에 누적시켜서 입력하는데 이걸 값으로붙여넣기로 하고싶습니다(다른문의에서는 누적이 아니라서 문의드림니다)
값만 붙여 넣으려면.. 복사하는 코드를 다음과 같이 수정하면 됩니다.
Range("주소").Copy
Range("붙여넣을위치").PasteSpecial xlPasteValues
정말 감사합니다`~~ ^^
매크로는 정말 공부하고 싶어지는 거 같아요 :) 좋은 강의 듣고 갑니다! 항상 책으로 많은 도움 얻고 있습니다 ㅎㅎ..
열공하셔서 원하는 실력을 얻을 수 있길 바랍니다.
와 원하는걸 정확하게 알았어요❤
도움이 되셨다면 다행입니다. 열공하세요~
감사합니다~~~~ 딱 필요한 매크로 입니다~ 문의드릴께 하나있습니다 입력시트에서는 세로로입력하고 출력시트(DB)에서는 가로로출력할려면 어떻게 해야하나요???
도움이 되셨다면.. 다행입니다.
문의하신 내용은 아래 코드를
Range("B3:G3").Copy 기록위치
다음과 같이 수정해 보세요!
Range("B3:B8").Copy
기록위치.PasteSpecial Transpose:=True
편안한 주말 되시길 바랍니다.
자세히 잘 설명해주셔서 고맙습니다. 직접 따라 해보니 되는것이 신기하네요 그런데 궁금한것이 한줄씩만 입력이 되던데 A시트의 여려 행을 B시트하단에 그 여러개행으로 입력시키려면 어떵게 해야하나요?
코드를 원하는 방식으로 수정하려면 VBA에 대한 이해가 필수적입니다.
아래 코드 부분을
Range("B3:G3").Copy 기록위치
다음과 같이 수정하면 됩니다.
With Range("B3").CurrentRegion
.Offset(1).Resize(.Rows.count-1).Copy 기록위치
End With
매크로를 업무에 활용하려면 [매크로&VBA 바이블] 책을 꾸준하게 참고해 학습해 보세요~
@@excel.master 친절한 답변 감사드립니다. 유튜브로 하나하나 배워나가려하는데 선생님 영상 구독하고 열심히 보고 배우겠습니다. 고맙습니다.
와 잘 보고 갑니다
네 시청해주셔서 감사합니다
안녕하세요~ 위 영상까지는 적용 가능하네요 감사합니다!
혹시 B시트 하단에 누적 뿐만아니라 C, D, E, F, G 시트 즉 다중시트에 누적시키는 건 어떻게 하면 좋을까요??
안녕하세요..
하나가 아니라 여러 시트에 넣으려면 [기록위치] 변수가 여러 개이거나, 시트를 순환하면서 데이터를 복사-붙여 넣기하는 방법이 필요합니다. 이런 부분에 대해 정확한 답변을 얻으시려면, 카페의 [질문/답변] 란에 파일 첨부해 질문해 보는 것이 좋습니다.
1개의 시트에서 다른 1개의 시트로 옮기는 것은 이 영상을 참고하면 너무나 도움이 될 것 같습니다! 그치만 현재 저는 위 영상에서 DB 시트같은게 1개 있고 매일매일 시트가 1개씩 추가가 됩니다. 그리고 추가적으로 DB시트 말고 첫 번째 시트에서 넘어온 데이터가 DB시트에 쌓이면 +1 카운트를 하고 다음날 시트에서도 데이터를 불러오는데 첫 번째 시트에 있는 값과 중복이면 또 +1이고 새로운 데이터면 그 아래행에 입력하고 싶습니다... 이럴 경우엔 어떻게 하면 좋을까요..?! ㅠㅠ
한동안 일이 있어 댓글에 답변이 늦었습니다.
그런 식으로 작업하려면, 값이 있는지 여부를 찾아.. 값을 증가 시키도록 코드를 짜야 하는데..
댓글로 모두 설명 드리기는 어려우니.. 카페에 파일 첨부해 다른 분들의 도움을 받아 보세요!
다만.. 제가 영상에서도 설명 드렸듯, 기본적으로 매크로를 업무에 활용하려면 VBA 공부를 하셔야 합니다.
열공하세요~
많은 도움이 되었습니다. 감사합니다.
후반에 나온 영상 내용 중에
입력 위치가 세로인 경우에는
처음에 설명해 주셨던 표에 참조를 걸면 된다고 하셨잖아요.
참조하는 방법은 어떤 영상을 참고 하면 될까요?
도움이 되셨다니 다행입니다.
댓글로 보아 이미 영상을 찾으신 것 같네요.. 열공하세요~
영상을 보고 덕분에 누적 데이터 만들었는데
혹시 누적데이터를 1234 순이 아니라
321 순으로 할 수 있게도 만들 수가 있을까요?
기존의 데이터를 밀어내고 첫번째 자리로 오게 끔..
그렇게 하려면 먼저 3행에 빈 행을 하나 삽입하고,
Sheets("DB").Rows(3).Insert Shift:=xlDown
복사된 데이터를 새로 삽입한 행에 붙여 넣기 해 주면 됩니다.
Range("B3:G3").Copy Sheets("DB").Range("B3")
차분하고 좋은 강의 감사드립니다. 쌩초보라서 그대로 따라했는데 컴파일 오류가 나옵니다. "B" 왜일가요?
컴파일 오류가 발생했다는 것은 구문 오류, 즉 오타가 발생했을 가능성이 높습니다.
코드가 입력된 화면을 중단하고, 작성하신 코드와 비교해 보세요!
해결이 되지 않는다면, 카페 내 [질문/답변] 란에 코드가 작성된 파일을 첨부해 질문해 주세요
매크로는 이런 영상 만으로는 제대로 배우긴 쉽진 않습니다.
[매크로&VBA 바이블] 책이나 [매크로&VBA 업무 공략집] 책 중 하나를 참고해서 꾸준하게 학습해 보세요~
질문을 계속드려서 죄송합니다 ㅜㅜ
Range("주소").Copy
Range("붙여넣을위치").PasteSpecial xlPasteValues
여기서 "붙여넣을위치"를 sheets("DB").Cells(Rows.Count, "B").End(xlUp).Offset(1) 여기에 누적하고 싶십니다 감사하고 죄송합니다~~
제가 출강으로 댓글 확인을 잘 하지 못했습니다.
질문하신 내용은 다음과 같이 하면 됩니다.
Range("주소").Copy
Sheets("DB").Cells(Rows.count, "B").End(xlUp).Offset(1).PasteSpecial xlPasteValues
"기록위치' 셀에 붙여넣을때, 값만 붙여넣기 하려면 어떻게 해야할까요?
그러면 선택하여 붙여 넣기 기능이 동작되도록 코드를 수정해야 합니다.
데이터를 복사하는 코드 부분을 다음과 같이 수정해 보세요~
Range("B3:G3").Copy
Sheets("DB").Select
Range("B11").PasteSpecial xlPasteValues
Application.CutCopyMode = False
아래로 추가 말고 옆으로 추가는 어떻게 해야하나요ㅠ 매크로 신상아 입니다..
확인이 늦었습니다.
오른쪽으로 보내려면 [기록위치] 변수를 다음과 같이 설정하면 됩니다.
Set 기록위치 = Sheets("DB").Cells(3, Columns.Count).End(xlToLeft).Offset(, 1)
위 코드를 보고 바로 활용할 수 있다면 다행이겠지만, VBA에 대한 지식이 없다면 제대로 활용하기 어려울 수 있습니다. 그런 경우라면 [매크로&VBA 바이블] (한빛미디어) 책을 꾸준하게 먼저 공부해 보세요~~
적용완료했는데, 적용하니깐 엄청 속도가 느리게 입력이 옮겨가는데 렉 해결법은 없나요!
코드는 심플해서 따로 속도가 느릴 이유는 없지만, 다른 위치에 수식을 많이 사용하고 있다면 느린 반응이 나올 수 있습니다.
기타 다른 문제가 있을 수 있으니, 좀 더 자세한 답변을 원한다면
네이버 카페 [엑셀..하루에하나씩]의 [질문/답변] 란을 이용해 파일 첨부해 문의하세요~
안녕하세요. 이거 스프레드 시트로 할 수 있는 방법 없을까요?ㅠㅠ
스프레드시트에서도 가능은 하겠지만, 매크로(=구글에서는 스크립트라고 합니다.)로 처리하려면 java script을 이용할 수 있어야 합니다. 또한 구글 스프레드시트에서 스크립트를 사용하기 위한 단계나 절차가 엑셀 매크로와는 다르므로, 이런 부분에 맞춰 모두 설명 드리려면 따로 영상을 제작해야 할 것 같은데, 구글 스프레드시트 관련 주제에 대한 영상이 별로 인기가 없어 이 부분은 고민해 봐야 할 것 같습니다. 참고하세요!
@@excel.master 아ㅠㅠㅠㅠ
해당 영상을 응용해서 스크립트 메크로로 만드려고 했는데
밑에서 한 칸 위로 올라가는 부분의 수식을 못 쓰겠어서 댓글 남겼어요.
영상은 번거로우실 것 같아서 괜찮아요. 아무튼 답변해주셔서 감사합니다. 영상 잘 보고 있습니다!