엑셀 고수님께 자문을 구합니다~~    글쓴이:apollon3 , Hit : 1266

- File #1 : 엑셀_예제.xlsx(9.1 KB), Download : 46

엑셀에서 이런 작업은 어떻게 처리해야할지 난감하네요.. 파일 보시면 변경전 부분에서 B4 셀에 '나비' 라는 셀을 삭제하고 이후 데이터를 전부 당겨서 변경후와 같은 형태로 만들고자 합니다. 예제처럼 데이터가 작으면 아주 간단하지만 방대한 양이고 잦은 변동을 해야할 경우  완전 노가다를 해야 합니다. 엑셀 이외에도 상기 작업을 쉽게 할수 방법을 알려주시면 감사하겠습니다~~

apollon3 회원님의 소개글이 없습니다. 정보력:940 친절도:230

베르테르 정보력:1580 친절도:1310   09-15 23:56 모바일- 매크로로 저장후 단축키 지정하시면 될것같네요

maxtein 정보력:1660 친절도:1306   09-16 00:42 나비 셀에서 마우스 우클릭후 삭제 선택후 셀을 왼쪽으로 밀기 해보세요..

한반장 정보력:490 친절도:753   09-16 10:18 여러 고수님들이 해결책을 올려주고 계시네요... 그런데, 방대한 양이라고 말씀 하셨는데.....행과 열이 어느정도 규모인지 아니면 정확한 행과 열의 숫자가 있는건지 알려주시면 더 정확한 해결책이 나오지 않을까 합니다.

스머프 정보력:250 친절도:53   09-16 11:22 이렇게 이해하면될까 모르겠네요. 메크로로 대충 만들어 봤습니다. 예제파일 오픈하셔서 엑셀에서 Alt+f11키 누르면 나오는 창에서, 상단메뉴에 삽입=>모듈 누르면 나오는 창에 아래 내용 복사해서 붙여넣으세요. 다시 엑셀로 돌아가셔서, B4셀을 삭제가 아니고, 그냥 Del키 눌러서 내용을 지우세요. 그다음에, Alt+f8키 눌러서 뜨는 메크로 창에서 "자료_재정리" 선택해서 실행버튼 클릭하세요. 처음 입력창(작업할 범위를 선택)에 마우스로 A2셀에서 E6셀 범위 드래그해서 선택하고 확인 버튼 누릅니다. 다음 입력창(결과를 쓸 셀 선택)에 마우스로 G2셀 선택하고 확인 버튼 누릅니다. 그러면 예제파일 변경후처럼 결과 보실 수 있으실 겁니다. 그리고 저장하실때는 다른이름으로 저장 하셔서 파일형식을 Excel 메크로 사용 통합문서로 변경해서 저장하세요. 아마도 확장자자 .xlsm으로 될 겁니다. =============아래========== Option Explicit Sub 자료_재정리() Dim Rng_from, Rng_to As Variant Dim 자료범위X, 자료범위Y, 카운트, i, j, k As Integer Dim 읽은자료(1000000) Set Rng_from = Application.InputBox(prompt:="작업할 범위를 선택", Type:=8) Set Rng_to = Application.InputBox(prompt:="결과를 쓸 셀 선택", Type:=8) If Rng_from.Cells.Count = 1 Then 자료범위Y = 1 자료범위X = 1 Else 자료범위Y = UBound(Rng_from.Value, 1) 자료범위X = UBound(Rng_from.Value, 2) End If '************************* '빈칸이 없는 셀에 자료만 순차로 읽어드리기 '************************* 카운트 = 0 For i = 1 To 자료범위X For j = 1 To 자료범위Y If Rng_from(i, j).Value <> "" Or Rng_from(i, j).Value <> Empty Then 카운트 = 카운트 + 1 읽은자료(카운트) = Rng_from(i, j).Value End If Next j Next i '************************* '결과쓰기 '************************* Range(Rng_to.Address).Select k = 0 For i = 1 To 자료범위X For j = 1 To 자료범위Y k = k + 1 ActiveCell.Offset(i - 1, j - 1).Value = 읽은자료(k) Next j Next i End Sub 추천:^^;

apollon3 정보력:940 친절도:230   09-16 11:49 역시 투피입니다.. 눈에는 쉬워 보여도 이렇게나 어려운 작업이었군요... 그게 뭐 어렵냐고 질책하는 상사에게 좀 보여줘야 겠습니다...ㅎㅎ 문서에 따라서 데이터의 규모가 달라서 일정하지는 않구요...제가 올린 엑셀 예제 파일에서 가로, 세로의 양만 더 늘어났다고 보시면 됩니다..

스머프 정보력:250 친절도:53   09-16 12:22 모바일- 최대 100만개(셀 한개가 자료1개 기준)까지 처리하게 변수크기를 정해 두었구요.필요하시면 수정하시면 더 많은 자료 처리가능 합니다. 그리고 가로 세로 양이 변하더라도 대응할 수 있게 범용성 있게 만들었습니다. (사용자가 작업범위 지정하게) 잘 사용 하시길...