Using the "find search"

You could find potential adjectives with code like:

Sub Demo()

Dim wdSynInfo As SynonymInfo, wdSynList As Variant

Dim StrTxt As String, StrOut As String, StrTmp As String

Dim i As Long, j As Long

StrTxt = " ": StrOut = "Potential Adjectives:"

With ActiveDocument.Range

  For i = 1 To .Words.Count

    StrTmp = Trim(.Words(i))

    If InStr(1, StrTxt, " " & StrTmp & " ", vbTextCompare) = 0 Then

      StrTxt = StrTxt & StrTmp & " "

    End If

  Next

  StrTxt = Trim(StrTxt)

  For i = 0 To UBound(Split(StrTxt, " "))

    StrTmp = Split(StrTxt, " ")(i)

    Set wdSynInfo = SynonymInfo(Word:=StrTmp, LanguageID:=wdEnglishUS)

    If wdSynInfo.MeaningCount <> 0 Then

      wdSynList = wdSynInfo.PartOfSpeechList

      For j = 1 To UBound(wdSynList)

        If wdSynList(j) = wdAdjective Then

          StrOut = StrOut & Chr(11) & StrTmp

          Exit For

        End If

      Next

    End If

  Next

  .InsertAfter vbCr & StrOut

End With

End Sub

The above macro outputs a list of potential adjectives at the end of the document.

Once you start analysing the output, you'll find the code demonstrates a fundamental problem; many words exist in more than one part of speech. The part of speech a word belongs to depends on its context and there is no definitive solution apart from one that employs contextual analysis - which you can't do with a macro.

I added some predefined search lists of words that now come with the free  AuthorTec Find'n Highlight add-in. There are 9 lists. For example, there's now a list of Adjectives (1349 words, at least it's a good start.) that you can add and modify.

Hi fluffy,

If you built the text file list of adjectives you are looking for, you could then use my AuthorTec Find'n Highlight add-in to locate them in the document.

The add-in is free, part of my community service support. Click the above link to download it.

Hope it helps

No Unfortanely this kind of function is no available yet.
Maybe a macro but no sure about it.

As I see it , is difficult for a program or app to decide whether a determined word is an adjective .For example, "Slow" is an adjective , but , let's say "She runs slow, the same word is an adverb that modifies the action.