Const HKEY_LOCAL_MACHINE = &H80000002' read the value of a setting for the VBA editor from the Registry'' Possible values for SettingName are:' AutoQuickTips2 (0/1)' AutoStatement2 (0/1)' AutoValueTips2 (0/1)' BackGroundCompile (0/1)' CompileOnDemand (0/1)' DragDropInEditor (0/1)' EndProcLine (0/1)' FontFace (a string, eg "Courier New")' FontHeight (an integer number)' OBGroupMembers (0/1) (OB=Object Browser=' OBSearchHeight (an integer number)' RequireDeclaration (0/1)'' If you pass an unrecognized setting name, it raises error 5'' Requires the GetRegistryValue functionFunction GetVBASetting(ByVal SettingName As String) As Variant GetVBASetting = GetRegistryValue(HKEY_CURRENT_USER, _ "SoftwareMicrosoftVBAMicrosoft Visual Basic", SettingName, "***") If GetVBASetting = "***" Then Err.Raise 5End Function

Top Careers at Microsoft
Microsoft has gained its position as one of the top companies in the world, and Microsoft careers are flourishing. This multinational company is efficiently developing popular software and computers with other consumer electronics. It is a dream come true for so many people to acquire a high paid, high-prestige job