Question : Userform failed to open

Hi Experts,

I would like to request Experts help. The Userform failed to open when click “Report” button at “Invoice Tracker” sheet. The error message is “Subscript out of range” at this line:

rptFrm.Show (module4)

Hope Experts could help me to rectify this error.

Attachments:

Userform-report.xls (396 KB) (File Type Details)

xls

Answer : Userform failed to open

Theva,

its the bonus space again :)

Change as below

hth

Dave

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:



'Change

Private Sub UserForm_Initialize()
   Dim MinDate, MaxDate
   Set ws = Sheets("Invoices Tracker ")

'to

Private Sub UserForm_Initialize()
   Dim MinDate, MaxDate
   Set ws = Sheets("Invoices Tracker")

Question : Userform failed to open

Answer : Userform failed to open

Theva,its the bonus space again :)Change as belowhthDave 1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 'Change Private Sub UserForm_Initialize() Dim MinDate, MaxDate Set ws = Sheets("Invoices Tracker ") 'to Private Sub UserForm_Initialize() Dim MinDate, MaxDate Set ws = Sheets("Invoices Tracker")

Theva,

its the bonus space again :)

Change as below

hth

Dave

1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11:

'Change Private Sub UserForm_Initialize() Dim MinDate, MaxDate Set ws = Sheets("Invoices Tracker ") 'to Private Sub UserForm_Initialize() Dim MinDate, MaxDate Set ws = Sheets("Invoices Tracker")