Looking for VBA that by clicking button translates English text from one cell (B2) and pastes French translation in different cell (M2)

[MJ72]

I have managed to get a msg box to pop up with the translation but really what I want is to be able to enter text into cell B2, press a button and have the translated text appear in cell M2.

Thoughts?

 

[John_w]

How are you translating the text? Post your code.

Alternatively, put the code here in a module:

Google Translate Macro Function - How to rafear to Cell and/or Text in Quotes?

Hello experts, i modify actual script to create a function in Excel to translate from Google Translator with formula. In order to work, you need to add Reference "Microsoft Internet Controls" (Tools>References) I create it referring to a cell range value with syntax...

www.mrexcel.com

and assign this macro to your button:

Public Sub Button_Click()
    Range("M2").Value = GoogleTranslate(Range("B2").Value, "en", "fr")
End Sub

 

[MJ72]

How are you translating the text? Post your code.

Alternatively, put the code here in a module:

Google Translate Macro Function - How to rafear to Cell and/or Text in Quotes?

Hello experts, i modify actual script to create a function in Excel to translate from Google Translator with formula. In order to work, you need to add Reference "Microsoft Internet Controls" (Tools>References) I create it referring to a cell range value with syntax...

www.mrexcel.com

and assign this macro to your button:

Public Sub Button_Click()
    Range("M2").Value = GoogleTranslate(Range("B2").Value, "en", "fr")
End Sub

Thanks John, I will gave that a try and let you know how it turns out. ?

 

[MJ72]

How are you translating the text? Post your code.

Alternatively, put the code here in a module:

Google Translate Macro Function - How to rafear to Cell and/or Text in Quotes?

Hello experts, i modify actual script to create a function in Excel to translate from Google Translator with formula. In order to work, you need to add Reference "Microsoft Internet Controls" (Tools>References) I create it referring to a cell range value with syntax...

www.mrexcel.com

and assign this macro to your button:

Public Sub Button_Click()
    Range("M2").Value = GoogleTranslate(Range("B2").Value, "en", "fr")
End Sub

I pasted the code you sent in a module and assigned the macro to my "translate button"; here's the error I received.

 

[John_w]

Just delete that line.

 

[MJ72]

Just delete that line.

Deleting the line worked! Thanks @John_w