You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
219 lines
9.9 KiB
219 lines
9.9 KiB
'------------------------------------------------------------------------------
|
|
' <auto-generated>
|
|
' This code was generated by a tool.
|
|
' Runtime Version:4.0.30319.237
|
|
'
|
|
' Changes to this file may cause incorrect behavior and will be lost if
|
|
' the code is regenerated.
|
|
' </auto-generated>
|
|
'------------------------------------------------------------------------------
|
|
|
|
Option Strict Off
|
|
Option Explicit On
|
|
|
|
|
|
|
|
'''
|
|
<Microsoft.VisualStudio.Tools.Applications.Runtime.StartupObjectAttribute(0), _
|
|
Global.System.Security.Permissions.PermissionSetAttribute(Global.System.Security.Permissions.SecurityAction.Demand, Name:="FullTrust")> _
|
|
Partial Public NotInheritable Class ThisAddIn
|
|
Inherits Microsoft.Office.Tools.AddIn
|
|
Implements Microsoft.VisualStudio.Tools.Office.IOfficeEntryPoint
|
|
|
|
Friend WithEvents CustomTaskPanes As Microsoft.Office.Tools.CustomTaskPaneCollection
|
|
|
|
Friend WithEvents VstoSmartTags As Microsoft.Office.Tools.SmartTagCollection
|
|
|
|
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "10.0.0.0")> _
|
|
Friend WithEvents Application As Microsoft.Office.Interop.Excel.Application
|
|
|
|
'''
|
|
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
|
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Never)> _
|
|
Public Sub New()
|
|
MyBase.New("AddIn", "ThisAddIn")
|
|
End Sub
|
|
|
|
'''
|
|
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
|
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "10.0.0.0"), _
|
|
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Never)> _
|
|
Protected Overrides Sub Initialize()
|
|
MyBase.Initialize()
|
|
Me.Application = Me.GetHostItem(Of Microsoft.Office.Interop.Excel.Application)(GetType(Microsoft.Office.Interop.Excel.Application), "Application")
|
|
Globals.ThisAddIn = Me
|
|
Global.System.Windows.Forms.Application.EnableVisualStyles()
|
|
Me.InitializeCachedData()
|
|
Me.InitializeControls()
|
|
Me.InitializeComponents()
|
|
Me.InitializeData()
|
|
End Sub
|
|
|
|
'''
|
|
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
|
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "10.0.0.0"), _
|
|
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Never)> _
|
|
Protected Overrides Sub FinishInitialization()
|
|
Me.OnStartup()
|
|
End Sub
|
|
|
|
'''
|
|
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
|
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "10.0.0.0"), _
|
|
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Never)> _
|
|
Protected Overrides Sub InitializeDataBindings()
|
|
Me.BeginInitialization()
|
|
Me.BindToData()
|
|
Me.EndInitialization()
|
|
End Sub
|
|
|
|
'''
|
|
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
|
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "10.0.0.0"), _
|
|
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Never)> _
|
|
Private Sub InitializeCachedData()
|
|
If (Me.DataHost Is Nothing) Then
|
|
Return
|
|
End If
|
|
If Me.DataHost.IsCacheInitialized Then
|
|
Me.DataHost.FillCachedData(Me)
|
|
End If
|
|
End Sub
|
|
|
|
'''
|
|
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
|
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "10.0.0.0"), _
|
|
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Never)> _
|
|
Private Sub InitializeData()
|
|
End Sub
|
|
|
|
'''
|
|
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
|
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "10.0.0.0"), _
|
|
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Never)> _
|
|
Private Sub BindToData()
|
|
End Sub
|
|
|
|
'''
|
|
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
|
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "10.0.0.0"), _
|
|
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
|
Private Sub StartCaching(ByVal MemberName As String)
|
|
Me.DataHost.StartCaching(Me, MemberName)
|
|
End Sub
|
|
|
|
'''
|
|
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
|
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "10.0.0.0"), _
|
|
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
|
Private Sub StopCaching(ByVal MemberName As String)
|
|
Me.DataHost.StopCaching(Me, MemberName)
|
|
End Sub
|
|
|
|
'''
|
|
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
|
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "10.0.0.0"), _
|
|
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
|
Private Function IsCached(ByVal MemberName As String) As Boolean
|
|
Return Me.DataHost.IsCached(Me, MemberName)
|
|
End Function
|
|
|
|
'''
|
|
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
|
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "10.0.0.0"), _
|
|
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Never)> _
|
|
Private Sub BeginInitialization()
|
|
Me.BeginInit()
|
|
Me.CustomTaskPanes.BeginInit()
|
|
Me.VstoSmartTags.BeginInit()
|
|
End Sub
|
|
|
|
'''
|
|
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
|
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "10.0.0.0"), _
|
|
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Never)> _
|
|
Private Sub EndInitialization()
|
|
Me.VstoSmartTags.EndInit()
|
|
Me.CustomTaskPanes.EndInit()
|
|
Me.EndInit()
|
|
End Sub
|
|
|
|
'''
|
|
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
|
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "10.0.0.0"), _
|
|
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Never)> _
|
|
Private Sub InitializeControls()
|
|
Me.CustomTaskPanes = New Microsoft.Office.Tools.CustomTaskPaneCollection(Me.ItemProvider, Me.HostContext, "CustomTaskPanes", Me, "CustomTaskPanes")
|
|
Me.VstoSmartTags = New Microsoft.Office.Tools.SmartTagCollection(Me.ItemProvider, Me.HostContext, "VstoSmartTags", Me, "VstoSmartTags")
|
|
End Sub
|
|
|
|
'''
|
|
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
|
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "10.0.0.0"), _
|
|
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Never)> _
|
|
Private Sub InitializeComponents()
|
|
End Sub
|
|
|
|
'''
|
|
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
|
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "10.0.0.0"), _
|
|
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
|
Private Function NeedsFill(ByVal MemberName As String) As Boolean
|
|
Return Me.DataHost.NeedsFill(Me, MemberName)
|
|
End Function
|
|
|
|
'''
|
|
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
|
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "10.0.0.0"), _
|
|
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Never)> _
|
|
Protected Overrides Sub OnShutdown()
|
|
Me.VstoSmartTags.Dispose()
|
|
Me.CustomTaskPanes.Dispose()
|
|
MyBase.OnShutdown()
|
|
End Sub
|
|
End Class
|
|
|
|
'''
|
|
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
|
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "10.0.0.0")> _
|
|
Partial Friend NotInheritable Class Globals
|
|
|
|
'''
|
|
Private Sub New()
|
|
MyBase.New()
|
|
End Sub
|
|
|
|
Private Shared _ThisAddIn As ThisAddIn
|
|
|
|
Private Shared _ThisRibbonCollection As ThisRibbonCollection
|
|
|
|
Friend Shared Property ThisAddIn() As ThisAddIn
|
|
Get
|
|
Return _ThisAddIn
|
|
End Get
|
|
Set
|
|
If (_ThisAddIn Is Nothing) Then
|
|
_ThisAddIn = value
|
|
Else
|
|
Throw New System.NotSupportedException()
|
|
End If
|
|
End Set
|
|
End Property
|
|
|
|
Friend Shared ReadOnly Property Ribbons() As ThisRibbonCollection
|
|
Get
|
|
If (_ThisRibbonCollection Is Nothing) Then
|
|
_ThisRibbonCollection = New ThisRibbonCollection()
|
|
End If
|
|
Return _ThisRibbonCollection
|
|
End Get
|
|
End Property
|
|
End Class
|
|
|
|
'''
|
|
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
|
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "10.0.0.0")> _
|
|
Partial Friend NotInheritable Class ThisRibbonCollection
|
|
Inherits Microsoft.Office.Tools.Ribbon.RibbonReadOnlyCollection
|
|
End Class
|