VBA runtime error 5 with get Language

amarokWPcom

New Member
Joined
May 30, 2019
Messages
25
Dear Freidns,

I want to get the language code of the running Excel of the user.

So I put this code:
Code:
Sub scheisstest()

Dim LNG_USERLANGUAGE As Long

LNG_USERLANGUAGE = Application.LanguageSettings.LanguageID(msoLanguageIDUI)

'Worksheets("UI").Cells(45, 1).Value = LNG_USERLANGUAGE



End Sub
But after running the system answers with runtime error 5

Does anyone has an idea? I am running Excel 2013

Many thanks in advance.
 
Last edited by a moderator:

Excel Facts

Bring active cell back into view
Start at A1 and select to A9999 while writing a formula, you can't see A1 anymore. Press Ctrl+Backspace to bring active cell into view.
My guess is you're missing a reference to the Microsoft office object library.

Try one of these options...

Either:

(1) Add this line at the beginning of the sub routine: Const msoLanguageIDUI = 2

Or:

(2) Add a reference to the Microsoft office object library via Tools --> References in the VB editor.
 
Upvote 0

Forum statistics

Threads
1,213,522
Messages
6,114,112
Members
448,549
Latest member
brianhfield

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top