PQ - make new column by extracting a word from a cell that contains a $ sign

[sandy666]

(question from the web)

How do I extract from my column A a word that contains in it a $ sign.
For instance the data in column A would look something like

A1 = 5465 Apples$50 Twenty
A2 = 5687 Grapes$597 Three

answer:
B1 = Apple$50
B2 = Grapes$597

Apple$50 and Grapes$597 needs to be extracted to a new column of the same row.

Source		Source	Result
5465 Apples$50 Twenty		5465 Apples$50 Twenty	Apples$50
5687 Grapes$597 Three		5687 Grapes$597 Three	Grapes$597

let 
    Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
    Result = Table.AddColumn(Source, "Result", each if Text.Select([Source],"$")="$" then Text.BetweenDelimiters([Source], " ", " ") else null)
in
    Result

[DocAElstein]

The Original question is for a PQ solution, but just for comparison, here are some extra solutions using Excel Formulas and VBA coding:
https://excelfox.com/forum/showthrea...ll=1#post15462