"ByRef:mismatch" and "Constant Expression Required" Errors

Hello, I am new to writing Excel VBA functions and ran into issues writing up a function (that is specific to my worksheet).

I am trying to get the sum all the values that can be found on one sheet (called "Reimbursements") within the workbook but are only relevant to the dates in the current worksheet (that can be found in the name of the current worksheet). However, all the values on "Reimbursements" are spread out across the worksheet with multiple columns (Valuesinit), and some of them are not relevant to me because their dates do not match (DReiminit) or they have been set to a status of FALSE (Reiminit).

I first run into into a "ByRef:mismatch" on the red line of code, and then other times run into a "Constant expression required" on a purple line of code.

The overall code is (additional Functions can be found after this overall code):

Please Login or Register  to view this content.

Some other code I used in the overall code that I have found throughout the web (and hereby should not be credited to me):

Mysplitfunction:

Please Login or Register  to view this content.

piece:

Please Login or Register  to view this content.

FindAll:

Please Login or Register  to view this content.

I am currently switch between Microsoft Excel 2010 and 2013. If there is anything that requires clarification please tell me as this is my first time posting.

You declared SheetDateRng as a string, but your function returns an array of strings. Your other error is due to the fact that you can't declare a constant that depends on a property of a range (since it could vary). You need a variable.

No - your function is declared to return an array of strings, hence the As String() rather than As String at the end of the declaration.

Yes, but it's Columns.Count

You need:

Please Login or Register  to view this content.

rather than:

Please Login or Register  to view this content.