Display the columns (Dynamic and Static data)

[Kamalakar M]

Hi Team,

a quick help needed here !!!

with the help from this forum i have now managed to write a macro which fetch the records based on the input parameters.

the Input parameters are (Employee ID , Start Date , End Date) -- Based on these dates, it fetches the records available jfrom the base data and copy the data in to a new sheet called " FilterData"

variables used for input parameters:

Var1 = Sheets("Automation").Range("C" & i) -- Employee id
Var2 = Sheets("Automation").Range("E" & i) -- StartDate
Var3 = Sheets("Automation").Range("F" & i) -- End Date

the specific code which i using here to get the records from the basedata :

Union(Cells(cell.Row, "A"), Cells(cell.Row, "B"), Cells(cell.Row, "C"), Cells(cell.Row, "D"), Cells(cell.Row, "E"), Cells(cell.Row, "F"), Cells(cell.Row, "G"), Cells(cell.Row, "H"), Cells(cell.Row, "I"), Cells(cell.Row, "J"), Cells(cell.Row, "K"), Cells(cell.Row, "L"), Cells(cell.Row, "M"), Cells(cell.Row, "N"), Cells(cell.Row, "O"), Cells(cell.Row, "P"), Cells(cell.Row, "Q"), Cells(cell.Row, "R")).Copy ws2.Range("A" & lr2)


Now i have introduced a new Variable to capture the Application No#

Var6 = Sheets("Automation").Range("D" & i)

Now i want to capture the same Application No# in the output. (Say for an employee there are 5 records from the basedata then for all the 5 records the application no which is used as part of input parameters should capture for all these 5 records)

note : the Application# is a static input , the field is not available in the base data.

using the above Union function, is there any feasible to capture this Application# field. or any alternate to do this then kindly help me on this.

Regards,
Kamal M.