Copy Macro doesn't copy data validation

[mlindquist]

I have a macro that I'm using to copy two sheets from one work book to another workbook. The copy works - what doesn't work is copying the data validation that I have on one of the sheets where it has a drop down list based on the other sheet?

Any suggestions to make this also copy along with the sheets to the other workbook?

Thanks!

 

[MrTomasz]

you need to use: .PasteSpecial Paste:=xlDataValidation

 

[mlindquist]

So here is my current VBA - where would I put the code? I tried to put right after the .Copy but that wasn't the correct place

Sub CopySheets()

myWorkbook = InputBox("Enter Workbook Name")
 
Workbooks("HirerightInvoiceConfirmation.xlsx").Sheets("Confirmation Form").Copy _
    After:=Workbooks(myWorkbook & ".xlsx").Sheets(Workbooks(myWorkbook & ".xlsx").Sheets.Count)
    
Workbooks("HirerightInvoiceConfirmation.xlsx").Sheets("Disputes Reasons").Copy _
    After:=Workbooks(myWorkbook & ".xlsx").Sheets(Workbooks(myWorkbook & ".xlsx").Sheets.Count)
    
End Sub