when I try and capture information on the sheet displayed, the information that is captured actually appears on the HOME sheet, and NOT the sheet displayed!
I am sorry, but that statement is semantically invalid in VBA.
Note sequence of events below.
Private Sub CBOk_Click()
Application.ScreenUpdating = False
'***** CHECK THAT A SELECTION IS MADE
If Me.obCapture.Value = False And Me.obPrint.Value = False Then
MsgBox "Please Select Print Form OR Capture!!"
End If
'***** IF PRINT OPTION IS SELECTED, OPEN PRINT FORM
If Me.obPrint.Value = True Then
With Worksheets("Materials Form")
.Visible = True
.Activate
End With
Worksheets("Home").Visible = False
Unload Me
End If
'***** IF CAPTURE IS SELECTED, OPEN CAPTURE FORM
If Me.obCapture.Value = True Then
With Worksheets("Materials Capture")
.Visible = True
.Activate
End With
Worksheets("Home").Visible = False
Unload Me
End If
Application.ScreenUpdating = True
End Sub