Macro for Data Validation AutoComplete

I have a List of Items in Sheet1 say around 3000 items, in column "B"

In Sheet2 in entire column "D" I want to create a Macro in such a way that when I type any Letter Eg. "A" it should display all items starting with Letter "A", after finding all options from Sheet1 from column "B"

Then after "A" if I type "AB" it should show all items beginning with word "AB"

Then "ABC" should show "ABC"

This is because if there is a spelling mistake it will sound alert.

For Example The system should work the same way when we type a formula "=s" it shows all the combinations for "=s"

I know this will work with data validation, But I want to create a Macro.

Because creating Data Validation and copying in entire column D will make the file large.

I have attached the sample file.

As the attached file is a sample the contents are completely different.

I have made 2 Sheets,

Sheet1 and Sheet2

In Sheet2 I have written brief note.

One more request there should be only One Macro for substitute for Data validation should be applicable for entire column in "D" in Sheet2 and not a Macro for each Cell individually.

I am aware of that function also but the combo box I would then have to scroll down and search for the word in my list.

Where as typing and getting the list of all combination of the letter would be much faster and easier.

As said in my first post "=s" would display all the combination of "=s"

Wonderful.

Thanks