David는 큰 워크 시트에 부분합 (데이터 | 부분합)을 추가하고 부분합 셀을 다른 셀로 이동하는 방법을 찾고있었습니다. 예를 들어 Excel에서 자동 부분합을 추가 할 때 S 열에 추가되고 Excel에서 추가 한 SUBTOTAL 수식이 S 열의 셀 범위를 참조한다고 가정합니다. David는 SUBTOTAL 수식 (및 해당 수식 만)을 외부로 이동하려고합니다. 열 S에서 열 T로, 수식이 여전히 S 열의 세부 사항을 참조하도록합니다.

한 가지 옵션은 SUBTOTAL 수식을 한 번에 하나씩 원하는 위치로 이동하는 것입니다. (셀의 복사본을 만들기 위해 Ctrl + C 및 Ctrl + V 대신 Ctrl + X 및 Ctrl + V를 사용하여 셀을 이동합니다.) 워크 시트가 크고 부분합이 많으면 매우 지루할 수 있습니다. 빨리.

Excel의 Tedium은 종종 매크로를 만드는 주요 원동력입니다. 이 경우도 예외는 아닙니다. SUBTOTAL 수식의 실제 이동을 수행하는 매크로를 만들 수 있습니다. 다음 예를 고려하십시오.

Sub MoveSubtotals()

Dim rCell As Range     Dim rng As Range     Dim iCol As Integer     Dim iOffset As Integer

iCol = 19  '19 is Column S     iOffset = 1 'Positives go right, negatives go left     Set rng = Intersect(Selection.CurrentRegion, Columns(iCol))

For Each rCell In rng         If InStr(rCell.Formula, "SUBTOTAL") Then             rCell.Offset(0, iOffset).Formula = _                 rCell.Formula             rCell.ClearContents         End If     Next End Sub

이 예제는 S 열에서 선택한 각 셀을 검사하여 작동합니다. 셀의 공식에 SUBTOTAL이라는 단어가 포함 된 경우 공식은 T 열의 오른쪽으로 한 열 복사되고 S 열의 셀에서 삭제됩니다. 변경할 수 있습니다. iOffset 변수에 할당 된 값을 변경하여 부분합이 이동되는 왼쪽 또는 오른쪽 거리. (셀 범위를 선택한 상태에서 매크로를 실행해야하며 해당 선택의 일부에 S 열이 포함되어야합니다.)

_ 참고 : _

이 페이지 (또는 ExcelTips 사이트의 다른 페이지)에 설명 된 매크로를 사용하는 방법을 알고 싶다면 유용한 정보가 포함 된 특별 페이지를 준비했습니다.

link : / excelribbon-ExcelTipsMacros [새 브라우저 탭에서 특별 페이지를 열려면 여기를 클릭하세요].

_ExcelTips_는 비용 효율적인 Microsoft Excel 교육을위한 소스입니다.

이 팁 (2119)은 Microsoft Excel 97, 2000, 2002 및 2003에 적용됩니다. 여기에서 Excel (Excel 2007 이상)의 리본 인터페이스에 대한이 팁의 버전을 찾을 수 있습니다.

link : / excelribbon-Moving_Subtotals [Moving Subtotals].