AutoHotkey Community

Code: Select all

Text := "
(
Here is a line with a lot of text.
Here is a line with the word often used.
This line has little content.
Another line with often and much.
One further line without matching words.
Example line with often and much.
)"


Word1 := "often"
Word2 := "much"

; Split the text into lines
Lines := StrSplit(Text, "`n")

; Iterate through each line
NewText := ""
Loop, % Lines.MaxIndex()
{
    Line := Lines[A_Index]

    ; Check if the line contains both word1 and word2
    if !(InStr(Line, Word1) && InStr(Line, Word2))
    {
        ; Add the line to the new text if both words are not present
        NewText .= Line "`n"
    }
}

; Output the result
MsgBox % NewText

Code: Select all

Text :=
(
"Here is a line with a lot of text.
Here is a line with the word often used.
This line has little content.
Another line with often and much.
One further line without matching words.
Example line with often and much.
And I can do this as often as I want to.
See? Not much to dislike here..."
)
Word1 := "often"
Word2 := "much"
NewText := RegExReplace(Text, "[^\r\n]*\b((" word1 ")|(" word2 "))\b[^\r\n]*\b((?(2)(?3)|(?2)))\b[^\r\n]*[\r\n]*")
MsgBox % NewText

Code: Select all

#Requires AutoHotkey v1.1.33.11
txt := "
(
Here is a line with a lot of text.
Here is a line with the word often used.
This line has little content.
Another line with often and much.
One further line without matching words.
Example line with often and much.
)"
word1 := "often"
word2 := "much"
b     := "\b.*\b"
regex := "m`ai)^.*\b(" word1 b word2 "|" word2 b word1 ")\b.*$\R?"
txt   := Trim(RegExReplace(txt, regex), " `t`r`n")
MsgBox 64, Result, % txt