Auto complete macro using similar word in document (light weight version)

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"


Example:
[Sample text]

Scripting Language JavaScript
Scripting Language VBScript
Scripting Language Perl
Scripting Language Python
Scripting Language JavaScript VBScript Perl Python
Scripting Language JavaScript VBScript Perl Python

[Completion example]
('!' denotes completion execution.)

Scripting Language JavaScript
S!! L! VBScript
Sg! L! Perl
Sg! L! Python
Sg! L! J! V! Pe! Py!
Sg!!!!!!!!!!!