Auto complete macro using similar word in document

Auto complete macro using Find function. The macro completes a string by searching for the similar word in the document without need for a pre-registered keyword list.

For instance, if "EmEditor" already exists in the document,

"EE" -> "EmEditor"

If "document.selection.Text" already exists in the document,
"d.s.T" -> "document.selection.Text"