Create A macro , which fills the blanks in a sentence.

[ankushk268]

I want a macro in which I need 4 INPUT FEILDS to give the input values (ASIN,BRAND,`BATTERY POWER ,COMPATIABLE DEVICE).
Once i click on the run macro , the above input data should be filled according to the ASIN for the below sentences :-
Intro:

This powerful Power bank from the house of BRAND helps you to rule out of the worry of your phone running out of charge. With BATTERY POWER maH power, it can charge your phone fast and safely. With matte finish body and light weight, this power bank becomes a stylish accessory and is comfortable to carry around with you everywhere.

Compatibility:

The power bank is compatible with COMPATIABLE DEVICE.

The out of the macro should be "ASIN" in front of that it should show above 2 sentences with the values entered for the BRAND , BATTERY POWER, COMPATIABLE DEVICE.

 

[ranman256]

sub btnSave_click()
range("A1").value = "This powerful Power bank from the house of " & txtBox1 & " helps you to rule out of the worry of your phone running out of charge. With " & txtBox2 & "  maH power, it can charge your phone fast and safely. With matte finish body and light weight, this power bank becomes a stylish accessory and is comfortable to carry around with you everywhere."

range("A4").value = "The power bank is compatible with " & txtBox3 & "."
end sub

 

[ankushk268]

sub btnSave_click()
range("A1").value = "This powerful Power bank from the house of " & txtBox1 & " helps you to rule out of the worry of your phone running out of charge. With " & txtBox2 & "  maH power, it can charge your phone fast and safely. With matte finish body and light weight, this power bank becomes a stylish accessory and is comfortable to carry around with you everywhere."

range("A4").value = "The power bank is compatible with " & txtBox3 & "."
end sub

but we need to inset the values in the txtbox1 and txtbox2 and txtbox3 from a input file