Copying data from a single master yearly sheet to Multiple sheets( monthwise)

Hi ,

Could anyone please let me know a macro to copy data from a yearly sheet called mastersheet to individual months Jan, Feb( based on date of enquiry)

Hi Fortis,

Thanks a lot for that. I tried the code but its giving me an error as Subfunction not defined. As suggested in code i changed the three entities to suit my sheet. Kindly help

'Column to evaluate from, column A = 1, B = 2, etc.
vCol = 17

'Sheet with data in it
Set ws = Sheets("Year")

'Range where titles are across top of data, as string, data MUST
'have titles in this row, edit to suit your titles locale
vTitles = "A2:Z2"
TitleRow = Range(vTitles).Cells(1).Row