1. FAQ
  2. 엑셀(Excel)
  3. AfterEffects
  4. Premiere
  5. Photoshop
  6. ETC

이 게시판은 아별닷컴 회원만 질문을 올릴 수 있습니다. 회원에게 주어지는 특권인셈이지요. 회원이 아닌 분들은 열람만 가능합니다.

아래 코드는 가령, B1~B200셀을 범위 선택하고 매크로를 실행하면 B1셀을 복사하여 B2 셀에 수식복사 B3셀을 복사하여 B4셀에 수식복사 등등 위 셀을 복사하여 아래셀에 수식복사하는 코드입니다.

그런데 B1~B2셀 병합, B3~B4셀 병합, ..... B199~B200셀병합 되어 있는 상태에서  B1~B200셀을 범위 선택하고 매크로를 실행하면

오류가 납니다. 셀이 병합되어 있어도 실행되게 하려면 어떻게 수정되어야 하는지요?

병합이 2개가 될 수도 있고 3개가 될 수도 있습니다. 범위내에서의 병합은 항상 규칙적입니다.


Sub 셀아래로_수식복사(ByVal Target As Range)


    Dim oComment   As Comment
   
    For Each rCell In Target.Areas
        With rCell
            For r = 1 To .Rows.Count Step 2
                .Rows(r).Copy
                .Rows(r + 1).PasteSpecial xlPasteFormulas '수식 복사
                .Rows(r + 1).PasteSpecial xlPasteComments '메모 복사
            Next r
        End With
    Next rCell
    Application.CutCopyMode = False
End Sub

문서 첨부 제한 : 0Byte/ 2.00MB
파일 제한 크기 : 2.00MB (허용 확장자 : *.*)
List of Articles
번호 제목 글쓴이 날짜 조회 수
공지 공지 [공지] 아별닷컴의 엑셀 질문방 폐쇄합니다. 카페 질문방 이용하세요.. imagefile [레벨:30]아별 2015-04-23 18284