kdano.blogg.se

& vbCrLf & " * Start > Programs > Accessories >" _ & vbCrLf & " * Start > Run > regsvr32 /mscomct2.ocx" _

& vbCrLf & "close & re-open spreadsheet." _ & vbCrLf & vbCrLf & "Register it by doing ONE of the following &" _ MsgBox s3 & "(Microsoft Windows Common Controls-2)" _ & vbCrLf & "4) Close & re-open spreadsheet." _ĮlseIf InStr(0, (n).FullPath, s3) > 0 Then & vbCrLf & " c:\windows\sysWOW64\ = Windows 7 64bit" _ & vbCrLf & " c:\windows\system32\ = Windows XP or 7" _ & vbCrLf & " c:\WINNT\system32\ = Windows NT or 2000" _ & vbCrLf & " c:\windows\system\ = Windows 95, 98, or ME" _ & vbCrLf & "3) Copy extracted files to relevant directory as administrator (click continue if prompted for admin permission)" _ & vbCrLf & "2) Unzip/extract mscomct2.cab (.ocx &. & vbCrLf & vbCrLf & "1) Download mscomct2.cab from " _ & vbCrLf & "is not installed (or registered). MsgBox s3 & " (Microsoft Windows Common Controls-2)" _ ' Check if mscomct2.ocx is installed &/or registered so DTPicker recognised 'ERROR NOTE: Name, Description & FullPath can cause: Method 'Name' of object 'Reference' failed , vbInformation, s3 & " installed or registered?"įor n = 1 To & vbCrLf & " tick 'Trust access to the VBA project object model' check box > OK." _ & vbCrLf & " Trust Center > Trust Center Settings > Macro Settings >" _ & vbCrLf & " * Click Microsoft Office button > Excel Options >" _ & vbCrLf & " tick 'Trust access to Visual Basic Project' check box > OK." _ & vbCrLf & " * Tools > Macro > Security > Trusted Sources >" _ & vbCrLf & vbCrLf & "Check if this is enabled:" _ & "This is required for the date selection objects to be usable." _

MsgBox "Unable to check if " & s3 & " (Microsoft Windows Common Controls-2) is installed &/or registered." _ N = 'Compile error: Invalid use of property With ThisWorkbook.Worksheets("VbReferences") ' Fill VbReferences worksheet with details on selected VBProject References 'GUID & Name of "Microsoft Windows Common Controls-2" ' If not, a msgbox will display with full instructions on what to do/check.ĭim s1 As String, s2 As String, s3 As String ' Added my own code to check if mscomct2.ocx is installed &/or registered or if trust centre option enabled. ' Write to worksheet code per samanco in ' ASSUMPTION: a worksheet called "VbReferences" exists. it will advise by msgbox if mscomct2.ocx is not installed or not registered or if trust centre option is turned off so unable to check.