Maybe something like:

Option Explicit
Private Sub UserForm_Initialize()
Me.CheckBox1.Value = CBool(Worksheets("sheet1").Range("a1").Value < "")
End Sub



Patrick Simonds wrote:

On my userform initialize code, I want to have the checkbox value to be true
(checked) if there is something in the referenced cell. I populate my
textboxes with:

TextBox5.Text = rng(1, 2).Value

but not sure how to do this with a checkbox.

--

Dave Peterson