Hi Brian, this is probably your problem, but without some explanation I
can't be sure.

UserForm1("Office_Package_Preparations_101").Value

It looks like a comination of a UserForm code name and a string name. If
UserForm1 is named "Office_Package_Preparations_101" then you should not
need the UserForm1 as part of the reference. If it is a control on the
userform then you need a decimal point after UserForm1 and remove the
Parentheses and quotemarks. What is the item that you are trying to return
the value of?


"Brian" wrote in message
...
I have a user Form with several Check Boxes in it. I would like for the
Check
Boxes in the User Form to Check or Uncheck boxes in a different Workbook
worksheet. I tried the following code, but for some reason it does not
work.

Can anyone please help me?

Sub Update_Forms1()

With Workbooks("Forms.xlsm").Sheets("Install Pack Con")

.Range("Check Box 01").Value =
UserForm1("Office_Package_Preparations_101").Value
.Range("Check Box 02").Value =
UserForm1("Office_Package_Preparations_102").Value
.Range("Check Box 03").Value =
UserForm1("Office_Package_Preparations_103").Value
.Range("Check Box 04").Value =
UserForm1("Office_Package_Preparations_104").Value

End With
End Sub