Good morning all. Something that I thought would be rather simple has turned out to give me alot of problems. All Im trying to do is print a worksheet from inside the userform. Excel shows it is sent to the printer but does not print. Then it hangs up, shuts down and recovers my file but will not print. The code is below. Is it something Im doing???. Ive checked both of my books for a solution. Please help..
If UserForm1.CheckBox1.Value = False Then _
Exit Sub
If UserForm1.CheckBox1.Value = True Then _
Worksheets("FUNT").Range("A29").Value = "Face"
Worksheets("FUNT").Range("A30").Value = "UP"
Worksheets("FUNT").Range("A33").Value = UserForm1.DTPicker1.Value
If UserForm1.CheckBox4.Value = True Then _
Worksheets("FUNT").Range("A31").Value = ("8'")
Worksheets("funt").Visible = True
Worksheets("FUNT").PrintOut Copies:=1, Collate:=True
Worksheets("funt").Visible = xlVeryHidden
If UserForm1.CheckBox1.Value = False Then _
Exit Sub
If UserForm1.CheckBox1.Value = True Then _
Worksheets("FUNT").Range("A29").Value = "Face"
Worksheets("FUNT").Range("A30").Value = "UP"
Worksheets("FUNT").Range("A33").Value = UserForm1.DTPicker1.Value
If UserForm1.CheckBox4.Value = True Then _
Worksheets("FUNT").Range("A31").Value = ("8'")
Worksheets("funt").Visible = True
Worksheets("FUNT").PrintOut Copies:=1, Collate:=True
Worksheets("funt").Visible = xlVeryHidden