New Post: Show Ribbon-Tab only in Main-Window (Outlook Addin)

Public Function getVisible(ByVal control As Office.IRibbonControl) As Boolean
        Try
            Dim objOutlook As Outlook._Application
            Dim myInspector As Outlook.Inspector
            objOutlook = New Outlook.Application()
            myInspector = objOutlook.ActiveInspector

            'Show only if TypeName is nothing (Outlook Main Window)
            If TypeName(myInspector) = "Nothing" Then
                Return True
            Else
                Return False
            End If

        Catch ex As Exception
            MsgBox(ex.Message, vbCritical)
            Return False
        End Try
    End Function