Hello everyone,
I've been trying to solve this issue for the past two weeks, and cannot seem to get it worked out. I have uploaded my workbook (redacted)
to help illustrate what I'm trying to accomplish. On sheet 1, titled "Hospital Contacts", I have a drop down list for the user to select a facility. When the facility is selected, other cells are populated with contact information for personnel associated with the facility. At last count, the personnel field was up to 55 people (located at one facility).
I'm attempting to place a Check Box next a person's name so that the user may select the individual they wish, ultimately to cut/paste the contact information into a chart note, etc...
Here are the ranges for what I'm trying to accomplish:
Personnel, the cells I want to search are the range E12:E55.
The closest I've come to accomplishing this has been:
Private Sub Worksheet_Calculate()
Dim ChkBox As Object
With ActiveSheet
For Each ChkBox In .CheckBoxes
If .Range("E12:E55") = " " Then
ChkBox.Visible = False
Else:
ChkBox.Visible = True
End If
Next ChkBox
End With
End Sub
Obviously, this doesn't work. I usually get a Type_mismatch error r/t the 'If' statement ".Range("E12:E55").
I've researched my behind off and just can't seem to get it. So, I'm throwing in the towel and asking for any help. Thank you in advance for even just a suggestion as to how to approach this
Sample.xlsm
Bookmarks