Microsoft Excel
--
Questions
--
Followers
Top Experts
Excel VB.net VSTO Add-in Ribbon buttons not showing
Hi
I created a new Excel VSTO Add-in in Visual Studio 2019 and imported the files from an Excel VSTO Add-in that I created in Visual Studio 2017. This included a ribbon. My problem is that the Ribbon tab has disappeared and I cannot see any buttons. The first image shows how the ribbon looks in design view and the second image shows what the ribbon looks in Excel in debug mode.

I created a new Excel VSTO Add-in in Visual Studio 2019 and imported the files from an Excel VSTO Add-in that I created in Visual Studio 2017. This included a ribbon. My problem is that the Ribbon tab has disappeared and I cannot see any buttons. The first image shows how the ribbon looks in design view and the second image shows what the ribbon looks in Excel in debug mode.
Zero AI Policy
We believe in human intelligence. Our moderation policy strictly prohibits the use of LLM content in our Q&A threads.
ASKER CERTIFIED SOLUTION
membership
Log in or create a free account to see answer.
Signing up is free and takes 30 seconds. No credit card required.
I think I have a VB ribbon that doesn't have XML. The Designer looks as follows
Partial Class Ribbon1
  Inherits Microsoft.Office.Tools.Rib bon.Ribbon Base
  <System.Diagnostics.Debugg erNonUserC ode()> _
  Public Sub New(ByVal container As System.ComponentModel.ICon tainer)
    MyClass.New()
    'Required for Windows.Forms Class Composition Designer support
    If (container IsNot Nothing) Then
      container.Add(Me)
    End If
  End Sub
  <System.Diagnostics.Debugg erNonUserC ode()> _
  Public Sub New()
    MyBase.New(Globals.Factory .GetRibbon Factory())
    'This call is required by the Component Designer.
    InitializeComponent()
  End Sub
  'Component overrides dispose to clean up the component list.
  <System.Diagnostics.Debugg erNonUserC ode()> _
  Protected Overrides Sub Dispose(ByVal disposing As Boolean)
    Try
      If disposing AndAlso components IsNot Nothing Then
        components.Dispose()
      End If
    Finally
      MyBase.Dispose(disposing)
    End Try
  End Sub
  'Required by the Component Designer
  Private components As System.ComponentModel.ICon tainer
  'NOTE: The following procedure is required by the Component Designer
  'It can be modified using the Component Designer.
  'Do not modify it using the code editor.
  <System.Diagnostics.Debugg erStepThro ugh()> _
  Private Sub InitializeComponent()
    Dim resources As System.ComponentModel.Comp onentResou rceManager = New System.ComponentModel.Comp onentResou rceManager (GetType(R ibbon1))
    Me.Tab1 = Me.Factory.CreateRibbonTab
    Me.GroupConnect = Me.Factory.CreateRibbonGro up
    Me.ComboBox_Connection = Me.Factory.CreateRibbonCom boBox
    Me.btnManageConnections = Me.Factory.CreateRibbonBut ton
    Me.Menu1 = Me.Factory.CreateRibbonMen u
    Me.btnUsers = Me.Factory.CreateRibbonBut ton
    Me.chkPaneMode = Me.Factory.CreateRibbonChe ckBox
    Me.chkUseAppSettings = Me.Factory.CreateRibbonChe ckBox
    Me.GroupConnectToCloud = Me.Factory.CreateRibbonGro up
    Me.ButtonLogin = Me.Factory.CreateRibbonBut ton
    Me.GroupDateControl = Me.Factory.CreateRibbonGro up
    Me.btnSelectDates = Me.Factory.CreateRibbonBut ton
    Me.lblFromDate = Me.Factory.CreateRibbonLab el
    Me.lblToDate = Me.Factory.CreateRibbonLab el
    Me.ToggleButton_DateContro l = Me.Factory.CreateRibbonTog gleButton
    Me.GroupSQL = Me.Factory.CreateRibbonGro up
    Me.ToggleButton_CustomSQL = Me.Factory.CreateRibbonTog gleButton
    Me.btnRunCellQueriesCurren tSheet = Me.Factory.CreateRibbonBut ton
    Me.btnRunCellQueriesAllShe ets = Me.Factory.CreateRibbonBut ton
    Me.GroupGetData = Me.Factory.CreateRibbonGro up
    Me.ToggleButton_Tables = Me.Factory.CreateRibbonTog gleButton
    Me.btnSingleValue = Me.Factory.CreateRibbonBut ton
    Me.btnMultipleValues = Me.Factory.CreateRibbonBut ton
    Me.btnTablesOther = Me.Factory.CreateRibbonBut ton
    Me.ToggleButton_LoadToExce l = Me.Factory.CreateRibbonTog gleButton
    Me.ToggleButton_Mirror = Me.Factory.CreateRibbonTog gleButton
    Me.GroupLoadData = Me.Factory.CreateRibbonGro up
    Me.ComboBox_Queries = Me.Factory.CreateRibbonCom boBox
    Me.ComboBox_Tables = Me.Factory.CreateRibbonCom boBox
    Me.ComboBox_IdentityColumn = Me.Factory.CreateRibbonCom boBox
    Me.btnLoadToForm = Me.Factory.CreateRibbonBut ton
    Me.btnLoadToExcel = Me.Factory.CreateRibbonBut ton
    Me.Group1 = Me.Factory.CreateRibbonGro up
    Me.btnUpdateUsingCellSelec tion = Me.Factory.CreateRibbonBut ton
    Me.btnAddRowsInCellSelecti on = Me.Factory.CreateRibbonBut ton
    Me.btnDeleteRowsInCellSele ction = Me.Factory.CreateRibbonBut ton
    Me.GroupLogin = Me.Factory.CreateRibbonGro up
    Me.Box1 = Me.Factory.CreateRibbonBox
    Me.EditBoxUsername = Me.Factory.CreateRibbonEdi tBox
    Me.EditBoxPassword = Me.Factory.CreateRibbonEdi tBox
    Me.btnLogin = Me.Factory.CreateRibbonBut ton
    Me.GroupOther = Me.Factory.CreateRibbonGro up
    Me.lblVersion = Me.Factory.CreateRibbonLab el
    Me.btnTest = Me.Factory.CreateRibbonBut ton
    Me.lblOnOff = Me.Factory.CreateRibbonLab el
    Me.GroupLogout = Me.Factory.CreateRibbonGro up
    Me.btnLogout = Me.Factory.CreateRibbonBut ton
    Me.Group2 = Me.Factory.CreateRibbonGro up
    Me.btnMyStock = Me.Factory.CreateRibbonBut ton
    Me.btnWanted = Me.Factory.CreateRibbonBut ton
    Me.Tab1.SuspendLayout()
    Me.GroupConnect.SuspendLay out()
    Me.GroupConnectToCloud.Sus pendLayout ()
    Me.GroupDateControl.Suspen dLayout()
    Me.GroupSQL.SuspendLayout( )
    Me.GroupGetData.SuspendLay out()
    Me.GroupLoadData.SuspendLa yout()
    Me.Group1.SuspendLayout()
    Me.GroupLogin.SuspendLayou t()
    Me.Box1.SuspendLayout()
    Me.GroupOther.SuspendLayou t()
    Me.GroupLogout.SuspendLayo ut()
    Me.Group2.SuspendLayout()
    Me.SuspendLayout()
    '
    'Tab1
    '
    Me.Tab1.Groups.Add(Me.Grou pConnect)
    Me.Tab1.Groups.Add(Me.Grou pConnectTo Cloud)
    Me.Tab1.Groups.Add(Me.Grou pDateContr ol)
    Me.Tab1.Groups.Add(Me.Grou pSQL)
    Me.Tab1.Groups.Add(Me.Grou pGetData)
    Me.Tab1.Groups.Add(Me.Grou pLoadData)
    Me.Tab1.Groups.Add(Me.Grou p2)
    Me.Tab1.Groups.Add(Me.Grou p1)
    Me.Tab1.Groups.Add(Me.Grou pLogin)
    Me.Tab1.Groups.Add(Me.Grou pOther)
    Me.Tab1.Groups.Add(Me.Grou pLogout)
    Me.Tab1.Label = "The Steel Yard"
    Me.Tab1.Name = "Tab1"
    '
    'GroupConnect
    '
    Me.GroupConnect.Items.Add( Me.ComboBo x_Connecti on)
    Me.GroupConnect.Items.Add( Me.btnMana geConnecti ons)
    Me.GroupConnect.Items.Add( Me.Menu1)
    Me.GroupConnect.Label = "Connect"
    Me.GroupConnect.Name = "GroupConnect"
    '
    'ComboBox_Connection
    '
    Me.ComboBox_Connection.Lab el = "Connect"
    Me.ComboBox_Connection.Nam e = "ComboBox_Connection"
    Me.ComboBox_Connection.Tex t = Nothing
    '
    'btnManageConnections
    '
    Me.btnManageConnections.La bel = "Manage Connections"
    Me.btnManageConnections.Na me = "btnManageConnections"
    '
    'Menu1
    '
    Me.Menu1.Items.Add(Me.btnU sers)
    Me.Menu1.Items.Add(Me.chkP aneMode)
    Me.Menu1.Items.Add(Me.chkU seAppSetti ngs)
    Me.Menu1.Label = "Settings/Users"
    Me.Menu1.Name = "Menu1"
    '
    'btnUsers
    '
    Me.btnUsers.Image = CType(resources.GetObject( "btnUsers. Image"), System.Drawing.Image)
    Me.btnUsers.Label = "Users"
    Me.btnUsers.Name = "btnUsers"
    Me.btnUsers.ShowImage = True
    '
    'chkPaneMode
    '
    Me.chkPaneMode.Checked = True
    Me.chkPaneMode.Label = "Pane Mode"
    Me.chkPaneMode.Name = "chkPaneMode"
    '
    'chkUseAppSettings
    '
    Me.chkUseAppSettings.Label = "Use App Settings"
    Me.chkUseAppSettings.Name = "chkUseAppSettings"
    '
    'GroupConnectToCloud
    '
    Me.GroupConnectToCloud.Ite ms.Add(Me. ButtonLogi n)
    Me.GroupConnectToCloud.Lab el = "Activate"
    Me.GroupConnectToCloud.Nam e = "GroupConnectToCloud"
    '
    'ButtonLogin
    '
    Me.ButtonLogin.ControlSize = Microsoft.Office.Core.Ribb onControlS ize.Ribbon ControlSiz eLarge
    Me.ButtonLogin.Image = CType(resources.GetObject( "ButtonLog in.Image") , System.Drawing.Image)
    Me.ButtonLogin.Label = "Activate"
    Me.ButtonLogin.Name = "ButtonLogin"
    Me.ButtonLogin.ShowImage = True
    '
    'GroupDateControl
    '
    Me.GroupDateControl.Items. Add(Me.btn SelectDate s)
    Me.GroupDateControl.Items. Add(Me.lbl FromDate)
    Me.GroupDateControl.Items. Add(Me.lbl ToDate)
    Me.GroupDateControl.Items. Add(Me.Tog gleButton_ DateContro l)
    Me.GroupDateControl.Label = "Date Control"
    Me.GroupDateControl.Name = "GroupDateControl"
    Me.GroupDateControl.Visibl e = False
    '
    'btnSelectDates
    '
    Me.btnSelectDates.Image = CType(resources.GetObject( "btnSelect Dates.Imag e"), System.Drawing.Image)
    Me.btnSelectDates.Label = "Select Dates"
    Me.btnSelectDates.Name = "btnSelectDates"
    Me.btnSelectDates.ShowImag e = True
    '
    'lblFromDate
    '
    Me.lblFromDate.Label = "-"
    Me.lblFromDate.Name = "lblFromDate"
    '
    'lblToDate
    '
    Me.lblToDate.Label = "-"
    Me.lblToDate.Name = "lblToDate"
    '
    'ToggleButton_DateControl
    '
    Me.ToggleButton_DateContro l.ControlS ize = Microsoft.Office.Core.Ribb onControlS ize.Ribbon ControlSiz eLarge
    Me.ToggleButton_DateContro l.Image = CType(resources.GetObject( "ToggleBut ton_DateCo ntrol.Imag e"), System.Drawing.Image)
    Me.ToggleButton_DateContro l.Label = "Use Date Control"
    Me.ToggleButton_DateContro l.Name = "ToggleButton_DateControl"
    Me.ToggleButton_DateContro l.ShowImag e = True
    '
    'GroupSQL
    '
    Me.GroupSQL.Items.Add(Me.T oggleButto n_CustomSQ L)
    Me.GroupSQL.Items.Add(Me.b tnRunCellQ ueriesCurr entSheet)
    Me.GroupSQL.Items.Add(Me.b tnRunCellQ ueriesAllS heets)
    Me.GroupSQL.Label = "SQL"
    Me.GroupSQL.Name = "GroupSQL"
    Me.GroupSQL.Visible = False
    '
    'ToggleButton_CustomSQL
    '
    Me.ToggleButton_CustomSQL. ControlSiz e = Microsoft.Office.Core.Ribb onControlS ize.Ribbon ControlSiz eLarge
    Me.ToggleButton_CustomSQL. Image = CType(resources.GetObject( "ToggleBut ton_Custom SQL.Image" ), System.Drawing.Image)
    Me.ToggleButton_CustomSQL. Label = "SQL Builder"
    Me.ToggleButton_CustomSQL. Name = "ToggleButton_CustomSQL"
    Me.ToggleButton_CustomSQL. ShowImage = True
    '
    'btnRunCellQueriesCurrentS heet
    '
    Me.btnRunCellQueriesCurren tSheet.Con trolSize = Microsoft.Office.Core.Ribb onControlS ize.Ribbon ControlSiz eLarge
    Me.btnRunCellQueriesCurren tSheet.Ima ge = CType(resources.GetObject( "btnRunCel lQueriesCu rrentSheet .Image"), System.Drawing.Image)
    Me.btnRunCellQueriesCurren tSheet.Lab el = "Run Comments  This Sheet"
    Me.btnRunCellQueriesCurren tSheet.Nam e = "btnRunCellQueriesCurrentS heet"
    Me.btnRunCellQueriesCurren tSheet.Sho wImage = True
    '
    'btnRunCellQueriesAllSheet s
    '
    Me.btnRunCellQueriesAllShe ets.Contro lSize = Microsoft.Office.Core.Ribb onControlS ize.Ribbon ControlSiz eLarge
    Me.btnRunCellQueriesAllShe ets.Image = CType(resources.GetObject( "btnRunCel lQueriesAl lSheets.Im age"), System.Drawing.Image)
    Me.btnRunCellQueriesAllShe ets.Label = "Run Comments  All Sheets"
    Me.btnRunCellQueriesAllShe ets.Name = "btnRunCellQueriesAllSheet s"
    Me.btnRunCellQueriesAllShe ets.ShowIm age = True
    '
    'GroupGetData
    '
    Me.GroupGetData.Items.Add( Me.ToggleB utton_Tabl es)
    Me.GroupGetData.Items.Add( Me.btnSing leValue)
    Me.GroupGetData.Items.Add( Me.btnMult ipleValues )
    Me.GroupGetData.Items.Add( Me.btnTabl esOther)
    Me.GroupGetData.Items.Add( Me.ToggleB utton_Load ToExcel)
    Me.GroupGetData.Items.Add( Me.ToggleB utton_Mirr or)
    Me.GroupGetData.Label = "Get Data"
    Me.GroupGetData.Name = "GroupGetData"
    Me.GroupGetData.Visible = False
    '
    'ToggleButton_Tables
    '
    Me.ToggleButton_Tables.Con trolSize = Microsoft.Office.Core.Ribb onControlS ize.Ribbon ControlSiz eLarge
    Me.ToggleButton_Tables.Ima ge = CType(resources.GetObject( "ToggleBut ton_Tables .Image"), System.Drawing.Image)
    Me.ToggleButton_Tables.Lab el = "Tables"
    Me.ToggleButton_Tables.Nam e = "ToggleButton_Tables"
    Me.ToggleButton_Tables.Sho wImage = True
    '
    'btnSingleValue
    '
    Me.btnSingleValue.Label = "Single Value"
    Me.btnSingleValue.Name = "btnSingleValue"
    Me.btnSingleValue.Visible = False
    '
    'btnMultipleValues
    '
    Me.btnMultipleValues.Label = "Multiple Values"
    Me.btnMultipleValues.Name = "btnMultipleValues"
    Me.btnMultipleValues.Visib le = False
    '
    'btnTablesOther
    '
    Me.btnTablesOther.Label = "Tables/Other"
    Me.btnTablesOther.Name = "btnTablesOther"
    Me.btnTablesOther.Visible = False
    '
    'ToggleButton_LoadToExcel
    '
    Me.ToggleButton_LoadToExce l.ControlS ize = Microsoft.Office.Core.Ribb onControlS ize.Ribbon ControlSiz eLarge
    Me.ToggleButton_LoadToExce l.Image = CType(resources.GetObject( "ToggleBut ton_LoadTo Excel.Imag e"), System.Drawing.Image)
    Me.ToggleButton_LoadToExce l.Label = "Load to Excel"
    Me.ToggleButton_LoadToExce l.Name = "ToggleButton_LoadToExcel"
    Me.ToggleButton_LoadToExce l.ShowImag e = True
    Me.ToggleButton_LoadToExce l.Visible = False
    '
    'ToggleButton_Mirror
    '
    Me.ToggleButton_Mirror.Con trolSize = Microsoft.Office.Core.Ribb onControlS ize.Ribbon ControlSiz eLarge
    Me.ToggleButton_Mirror.Ima ge = CType(resources.GetObject( "ToggleBut ton_Mirror .Image"), System.Drawing.Image)
    Me.ToggleButton_Mirror.Lab el = "Mirror"
    Me.ToggleButton_Mirror.Nam e = "ToggleButton_Mirror"
    Me.ToggleButton_Mirror.Sho wImage = True
    '
    'GroupLoadData
    '
    Me.GroupLoadData.Items.Add (Me.ComboB ox_Queries )
    Me.GroupLoadData.Items.Add (Me.ComboB ox_Tables)
    Me.GroupLoadData.Items.Add (Me.ComboB ox_Identit yColumn)
    Me.GroupLoadData.Items.Add (Me.btnLoa dToForm)
    Me.GroupLoadData.Items.Add (Me.btnLoa dToExcel)
    Me.GroupLoadData.Label = "Load Data"
    Me.GroupLoadData.Name = "GroupLoadData"
    '
    'ComboBox_Queries
    '
    Me.ComboBox_Queries.Label = "Queries"
    Me.ComboBox_Queries.Name = "ComboBox_Queries"
    Me.ComboBox_Queries.Text = Nothing
    '
    'ComboBox_Tables
    '
    Me.ComboBox_Tables.Label = "Tables"
    Me.ComboBox_Tables.Name = "ComboBox_Tables"
    Me.ComboBox_Tables.Text = Nothing
    '
    'ComboBox_IdentityColumn
    '
    Me.ComboBox_IdentityColumn .Label = "ID Column"
    Me.ComboBox_IdentityColumn .Name = "ComboBox_IdentityColumn"
    Me.ComboBox_IdentityColumn .Text = Nothing
    '
    'btnLoadToForm
    '
    Me.btnLoadToForm.ControlSi ze = Microsoft.Office.Core.Ribb onControlS ize.Ribbon ControlSiz eLarge
    Me.btnLoadToForm.Image = CType(resources.GetObject( "btnLoadTo Form.Image "), System.Drawing.Image)
    Me.btnLoadToForm.Label = "Load To Form"
    Me.btnLoadToForm.Name = "btnLoadToForm"
    Me.btnLoadToForm.ShowImage = True
    '
    'btnLoadToExcel
    '
    Me.btnLoadToExcel.ControlS ize = Microsoft.Office.Core.Ribb onControlS ize.Ribbon ControlSiz eLarge
    Me.btnLoadToExcel.Image = CType(resources.GetObject( "btnLoadTo Excel.Imag e"), System.Drawing.Image)
    Me.btnLoadToExcel.Label = "Load To  Excel"
    Me.btnLoadToExcel.Name = "btnLoadToExcel"
    Me.btnLoadToExcel.ShowImag e = True
    '
    'Group1
    '
    Me.Group1.Items.Add(Me.btn UpdateUsin gCellSelec tion)
    Me.Group1.Items.Add(Me.btn AddRowsInC ellSelecti on)
    Me.Group1.Items.Add(Me.btn DeleteRows InCellSele ction)
    Me.Group1.Label = "Edit/Add/Delete Data"
    Me.Group1.Name = "Group1"
    '
    'btnUpdateUsingCellSelecti on
    '
    Me.btnUpdateUsingCellSelec tion.Contr olSize = Microsoft.Office.Core.Ribb onControlS ize.Ribbon ControlSiz eLarge
    Me.btnUpdateUsingCellSelec tion.Image = CType(resources.GetObject( "btnUpdate UsingCellS election.I mage"), System.Drawing.Image)
    Me.btnUpdateUsingCellSelec tion.Label = "Update Using Cell Selection"
    Me.btnUpdateUsingCellSelec tion.Name = "btnUpdateUsingCellSelecti on"
    Me.btnUpdateUsingCellSelec tion.ShowI mage = True
    '
    'btnAddRowsInCellSelection
    '
    Me.btnAddRowsInCellSelecti on.Control Size = Microsoft.Office.Core.Ribb onControlS ize.Ribbon ControlSiz eLarge
    Me.btnAddRowsInCellSelecti on.Image = CType(resources.GetObject( "btnAddRow sInCellSel ection.Ima ge"), System.Drawing.Image)
    Me.btnAddRowsInCellSelecti on.Label = "Add Rows In Cell Selection"
    Me.btnAddRowsInCellSelecti on.Name = "btnAddRowsInCellSelection "
    Me.btnAddRowsInCellSelecti on.ShowIma ge = True
    '
    'btnDeleteRowsInCellSelect ion
    '
    Me.btnDeleteRowsInCellSele ction.Cont rolSize = Microsoft.Office.Core.Ribb onControlS ize.Ribbon ControlSiz eLarge
    Me.btnDeleteRowsInCellSele ction.Imag e = CType(resources.GetObject( "btnDelete RowsInCell Selection. Image"), System.Drawing.Image)
    Me.btnDeleteRowsInCellSele ction.Labe l = "Delete Rows In Cell Selection"
    Me.btnDeleteRowsInCellSele ction.Name = "btnDeleteRowsInCellSelect ion"
    Me.btnDeleteRowsInCellSele ction.Show Image = True
    '
    'GroupLogin
    '
    Me.GroupLogin.Items.Add(Me .Box1)
    Me.GroupLogin.Label = "Log In"
    Me.GroupLogin.Name = "GroupLogin"
    '
    'Box1
    '
    Me.Box1.BoxStyle = Microsoft.Office.Tools.Rib bon.Ribbon BoxStyle.V ertical
    Me.Box1.Items.Add(Me.EditB oxUsername )
    Me.Box1.Items.Add(Me.EditB oxPassword )
    Me.Box1.Items.Add(Me.btnLo gin)
    Me.Box1.Name = "Box1"
    '
    'EditBoxUsername
    '
    Me.EditBoxUsername.Label = "Username"
    Me.EditBoxUsername.Name = "EditBoxUsername"
    Me.EditBoxUsername.Text = Nothing
    '
    'EditBoxPassword
    '
    Me.EditBoxPassword.Label = "Password"
    Me.EditBoxPassword.Name = "EditBoxPassword"
    Me.EditBoxPassword.Text = Nothing
    '
    'btnLogin
    '
    Me.btnLogin.Label = "Log In"
    Me.btnLogin.Name = "btnLogin"
    '
    'GroupOther
    '
    Me.GroupOther.Items.Add(Me .lblVersio n)
    Me.GroupOther.Items.Add(Me .btnTest)
    Me.GroupOther.Items.Add(Me .lblOnOff)
    Me.GroupOther.Label = "Other"
    Me.GroupOther.Name = "GroupOther"
    Me.GroupOther.Visible = False
    '
    'lblVersion
    '
    Me.lblVersion.Label = "-"
    Me.lblVersion.Name = "lblVersion"
    '
    'btnTest
    '
    Me.btnTest.Label = "Test"
    Me.btnTest.Name = "btnTest"
    '
    'lblOnOff
    '
    Me.lblOnOff.Label = "Off"
    Me.lblOnOff.Name = "lblOnOff"
    '
    'GroupLogout
    '
    Me.GroupLogout.Items.Add(M e.btnLogou t)
    Me.GroupLogout.Label = "Log Out"
    Me.GroupLogout.Name = "GroupLogout"
    '
    'btnLogout
    '
    Me.btnLogout.ControlSize = Microsoft.Office.Core.Ribb onControlS ize.Ribbon ControlSiz eLarge
    Me.btnLogout.Image = CType(resources.GetObject( "btnLogout .Image"), System.Drawing.Image)
    Me.btnLogout.Label = "Log Out"
    Me.btnLogout.Name = "btnLogout"
    Me.btnLogout.ShowImage = True
    '
    'Group2
    '
    Me.Group2.Items.Add(Me.btn MyStock)
    Me.Group2.Items.Add(Me.btn Wanted)
    Me.Group2.Label = "Load My Data"
    Me.Group2.Name = "Group2"
    '
    'btnMyStock
    '
    Me.btnMyStock.ControlSize = Microsoft.Office.Core.Ribb onControlS ize.Ribbon ControlSiz eLarge
    Me.btnMyStock.Image = CType(resources.GetObject( "btnMyStoc k.Image"), System.Drawing.Image)
    Me.btnMyStock.Label = "My Stock Items"
    Me.btnMyStock.Name = "btnMyStock"
    Me.btnMyStock.ShowImage = True
    '
    'btnWanted
    '
    Me.btnWanted.ControlSize = Microsoft.Office.Core.Ribb onControlS ize.Ribbon ControlSiz eLarge
    Me.btnWanted.Image = CType(resources.GetObject( "btnWanted .Image"), System.Drawing.Image)
    Me.btnWanted.Label = "My Wanted Items"
    Me.btnWanted.Name = "btnWanted"
    Me.btnWanted.ShowImage = True
    '
    'Ribbon1
    '
    Me.Name = "Ribbon1"
    Me.RibbonType = "Microsoft.Excel.Workbook"
    Me.Tabs.Add(Me.Tab1)
    Me.Tab1.ResumeLayout(False )
    Me.Tab1.PerformLayout()
    Me.GroupConnect.ResumeLayo ut(False)
    Me.GroupConnect.PerformLay out()
    Me.GroupConnectToCloud.Res umeLayout( False)
    Me.GroupConnectToCloud.Per formLayout ()
    Me.GroupDateControl.Resume Layout(Fal se)
    Me.GroupDateControl.Perfor mLayout()
    Me.GroupSQL.ResumeLayout(F alse)
    Me.GroupSQL.PerformLayout( )
    Me.GroupGetData.ResumeLayo ut(False)
    Me.GroupGetData.PerformLay out()
    Me.GroupLoadData.ResumeLay out(False)
    Me.GroupLoadData.PerformLa yout()
    Me.Group1.ResumeLayout(Fal se)
    Me.Group1.PerformLayout()
    Me.GroupLogin.ResumeLayout (False)
    Me.GroupLogin.PerformLayou t()
    Me.Box1.ResumeLayout(False )
    Me.Box1.PerformLayout()
    Me.GroupOther.ResumeLayout (False)
    Me.GroupOther.PerformLayou t()
    Me.GroupLogout.ResumeLayou t(False)
    Me.GroupLogout.PerformLayo ut()
    Me.Group2.ResumeLayout(Fal se)
    Me.Group2.PerformLayout()
    Me.ResumeLayout(False)
  End Sub
  Friend WithEvents Tab1 As Microsoft.Office.Tools.Rib bon.Ribbon Tab
  Friend WithEvents GroupLoadData As Microsoft.Office.Tools.Rib bon.Ribbon Group
  Friend WithEvents btnUpdateUsingCellSelectio n As Microsoft.Office.Tools.Rib bon.Ribbon Button
  Friend WithEvents ComboBox_Tables As Microsoft.Office.Tools.Rib bon.Ribbon ComboBox
  Friend WithEvents btnAddRowsInCellSelection As Microsoft.Office.Tools.Rib bon.Ribbon Button
  Friend WithEvents btnDeleteRowsInCellSelecti on As Microsoft.Office.Tools.Rib bon.Ribbon Button
  Friend WithEvents GroupConnect As Microsoft.Office.Tools.Rib bon.Ribbon Group
  Friend WithEvents ComboBox_Connection As Microsoft.Office.Tools.Rib bon.Ribbon ComboBox
  Friend WithEvents btnManageConnections As Microsoft.Office.Tools.Rib bon.Ribbon Button
  Friend WithEvents ComboBox_IdentityColumn As Microsoft.Office.Tools.Rib bon.Ribbon ComboBox
  Friend WithEvents GroupDateControl As Microsoft.Office.Tools.Rib bon.Ribbon Group
  Friend WithEvents btnSelectDates As Microsoft.Office.Tools.Rib bon.Ribbon Button
  Friend WithEvents lblFromDate As Microsoft.Office.Tools.Rib bon.Ribbon Label
  Friend WithEvents lblToDate As Microsoft.Office.Tools.Rib bon.Ribbon Label
  Friend WithEvents ToggleButton_DateControl As Microsoft.Office.Tools.Rib bon.Ribbon ToggleButt on
  Friend WithEvents GroupGetData As Microsoft.Office.Tools.Rib bon.Ribbon Group
  Friend WithEvents ToggleButton_LoadToExcel As Microsoft.Office.Tools.Rib bon.Ribbon ToggleButt on
  Friend WithEvents btnSingleValue As Microsoft.Office.Tools.Rib bon.Ribbon Button
  Friend WithEvents btnMultipleValues As Microsoft.Office.Tools.Rib bon.Ribbon Button
  Friend WithEvents btnRunCellQueriesCurrentSh eet As Microsoft.Office.Tools.Rib bon.Ribbon Button
  Friend WithEvents btnRunCellQueriesAllSheets As Microsoft.Office.Tools.Rib bon.Ribbon Button
  Friend WithEvents btnTablesOther As Microsoft.Office.Tools.Rib bon.Ribbon Button
  Friend WithEvents btnLoadToExcel As Microsoft.Office.Tools.Rib bon.Ribbon Button
  Friend WithEvents btnLoadToForm As Microsoft.Office.Tools.Rib bon.Ribbon Button
  Friend WithEvents ComboBox_Queries As Microsoft.Office.Tools.Rib bon.Ribbon ComboBox
  Friend WithEvents GroupConnectToCloud As Microsoft.Office.Tools.Rib bon.Ribbon Group
  Friend WithEvents Group1 As Microsoft.Office.Tools.Rib bon.Ribbon Group
  Friend WithEvents ToggleButton_Tables As Microsoft.Office.Tools.Rib bon.Ribbon ToggleButt on
  Friend WithEvents GroupOther As Microsoft.Office.Tools.Rib bon.Ribbon Group
  Friend WithEvents lblVersion As Microsoft.Office.Tools.Rib bon.Ribbon Label
  Friend WithEvents btnTest As Microsoft.Office.Tools.Rib bon.Ribbon Button
  Friend WithEvents ToggleButton_Mirror As Microsoft.Office.Tools.Rib bon.Ribbon ToggleButt on
  Friend WithEvents ToggleButton_CustomSQL As Microsoft.Office.Tools.Rib bon.Ribbon ToggleButt on
  Friend WithEvents chkPaneMode As Microsoft.Office.Tools.Rib bon.Ribbon CheckBox
  Friend WithEvents GroupLogin As Microsoft.Office.Tools.Rib bon.Ribbon Group
  Friend WithEvents Box1 As Microsoft.Office.Tools.Rib bon.Ribbon Box
  Friend WithEvents EditBoxUsername As Microsoft.Office.Tools.Rib bon.Ribbon EditBox
  Friend WithEvents EditBoxPassword As Microsoft.Office.Tools.Rib bon.Ribbon EditBox
  Friend WithEvents btnLogin As Microsoft.Office.Tools.Rib bon.Ribbon Button
  Friend WithEvents Menu1 As Microsoft.Office.Tools.Rib bon.Ribbon Menu
  Friend WithEvents btnUsers As Microsoft.Office.Tools.Rib bon.Ribbon Button
  Friend WithEvents lblOnOff As Microsoft.Office.Tools.Rib bon.Ribbon Label
  Friend WithEvents ButtonLogin As Microsoft.Office.Tools.Rib bon.Ribbon Button
  Friend WithEvents GroupLogout As Microsoft.Office.Tools.Rib bon.Ribbon Group
  Friend WithEvents btnLogout As Microsoft.Office.Tools.Rib bon.Ribbon Button
  Friend WithEvents GroupSQL As Microsoft.Office.Tools.Rib bon.Ribbon Group
  Friend WithEvents chkUseAppSettings As Microsoft.Office.Tools.Rib bon.Ribbon CheckBox
  Friend WithEvents Group2 As Microsoft.Office.Tools.Rib bon.Ribbon Group
  Friend WithEvents btnMyStock As Microsoft.Office.Tools.Rib bon.Ribbon Button
  Friend WithEvents btnWanted As Microsoft.Office.Tools.Rib bon.Ribbon Button
End Class
Partial Class ThisRibbonCollection
  <System.Diagnostics.Debugg erNonUserC ode()> _
  Friend ReadOnly Property Ribbon1() As Ribbon1
    Get
      Return Me.GetRibbon(Of Ribbon1)()
    End Get
  End Property
End Class
Partial Class Ribbon1
  Inherits Microsoft.Office.Tools.Rib
  <System.Diagnostics.Debugg
  Public Sub New(ByVal container As System.ComponentModel.ICon
    MyClass.New()
    'Required for Windows.Forms Class Composition Designer support
    If (container IsNot Nothing) Then
      container.Add(Me)
    End If
  End Sub
  <System.Diagnostics.Debugg
  Public Sub New()
    MyBase.New(Globals.Factory
    'This call is required by the Component Designer.
    InitializeComponent()
  End Sub
  'Component overrides dispose to clean up the component list.
  <System.Diagnostics.Debugg
  Protected Overrides Sub Dispose(ByVal disposing As Boolean)
    Try
      If disposing AndAlso components IsNot Nothing Then
        components.Dispose()
      End If
    Finally
      MyBase.Dispose(disposing)
    End Try
  End Sub
  'Required by the Component Designer
  Private components As System.ComponentModel.ICon
  'NOTE: The following procedure is required by the Component Designer
  'It can be modified using the Component Designer.
  'Do not modify it using the code editor.
  <System.Diagnostics.Debugg
  Private Sub InitializeComponent()
    Dim resources As System.ComponentModel.Comp
    Me.Tab1 = Me.Factory.CreateRibbonTab
    Me.GroupConnect = Me.Factory.CreateRibbonGro
    Me.ComboBox_Connection = Me.Factory.CreateRibbonCom
    Me.btnManageConnections = Me.Factory.CreateRibbonBut
    Me.Menu1 = Me.Factory.CreateRibbonMen
    Me.btnUsers = Me.Factory.CreateRibbonBut
    Me.chkPaneMode = Me.Factory.CreateRibbonChe
    Me.chkUseAppSettings = Me.Factory.CreateRibbonChe
    Me.GroupConnectToCloud = Me.Factory.CreateRibbonGro
    Me.ButtonLogin = Me.Factory.CreateRibbonBut
    Me.GroupDateControl = Me.Factory.CreateRibbonGro
    Me.btnSelectDates = Me.Factory.CreateRibbonBut
    Me.lblFromDate = Me.Factory.CreateRibbonLab
    Me.lblToDate = Me.Factory.CreateRibbonLab
    Me.ToggleButton_DateContro
    Me.GroupSQL = Me.Factory.CreateRibbonGro
    Me.ToggleButton_CustomSQL = Me.Factory.CreateRibbonTog
    Me.btnRunCellQueriesCurren
    Me.btnRunCellQueriesAllShe
    Me.GroupGetData = Me.Factory.CreateRibbonGro
    Me.ToggleButton_Tables = Me.Factory.CreateRibbonTog
    Me.btnSingleValue = Me.Factory.CreateRibbonBut
    Me.btnMultipleValues = Me.Factory.CreateRibbonBut
    Me.btnTablesOther = Me.Factory.CreateRibbonBut
    Me.ToggleButton_LoadToExce
    Me.ToggleButton_Mirror = Me.Factory.CreateRibbonTog
    Me.GroupLoadData = Me.Factory.CreateRibbonGro
    Me.ComboBox_Queries = Me.Factory.CreateRibbonCom
    Me.ComboBox_Tables = Me.Factory.CreateRibbonCom
    Me.ComboBox_IdentityColumn
    Me.btnLoadToForm = Me.Factory.CreateRibbonBut
    Me.btnLoadToExcel = Me.Factory.CreateRibbonBut
    Me.Group1 = Me.Factory.CreateRibbonGro
    Me.btnUpdateUsingCellSelec
    Me.btnAddRowsInCellSelecti
    Me.btnDeleteRowsInCellSele
    Me.GroupLogin = Me.Factory.CreateRibbonGro
    Me.Box1 = Me.Factory.CreateRibbonBox
    Me.EditBoxUsername = Me.Factory.CreateRibbonEdi
    Me.EditBoxPassword = Me.Factory.CreateRibbonEdi
    Me.btnLogin = Me.Factory.CreateRibbonBut
    Me.GroupOther = Me.Factory.CreateRibbonGro
    Me.lblVersion = Me.Factory.CreateRibbonLab
    Me.btnTest = Me.Factory.CreateRibbonBut
    Me.lblOnOff = Me.Factory.CreateRibbonLab
    Me.GroupLogout = Me.Factory.CreateRibbonGro
    Me.btnLogout = Me.Factory.CreateRibbonBut
    Me.Group2 = Me.Factory.CreateRibbonGro
    Me.btnMyStock = Me.Factory.CreateRibbonBut
    Me.btnWanted = Me.Factory.CreateRibbonBut
    Me.Tab1.SuspendLayout()
    Me.GroupConnect.SuspendLay
    Me.GroupConnectToCloud.Sus
    Me.GroupDateControl.Suspen
    Me.GroupSQL.SuspendLayout(
    Me.GroupGetData.SuspendLay
    Me.GroupLoadData.SuspendLa
    Me.Group1.SuspendLayout()
    Me.GroupLogin.SuspendLayou
    Me.Box1.SuspendLayout()
    Me.GroupOther.SuspendLayou
    Me.GroupLogout.SuspendLayo
    Me.Group2.SuspendLayout()
    Me.SuspendLayout()
    '
    'Tab1
    '
    Me.Tab1.Groups.Add(Me.Grou
    Me.Tab1.Groups.Add(Me.Grou
    Me.Tab1.Groups.Add(Me.Grou
    Me.Tab1.Groups.Add(Me.Grou
    Me.Tab1.Groups.Add(Me.Grou
    Me.Tab1.Groups.Add(Me.Grou
    Me.Tab1.Groups.Add(Me.Grou
    Me.Tab1.Groups.Add(Me.Grou
    Me.Tab1.Groups.Add(Me.Grou
    Me.Tab1.Groups.Add(Me.Grou
    Me.Tab1.Groups.Add(Me.Grou
    Me.Tab1.Label = "The Steel Yard"
    Me.Tab1.Name = "Tab1"
    '
    'GroupConnect
    '
    Me.GroupConnect.Items.Add(
    Me.GroupConnect.Items.Add(
    Me.GroupConnect.Items.Add(
    Me.GroupConnect.Label = "Connect"
    Me.GroupConnect.Name = "GroupConnect"
    '
    'ComboBox_Connection
    '
    Me.ComboBox_Connection.Lab
    Me.ComboBox_Connection.Nam
    Me.ComboBox_Connection.Tex
    '
    'btnManageConnections
    '
    Me.btnManageConnections.La
    Me.btnManageConnections.Na
    '
    'Menu1
    '
    Me.Menu1.Items.Add(Me.btnU
    Me.Menu1.Items.Add(Me.chkP
    Me.Menu1.Items.Add(Me.chkU
    Me.Menu1.Label = "Settings/Users"
    Me.Menu1.Name = "Menu1"
    '
    'btnUsers
    '
    Me.btnUsers.Image = CType(resources.GetObject(
    Me.btnUsers.Label = "Users"
    Me.btnUsers.Name = "btnUsers"
    Me.btnUsers.ShowImage = True
    '
    'chkPaneMode
    '
    Me.chkPaneMode.Checked = True
    Me.chkPaneMode.Label = "Pane Mode"
    Me.chkPaneMode.Name = "chkPaneMode"
    '
    'chkUseAppSettings
    '
    Me.chkUseAppSettings.Label
    Me.chkUseAppSettings.Name = "chkUseAppSettings"
    '
    'GroupConnectToCloud
    '
    Me.GroupConnectToCloud.Ite
    Me.GroupConnectToCloud.Lab
    Me.GroupConnectToCloud.Nam
    '
    'ButtonLogin
    '
    Me.ButtonLogin.ControlSize
    Me.ButtonLogin.Image = CType(resources.GetObject(
    Me.ButtonLogin.Label = "Activate"
    Me.ButtonLogin.Name = "ButtonLogin"
    Me.ButtonLogin.ShowImage = True
    '
    'GroupDateControl
    '
    Me.GroupDateControl.Items.
    Me.GroupDateControl.Items.
    Me.GroupDateControl.Items.
    Me.GroupDateControl.Items.
    Me.GroupDateControl.Label = "Date Control"
    Me.GroupDateControl.Name = "GroupDateControl"
    Me.GroupDateControl.Visibl
    '
    'btnSelectDates
    '
    Me.btnSelectDates.Image = CType(resources.GetObject(
    Me.btnSelectDates.Label = "Select Dates"
    Me.btnSelectDates.Name = "btnSelectDates"
    Me.btnSelectDates.ShowImag
    '
    'lblFromDate
    '
    Me.lblFromDate.Label = "-"
    Me.lblFromDate.Name = "lblFromDate"
    '
    'lblToDate
    '
    Me.lblToDate.Label = "-"
    Me.lblToDate.Name = "lblToDate"
    '
    'ToggleButton_DateControl
    '
    Me.ToggleButton_DateContro
    Me.ToggleButton_DateContro
    Me.ToggleButton_DateContro
    Me.ToggleButton_DateContro
    Me.ToggleButton_DateContro
    '
    'GroupSQL
    '
    Me.GroupSQL.Items.Add(Me.T
    Me.GroupSQL.Items.Add(Me.b
    Me.GroupSQL.Items.Add(Me.b
    Me.GroupSQL.Label = "SQL"
    Me.GroupSQL.Name = "GroupSQL"
    Me.GroupSQL.Visible = False
    '
    'ToggleButton_CustomSQL
    '
    Me.ToggleButton_CustomSQL.
    Me.ToggleButton_CustomSQL.
    Me.ToggleButton_CustomSQL.
    Me.ToggleButton_CustomSQL.
    Me.ToggleButton_CustomSQL.
    '
    'btnRunCellQueriesCurrentS
    '
    Me.btnRunCellQueriesCurren
    Me.btnRunCellQueriesCurren
    Me.btnRunCellQueriesCurren
    Me.btnRunCellQueriesCurren
    Me.btnRunCellQueriesCurren
    '
    'btnRunCellQueriesAllSheet
    '
    Me.btnRunCellQueriesAllShe
    Me.btnRunCellQueriesAllShe
    Me.btnRunCellQueriesAllShe
    Me.btnRunCellQueriesAllShe
    Me.btnRunCellQueriesAllShe
    '
    'GroupGetData
    '
    Me.GroupGetData.Items.Add(
    Me.GroupGetData.Items.Add(
    Me.GroupGetData.Items.Add(
    Me.GroupGetData.Items.Add(
    Me.GroupGetData.Items.Add(
    Me.GroupGetData.Items.Add(
    Me.GroupGetData.Label = "Get Data"
    Me.GroupGetData.Name = "GroupGetData"
    Me.GroupGetData.Visible = False
    '
    'ToggleButton_Tables
    '
    Me.ToggleButton_Tables.Con
    Me.ToggleButton_Tables.Ima
    Me.ToggleButton_Tables.Lab
    Me.ToggleButton_Tables.Nam
    Me.ToggleButton_Tables.Sho
    '
    'btnSingleValue
    '
    Me.btnSingleValue.Label = "Single Value"
    Me.btnSingleValue.Name = "btnSingleValue"
    Me.btnSingleValue.Visible = False
    '
    'btnMultipleValues
    '
    Me.btnMultipleValues.Label
    Me.btnMultipleValues.Name = "btnMultipleValues"
    Me.btnMultipleValues.Visib
    '
    'btnTablesOther
    '
    Me.btnTablesOther.Label = "Tables/Other"
    Me.btnTablesOther.Name = "btnTablesOther"
    Me.btnTablesOther.Visible = False
    '
    'ToggleButton_LoadToExcel
    '
    Me.ToggleButton_LoadToExce
    Me.ToggleButton_LoadToExce
    Me.ToggleButton_LoadToExce
    Me.ToggleButton_LoadToExce
    Me.ToggleButton_LoadToExce
    Me.ToggleButton_LoadToExce
    '
    'ToggleButton_Mirror
    '
    Me.ToggleButton_Mirror.Con
    Me.ToggleButton_Mirror.Ima
    Me.ToggleButton_Mirror.Lab
    Me.ToggleButton_Mirror.Nam
    Me.ToggleButton_Mirror.Sho
    '
    'GroupLoadData
    '
    Me.GroupLoadData.Items.Add
    Me.GroupLoadData.Items.Add
    Me.GroupLoadData.Items.Add
    Me.GroupLoadData.Items.Add
    Me.GroupLoadData.Items.Add
    Me.GroupLoadData.Label = "Load Data"
    Me.GroupLoadData.Name = "GroupLoadData"
    '
    'ComboBox_Queries
    '
    Me.ComboBox_Queries.Label = "Queries"
    Me.ComboBox_Queries.Name = "ComboBox_Queries"
    Me.ComboBox_Queries.Text = Nothing
    '
    'ComboBox_Tables
    '
    Me.ComboBox_Tables.Label = "Tables"
    Me.ComboBox_Tables.Name = "ComboBox_Tables"
    Me.ComboBox_Tables.Text = Nothing
    '
    'ComboBox_IdentityColumn
    '
    Me.ComboBox_IdentityColumn
    Me.ComboBox_IdentityColumn
    Me.ComboBox_IdentityColumn
    '
    'btnLoadToForm
    '
    Me.btnLoadToForm.ControlSi
    Me.btnLoadToForm.Image = CType(resources.GetObject(
    Me.btnLoadToForm.Label = "Load To Form"
    Me.btnLoadToForm.Name = "btnLoadToForm"
    Me.btnLoadToForm.ShowImage
    '
    'btnLoadToExcel
    '
    Me.btnLoadToExcel.ControlS
    Me.btnLoadToExcel.Image = CType(resources.GetObject(
    Me.btnLoadToExcel.Label = "Load To  Excel"
    Me.btnLoadToExcel.Name = "btnLoadToExcel"
    Me.btnLoadToExcel.ShowImag
    '
    'Group1
    '
    Me.Group1.Items.Add(Me.btn
    Me.Group1.Items.Add(Me.btn
    Me.Group1.Items.Add(Me.btn
    Me.Group1.Label = "Edit/Add/Delete Data"
    Me.Group1.Name = "Group1"
    '
    'btnUpdateUsingCellSelecti
    '
    Me.btnUpdateUsingCellSelec
    Me.btnUpdateUsingCellSelec
    Me.btnUpdateUsingCellSelec
    Me.btnUpdateUsingCellSelec
    Me.btnUpdateUsingCellSelec
    '
    'btnAddRowsInCellSelection
    '
    Me.btnAddRowsInCellSelecti
    Me.btnAddRowsInCellSelecti
    Me.btnAddRowsInCellSelecti
    Me.btnAddRowsInCellSelecti
    Me.btnAddRowsInCellSelecti
    '
    'btnDeleteRowsInCellSelect
    '
    Me.btnDeleteRowsInCellSele
    Me.btnDeleteRowsInCellSele
    Me.btnDeleteRowsInCellSele
    Me.btnDeleteRowsInCellSele
    Me.btnDeleteRowsInCellSele
    '
    'GroupLogin
    '
    Me.GroupLogin.Items.Add(Me
    Me.GroupLogin.Label = "Log In"
    Me.GroupLogin.Name = "GroupLogin"
    '
    'Box1
    '
    Me.Box1.BoxStyle = Microsoft.Office.Tools.Rib
    Me.Box1.Items.Add(Me.EditB
    Me.Box1.Items.Add(Me.EditB
    Me.Box1.Items.Add(Me.btnLo
    Me.Box1.Name = "Box1"
    '
    'EditBoxUsername
    '
    Me.EditBoxUsername.Label = "Username"
    Me.EditBoxUsername.Name = "EditBoxUsername"
    Me.EditBoxUsername.Text = Nothing
    '
    'EditBoxPassword
    '
    Me.EditBoxPassword.Label = "Password"
    Me.EditBoxPassword.Name = "EditBoxPassword"
    Me.EditBoxPassword.Text = Nothing
    '
    'btnLogin
    '
    Me.btnLogin.Label = "Log In"
    Me.btnLogin.Name = "btnLogin"
    '
    'GroupOther
    '
    Me.GroupOther.Items.Add(Me
    Me.GroupOther.Items.Add(Me
    Me.GroupOther.Items.Add(Me
    Me.GroupOther.Label = "Other"
    Me.GroupOther.Name = "GroupOther"
    Me.GroupOther.Visible = False
    '
    'lblVersion
    '
    Me.lblVersion.Label = "-"
    Me.lblVersion.Name = "lblVersion"
    '
    'btnTest
    '
    Me.btnTest.Label = "Test"
    Me.btnTest.Name = "btnTest"
    '
    'lblOnOff
    '
    Me.lblOnOff.Label = "Off"
    Me.lblOnOff.Name = "lblOnOff"
    '
    'GroupLogout
    '
    Me.GroupLogout.Items.Add(M
    Me.GroupLogout.Label = "Log Out"
    Me.GroupLogout.Name = "GroupLogout"
    '
    'btnLogout
    '
    Me.btnLogout.ControlSize = Microsoft.Office.Core.Ribb
    Me.btnLogout.Image = CType(resources.GetObject(
    Me.btnLogout.Label = "Log Out"
    Me.btnLogout.Name = "btnLogout"
    Me.btnLogout.ShowImage = True
    '
    'Group2
    '
    Me.Group2.Items.Add(Me.btn
    Me.Group2.Items.Add(Me.btn
    Me.Group2.Label = "Load My Data"
    Me.Group2.Name = "Group2"
    '
    'btnMyStock
    '
    Me.btnMyStock.ControlSize = Microsoft.Office.Core.Ribb
    Me.btnMyStock.Image = CType(resources.GetObject(
    Me.btnMyStock.Label = "My Stock Items"
    Me.btnMyStock.Name = "btnMyStock"
    Me.btnMyStock.ShowImage = True
    '
    'btnWanted
    '
    Me.btnWanted.ControlSize = Microsoft.Office.Core.Ribb
    Me.btnWanted.Image = CType(resources.GetObject(
    Me.btnWanted.Label = "My Wanted Items"
    Me.btnWanted.Name = "btnWanted"
    Me.btnWanted.ShowImage = True
    '
    'Ribbon1
    '
    Me.Name = "Ribbon1"
    Me.RibbonType = "Microsoft.Excel.Workbook"
    Me.Tabs.Add(Me.Tab1)
    Me.Tab1.ResumeLayout(False
    Me.Tab1.PerformLayout()
    Me.GroupConnect.ResumeLayo
    Me.GroupConnect.PerformLay
    Me.GroupConnectToCloud.Res
    Me.GroupConnectToCloud.Per
    Me.GroupDateControl.Resume
    Me.GroupDateControl.Perfor
    Me.GroupSQL.ResumeLayout(F
    Me.GroupSQL.PerformLayout(
    Me.GroupGetData.ResumeLayo
    Me.GroupGetData.PerformLay
    Me.GroupLoadData.ResumeLay
    Me.GroupLoadData.PerformLa
    Me.Group1.ResumeLayout(Fal
    Me.Group1.PerformLayout()
    Me.GroupLogin.ResumeLayout
    Me.GroupLogin.PerformLayou
    Me.Box1.ResumeLayout(False
    Me.Box1.PerformLayout()
    Me.GroupOther.ResumeLayout
    Me.GroupOther.PerformLayou
    Me.GroupLogout.ResumeLayou
    Me.GroupLogout.PerformLayo
    Me.Group2.ResumeLayout(Fal
    Me.Group2.PerformLayout()
    Me.ResumeLayout(False)
  End Sub
  Friend WithEvents Tab1 As Microsoft.Office.Tools.Rib
  Friend WithEvents GroupLoadData As Microsoft.Office.Tools.Rib
  Friend WithEvents btnUpdateUsingCellSelectio
  Friend WithEvents ComboBox_Tables As Microsoft.Office.Tools.Rib
  Friend WithEvents btnAddRowsInCellSelection As Microsoft.Office.Tools.Rib
  Friend WithEvents btnDeleteRowsInCellSelecti
  Friend WithEvents GroupConnect As Microsoft.Office.Tools.Rib
  Friend WithEvents ComboBox_Connection As Microsoft.Office.Tools.Rib
  Friend WithEvents btnManageConnections As Microsoft.Office.Tools.Rib
  Friend WithEvents ComboBox_IdentityColumn As Microsoft.Office.Tools.Rib
  Friend WithEvents GroupDateControl As Microsoft.Office.Tools.Rib
  Friend WithEvents btnSelectDates As Microsoft.Office.Tools.Rib
  Friend WithEvents lblFromDate As Microsoft.Office.Tools.Rib
  Friend WithEvents lblToDate As Microsoft.Office.Tools.Rib
  Friend WithEvents ToggleButton_DateControl As Microsoft.Office.Tools.Rib
  Friend WithEvents GroupGetData As Microsoft.Office.Tools.Rib
  Friend WithEvents ToggleButton_LoadToExcel As Microsoft.Office.Tools.Rib
  Friend WithEvents btnSingleValue As Microsoft.Office.Tools.Rib
  Friend WithEvents btnMultipleValues As Microsoft.Office.Tools.Rib
  Friend WithEvents btnRunCellQueriesCurrentSh
  Friend WithEvents btnRunCellQueriesAllSheets
  Friend WithEvents btnTablesOther As Microsoft.Office.Tools.Rib
  Friend WithEvents btnLoadToExcel As Microsoft.Office.Tools.Rib
  Friend WithEvents btnLoadToForm As Microsoft.Office.Tools.Rib
  Friend WithEvents ComboBox_Queries As Microsoft.Office.Tools.Rib
  Friend WithEvents GroupConnectToCloud As Microsoft.Office.Tools.Rib
  Friend WithEvents Group1 As Microsoft.Office.Tools.Rib
  Friend WithEvents ToggleButton_Tables As Microsoft.Office.Tools.Rib
  Friend WithEvents GroupOther As Microsoft.Office.Tools.Rib
  Friend WithEvents lblVersion As Microsoft.Office.Tools.Rib
  Friend WithEvents btnTest As Microsoft.Office.Tools.Rib
  Friend WithEvents ToggleButton_Mirror As Microsoft.Office.Tools.Rib
  Friend WithEvents ToggleButton_CustomSQL As Microsoft.Office.Tools.Rib
  Friend WithEvents chkPaneMode As Microsoft.Office.Tools.Rib
  Friend WithEvents GroupLogin As Microsoft.Office.Tools.Rib
  Friend WithEvents Box1 As Microsoft.Office.Tools.Rib
  Friend WithEvents EditBoxUsername As Microsoft.Office.Tools.Rib
  Friend WithEvents EditBoxPassword As Microsoft.Office.Tools.Rib
  Friend WithEvents btnLogin As Microsoft.Office.Tools.Rib
  Friend WithEvents Menu1 As Microsoft.Office.Tools.Rib
  Friend WithEvents btnUsers As Microsoft.Office.Tools.Rib
  Friend WithEvents lblOnOff As Microsoft.Office.Tools.Rib
  Friend WithEvents ButtonLogin As Microsoft.Office.Tools.Rib
  Friend WithEvents GroupLogout As Microsoft.Office.Tools.Rib
  Friend WithEvents btnLogout As Microsoft.Office.Tools.Rib
  Friend WithEvents GroupSQL As Microsoft.Office.Tools.Rib
  Friend WithEvents chkUseAppSettings As Microsoft.Office.Tools.Rib
  Friend WithEvents Group2 As Microsoft.Office.Tools.Rib
  Friend WithEvents btnMyStock As Microsoft.Office.Tools.Rib
  Friend WithEvents btnWanted As Microsoft.Office.Tools.Rib
End Class
Partial Class ThisRibbonCollection
  <System.Diagnostics.Debugg
  Friend ReadOnly Property Ribbon1() As Ribbon1
    Get
      Return Me.GetRibbon(Of Ribbon1)()
    End Get
  End Property
End Class






EARN REWARDS FOR ASKING, ANSWERING, AND MORE.
Earn free swag for participating on the platform.
Microsoft Excel
--
Questions
--
Followers
Top Experts
Microsoft Excel topics include formulas, formatting, VBA macros and user-defined functions, and everything else related to the spreadsheet user interface, including error messages.