Display Data at Userform Based on Conditions

Hi Experts,

I would like to request Experts help to modify the attached script to display data from “Daily Tracking List” sheet at Userform 2 based on populated data at column B43 onwards at Chart 2 sheet. The data was copied from “Daily Tracking List” if  2 conditions “Module 1 - Sub InsertIssue()”:

 data with “Yes” at column I “Daily Tracking List” and referring to week of the month (week of the month based on cell at B41 – Chart sheet which is looking at column A “Daily Tracking List”).

The userform is activated when we double click cell at column B 43 and onward but not extracting the right data as per condition. Hope Experts will help me to  modify this script and able to display the right data  at Userform.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim rng As Range
Dim celle As Range

With Sheets("Chart2")
    Set rng = Range(.Cells(2, "B"), .Cells(.Rows.Count, "C"))
End With

If Not Intersect(rng, Target) Is Nothing Then
    On Error GoTo ende
    UserForm2.Show
Else
    On Error GoTo ende
    UserForm2.Hide
    Unload UserForm2
End If
ende:
End Sub

Select allOpen in new window

Chart-Userform.xls