David는 찾기 및 바꾸기를 사용하여 텍스트 상자 또는 차트의 레이블에서 텍스트를 찾고 수정할 수 있는지 궁금합니다. 짧은 대답은 불가능하지만 시도 할 수있는 몇 가지 해결 방법이 있습니다.

첫째, 텍스트 상자 또는 차트 레이블의 텍스트를 동적으로 쉽게 만들 수 있으므로 일부 워크 시트 셀의 내용에 연결됩니다. 예를 들어, 텍스트 상자에 대해 다음을 수행 할 수 있습니다.

  1. 각 텍스트 상자의 텍스트를 워크 시트의 셀 범위로 복사합니다. (이 예에서는 10 개의 텍스트 상자의 내용을 Z1 : Z10 범위에 복사했다고 가정합니다.)

  2. 첫 번째 텍스트 상자 (Z1 셀에 해당하는 텍스트 상자)를 선택하고 텍스트 상자의 내용을 제거합니다.

  3. 텍스트 상자가 선택된 상태에서 수식 입력 줄에 = Z1을 입력합니다. Enter 키를 누르면 텍스트 상자에 Z1 셀의 내용이 반영됩니다.

  4. 3 단계에서 각각 적절한 셀 참조를 사용하여 다른 텍스트 상자 각각에 대해 2 단계와 3 단계를 반복합니다.

그게 다야. 사용자 정의 차트 레이블에 동일한 기술을 사용할 수 있습니다. 차트 레이블을 선택하고 수식 막대에 셀 참조를 입력하기 만하면됩니다. 텍스트 상자와 차트 레이블이 워크 시트 셀에 연결되어 있으면 찾기 및 바꾸기를 사용하여 셀의 정보를 쉽게 검색하고 변경할 수 있습니다. 변경이 이루어지면 텍스트 상자와 차트 레이블이 자동으로 셀의 변경 사항을 반영해야합니다.

텍스트 상자 또는 차트 레이블 내의 텍스트를 실제로 변경하는 유일한 방법은 수동으로 변경하거나 매크로를 사용하여 변경하는 것입니다. 코드는 워크 시트의 각 텍스트 상자를 단계별로 실행 한 다음 변경해야합니다. 다음은 이러한 변경을 수행 할 수있는 간단한 매크로 버전입니다.

Sub TextBoxReplace()

Dim shp As Shape     Dim sOld As String     Dim sNew As String

'Change as desired     sOld = "Old string"

sNew = "New string"

On Error Resume Next     For Each shp In ActiveSheet.Shapes         With shp.TextFrame.Characters             .Text = Application.WorksheetFunction.Substitute( _               .Text, sOld, sNew)

End With     Next End Sub

이 매크로는 워크 시트의 모든 셰이프 (텍스트 상자는 셰이프)를 단계별로 실행 한 다음 sOld 변수에있는 항목을 sNew 변수에있는 항목으로 바꿉니다. 차트 레이블에 동일한 기술을 적용하는 것은 다음 매크로에 표시된 것처럼 조금 더 복잡합니다.

Sub ChartLabelReplace()

Dim Cht As ChartObject     Dim Ser As Series     Dim scPt As Point     Dim sOld As String     Dim sNew As String

'Change as desired     sOld = "Old String"

sNew = "New String"

On Error Resume Next     For Each Cht In ActiveSheet.ChartObjects         For Each Ser In Cht.Chart.SeriesCollection             For Each scPt In Ser.Points                 With scPt.DataLabel                     .Text = Application.WorksheetFunction.Substitute( _                       .Text, sOld, sNew)

End With             Next         Next     Next End Sub

매크로는 모든 차트의 모든 데이터 시리즈에 대한 각 데이터 레이블을 단계별로 수행하고 (다시) sOld에있는 모든 인스턴스를 sNew에있는 모든 인스턴스로 바꿉니다.

_ 참고 : _

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

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

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

이 팁 (9264)은 Office 365의 Microsoft Excel 2007, 2010, 2013, 2016, 2019 및 Excel에 적용됩니다. 여기에서 Excel의 이전 메뉴 인터페이스에 대한이 팁 버전을 찾을 수 있습니다.

link : / excel-Finding_and_Replacing_in_Text_Boxes [텍스트 상자에서 찾기 및 바꾸기].