Hi,
I created a custom ribbon using an xml editor. I have set one of the buttons to open a userform. The userform initializes but when I click the command buttons they do not respond. Can someone help me modify the code so the command buttons will execute the code.
Below is the code that calls the userform
Here is a portion of the code for the userform command buttonSub import_exportCensusOut_v5_0(control As IRibbonControl) frmProjects.Show End Sub
Private Sub cmdCensusOut50_Click() Dim wb As Workbook Dim ws As Worksheet Dim wbCensusOut As Workbook Dim wsCensusOut As Worksheet Dim firstrow As Long Dim lastrow As Long Dim lastcolumn As Long Dim newFileName As String Dim sFolder As String Me.Hide Application.ScreenUpdating = False Set wb = ActiveWorkbook Set ws = wb.Sheets("REPO-MOS-Tracker") ws.AutoFilterMode = False ws.Outline.ShowLevels RowLevels:=8, ColumnLevels:=8 lastcolumn = ws.Cells(3, ws.Columns.Count).End(xlToLeft).Column lastrow = ws.Cells(ws.Rows.Count, 1).End(xlUp).Row End Sub





					
				
                    
            
                
            
            
        
					
					
					
						
  Reply With Quote
			