Why am I getting an "Object required" Here?

[Shafty]

Why am I getting the following Error Message on the Below codes.

Run-time error '424':
"Object required"

Public Sub NewIT()
Dim Employees As ListObject
    Set Employees = ThisWorkbook.Sheets("Employees").ListObjects("Employees")
    Call ThisWorkbook.Worksheets.Add(After:=Employees.Parent, Count:=Employees.ListRows.Count)
Dim Individuals As Worksheets
    Set Individuals = Array(ThisWorkbook.Worksheets.Add(After:=Employees.Parent, Count:=Employees.ListRows.Count))
    Call Individuals.FillAcrossSheets(Employees.HeaderRowRange, xlFillWithAll)
End Sub

Requesting our dear members to Kindly rectify this issue. Thank You.

 

[Joe4]

I am not sure why you are trying to use "Call" here. That is typically used to call other Procedures.
See: https://docs.microsoft.com/en-us/office/vba/language/reference/user-interface-help/call-statement

 

[Shafty]

I am not sure why you are trying to use "Call" here. That is typically used to call other Procedures.
See: https://docs.microsoft.com/en-us/office/vba/language/reference/user-interface-help/call-statement

The Same error occurs even after removing the "Call" Keyword. I am requesting all our members to kindly provide an insight on why this error is coming and How to resolve it. Thanks in Advance. Work at stake

Public Sub NewIT()Dim Employees As ListObject
    Set Employees = ThisWorkbook.Sheets("Employees").ListObjects("Employees")
     ThisWorkbook.Worksheets.Add After:=Employees.Parent, Count:=Employees.ListRows.Count
Dim Individuals As Worksheets
    Set Individuals = Array(ThisWorkbook.Worksheets.Add(After:=Employees.Parent, Count:=Employees.ListRows.Count))
    Individuals.FillAcrossSheets Employees.HeaderRowRange, xlFillWithAll
End Sub

 

[Fluff]

Which line do you get the error on?
And what are you trying to do here

Set Individuals = Array(ThisWorkbook.Worksheets.Add(After:=Employees.Parent, Count:=Employees.ListRows.Count))

 

[Shafty]

Hi Fluff. I have to say a lot. Need some more time to type it. Requesting you to kindly keep your interest on this post. Thank you.

 

[Michael M]

It looks to me like you're trying to add a new sheet and copy existing data into that new sheet ???