엑셀13 다중 엑셀 복사하기 - 1 오늘 같이 일하는 회사동료가 엑셀파일 합치고, 거기서 데이터가공하고 숫자 뽑는걸 편하게 하라고 일을 도와줬습니다. 해외법인 자금일보중에 특정국가시트만 복사해서 공백있는 칸들을 제외하고, 복사해서 30개이상의 엑셀파일을 조지는일을 비주얼베이직으로 만들어줘서 도와줬습니다. 먼저 엑셀일 킨다음 ALt + F11키를 누른후에 위 삽입 -> 모듈에 들어갑니다. 그리고 나서 아래 내용을 복사해주면 되는데 Sub MergeAndProcessFilesWithSelectiveCopyAndValueInsertion() Dim ws As Worksheet, newWs As Worksheet Dim wb As Workbook, newWb As Workbook Dim myPath As String, myFile As Strin.. 2023. 11. 14. 엑셀 매크로(기초) 값 복사 붙여넣기 오늘은 간단하게 엑셀 복사붙여 넣기 매크로에 대해서 알아보아요. 이 기능은 평소 복사 붙여넣기 할때는 별 쓸모없고 서식이 정해져있는것을 일정주기마다 반복하는 업무를 할때 쪼오금 시간을 줄여줄 수 있을거같아요. 복사 붙여넣기 할때 두가지 방법이 있어요. 첫번째는 매크로 기록/정지 기능을 통한 매크로방식 두번쨰는 vba를 통한 방식 사실 두개다 결과는 같아요. 과정이 다를뿐 오늘은 두개 방법 다 알려드릴꼐요. 첫번째 매크로기록을 통한 방법이에요. 이렇게 당월 값을 전월로 복사붙여넣기 하고, 당월을 지우는 그런 매크로를 매크로 기록/정지 기능을 통해 만들어볼께요. 엑셀 상단에 보기를 누르신후 오른쪽에 보이시는 매크로를 누르면 매크로기록이라는 걸 눌러주세요. 이름은 대충 복사붙여.. 2022. 12. 28. 엑셀 시트별로 각각 따로 저장하기 엑셀 매크로 1. 엑셀 특정 셀A2의 명칭이 시트이름으로 바뀌는 매크로 셀A2의 값이 시트이름으로 변경 Sub 시트이름바꾸기() Dim rs As Worksheet For Each rs In Sheets rs.Name = rs.Range("A2") Next rs End Sub 2. 시트의 이름으로 해당 시트가 저장되는용도(xls로 저장됨) Sub 저장매크로() Dim i As Long For i = 1 To Sheets.Count ActiveWorkbook.Sheets(i).Select ActiveSheet.Copy ActiveWorkbook.SaveAs ThisWorkbook.Path & "\" & ActiveSheet.Name & ".xls", FileFormat:=xlWorkb.. 2022. 12. 10. 엑셀 여러파일 한개 파일로 합치기 회사에서 업무를 하다보면, 취합하는 업무가 있을겁니다. 여러 관계사에서 자료를 받고, 그 자료를 취합하는데 있어서 01. 여러엑셀파일을 한 엑셀로 다 옮기고 02. 여러시트를 한개의 시트로 합치는 그런 매크로입니다. 03. 그 이후 함수걸어서 취합하시면 편하게 일하실거에요! 마찬가지로 이처럼 취합할 자료들이 있습니다. 이 엑셀에는 여러개의 시트가 있고, 시트가 병합되어있는것도 있습니다. 첨부된 파일을 여시면 이렇게 되어있습니다. 여기서 병합을 누르신후에 취합하고자 하는 엑셀파일을 여시면 해당엑셀파일명_시트이름으로 이 매크로파일에 전부 복사가 됩니다. 그리고 취합을 누르면 sheet1에 해당 시트들이 전부 복사가 됩니다. 세상에는 똑똑하신분들이 참 많네요 항상 감사합니다. #엑셀 #취합 #매크로.. 2022. 12. 10. 이전 1 2 3 4 다음
