Note: The other languages of the website are Google-translated. Back to English

Word 문서의 이미지 수를 계산하는 방법은 무엇입니까?

인라인 이미지와 플로팅 셰이프가 모두 포함 된 Word 문서에 여러 그래픽이있는 경우 이제 전체 문서에서 이러한 그래픽의 수를 세고 싶습니다. 어떻게 이미지 수를 빠르고 정확하게 얻을 수 있습니까?

찾기 및 바꾸기 기능으로 인라인 이미지 수 계산

VBA 코드로 인라인 이미지와 플로팅 셰이프의 수를 계산합니다.


찾기 및 바꾸기 기능으로 인라인 이미지 수 계산

또한 찾기 및 바꾸기 Word의 기능을 사용하면 인라인 그림 수를 빠르고 쉽게 계산할 수 있습니다. 다음과 같이하십시오.

1. 딸깍 하는 소리 > 발견 > 상세 검색, 스크린 샷 참조 :

문서 수 이미지 1

2. 에서 찾기 및 바꾸기 대화 상자에서 발견 탭에서 ^g무엇을 찾기 텍스트 상자를 선택한 다음 주요 문서 인사말 찾기 드롭 다운 목록, 스크린 샷 참조 :

문서 수 이미지 2

3. 그러면이 Word 문서의 인라인 이미지 수가 다음 스크린 샷과 같이 표시되는 것을 볼 수 있습니다.

문서 수 이미지 3


VBA 코드로 인라인 이미지와 플로팅 셰이프의 수를 계산합니다.

위의 방법은 인라인 이미지의 수만 계산할 수 있으며 문서에 부동 모양이있는 경우 계산되지 않습니다. 다음 VBA 코드는 인라인 이미지와 플로팅 셰이프를 모두 계산하는 데 도움이 될 수 있습니다. 다음과 같이하십시오.

1. 누르고 ALT + F11 키를 눌러 응용 프로그램 용 Microsoft Visual Basic 창.

2. 그런 다음 끼워 넣다 > 모듈, 아래 코드를 복사하여 열린 빈 모듈에 붙여 넣으십시오. 스크린 샷을 참조하십시오.

VBA 코드 : 인라인 이미지와 플로팅 셰이프의 수를 계산합니다.

Sub CountImagesInDoc()
    Dim xInlines As Long
    Dim xFloaters As Long
    Dim sh As Shape
    Dim tbxs As Long
    Dim msg As String
    With ActiveDocument
        For Each sh In .Shapes
            If sh.Type = msoTextBox Then tbxs = tbxs + 1
        Next
        xInlines = .InlineShapes.Count
        xFloaters = .Shapes.Count - tbxs
    End With
    xPrompt = "Inline images:" & vbTab & xInlines & vbCr
    xPrompt = xPrompt & "Floating shapes:" & vbTab & xFloaters & vbCr
    xPrompt = xPrompt & vbTab & "Total:" & vbTab & (xInlines + xFloaters) & vbCr
    xPrompt = xPrompt & "Counts do not include headers and footers, etc."
    MsgBox xPrompt, vbInformation, "Kutools for Word"
End Sub

3. 코드를 붙여 넣은 후 F5 키를 눌러이 코드를 실행하면이 Word 문서에있는 인라인 이미지와 플로팅 셰이프의 수를 알려주는 프롬프트 상자가 나타납니다. 스크린 샷을 참조하십시오.

문서 수 이미지 4



추천 단어 생산 도구

 

Word 용 Kutools-Word 용 100 개 이상의 고급 기능으로 50 % 시간 절약

  • 복잡하고 반복되는 작업은 몇 초 만에 한 번 처리 할 수 ​​있습니다.
  • 여러 폴더의 이미지를 한 번에 Word 문서에 삽입합니다.
  • 폴더에있는 여러 Word 파일을 원하는 순서대로 하나로 병합하고 결합합니다.
  • 제목, 섹션 나누기 또는 기타 기준에 따라 현재 문서를 별도의 문서로 분할합니다.
  • Doc과 Docx, Docx와 PDF, 일반적인 변환 및 선택을위한 도구 모음 등의 파일 변환 ...
코멘트 (0)
아직 평가가 없습니다. 가장 먼저 평가하세요!
아직 코멘트가 없습니다
여러분의 의견을 남겨
게스트로 게시
×
이 게시물 평가 :
0  등장 인물
추천 위치