İpucu: Digər dillər Google-tərcümə olunur. Sizi ziyarət edə bilərsiniz English bu linkin versiyası.
Daxil ol
x
or
x
x
Qeydiyyatdan
x

or

Word sənədində paraqrafları tapmaq və vurğulamaq necədir?

Şübhəsiz ki, yüzlərlə səhifəyə sahib ola biləcək böyük bir Word sənədiniz var, indi duplicate paraqraflar olub-olmadığını yoxlamaq və sonra təkrarlanan cümlələri ilə məşğul ola bilərsiniz ki, onları görkəmli etmək üçün vurğulamaq istəyirəm. Word sənədində tez və asanlıqla yinelenen paraqrafları necə tapmaq və qeyd etmək olar?

VBA koduyla Word sənədində cüt paraqrafları tapın və vurun


VBA koduyla Word sənədində cüt paraqrafları tapın və vurun

Bir Word sənədində cüt paraqrafları tapmaq və vurğulamaq üçün aşağıdakı VBA kodunu bir xeyir edə bilərsiniz, xahiş edirik bunu:

1. Basıb saxlayın ALT + F11 düymələri açmaq üçün Proqramlar üçün Microsoft Visual Basic pəncərə.

2. Və sonra basın Taxmaq > Modules, kodu aşağıda açıq blank moduluna kopyalayın və yapışdırın:

VBA kodu: Word sənədində dublikat paraqraflarını tapın və vurun:

Sub highlightdup()
    Dim I, J As Long
    Dim xRngFind, xRng As Range
    Dim xStrFind, xStr As String
    Options.DefaultHighlightColorIndex = wdYellow
    Application.ScreenUpdating = False
    With ActiveDocument
        For I = 1 To .Paragraphs.Count - 1
            Set xRngFind = .Paragraphs(I).Range
            If xRngFind.HighlightColorIndex <> wdYellow Then
                For J = I + 1 To .Paragraphs.Count
                    Set xRng = .Paragraphs(J).Range
                    If xRngFind.Text = xRng.Text Then
                        xRngFind.HighlightColorIndex = wdBrightGreen
                        xRng.HighlightColorIndex = wdYellow
                    End If
                Next
            End If
        Next
    End With
End Sub

3. Və sonra basın F5 bu kodu çalıştırmak üçün bir tuşa basın, bütün duplicate cümlələri bir anda vurğulanır, ilk görüntülenen yinelenen paragraflar yeşil renk ile vurgulanır ve diğer kopyalar sarı renkle vurgulanır, ekran görüntüsüne baxın:

doc qeydləri dup cümlələri 1



Word üçün Kutools

100, 2003, 2007, 2010, 2013 və 2016 üçün 2019 Ətraflı funksiyaları

shot-kutools-700-225-kte

Daha çox xüsusiyyətlər | Pulsuz Yüklə | Yüzlərlə funksiya üçün yalnız $ 39.00

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    dvid · 6 months ago
    I tried, and it works fine!
    I just wanted to know - could I do the same thing - but not a whole paragraph, but a sentence with a few words I'd set up - like 10 words?
  • To post as a guest, your comment is unpublished.
    Juliana · 6 months ago
    Tentei e não funcionou, só da que parou de funcionar.