Using PasteSpecial with Destination macro code and error

[azmatb]

Hello,
I have this code to copy data rows from worksheet Download from File1 to School Employee Info worksheet. Both worksheets are in one excel file.
When i run the code below, it copies fine, but in the School Employee Info file, the formatting is not correct. So i was trying to use PasteSpecial code below and it becomes in red color in VBA window. Not sure if this is right or not. Any help will be appreciated.

'Employee Status
Worksheets("Download from File1").Cells(i, 13).Copy
Worksheets("Download from File1").Paste Destination:=Worksheets("School Employee Info").Cells(erow + 1, 1).PasteSpecial Paste:=xlPasteValues

 

[rollis13]

Change to this:

Worksheets("Download from File1").Cells(i, 13).Copy
Worksheets("School Employee Info").Cells(erow + 1, 1).PasteSpecial Paste:=xlPasteValues

 

[azmatb]

Thanks, the above worked for me

 

[azmatb]

Change to this:

Worksheets("Download from File1").Cells(i, 13).Copy
Worksheets("School Employee Info").Cells(erow + 1, 1).PasteSpecial Paste:=xlPasteValues

I also have this piece of code where i want to use PasteSpecial....should i format in any other way.

erow = Worksheets("School Employee Info").Cells(Rows.Count, 1).End(xlUp).Row
Worksheets("Download from File1").Paste Destination:=Worksheets("School Employee Info").Cells(erow + 1, 1)

I tried like this, but gives me an error

erow = Worksheets("School Employee Info").Cells(Rows.Count, 1).End(xlUp).Row
Worksheets("Download from File1").Worksheets("School Employee Info").Cells(erow + 1, 1).PasteSpecial Paste:=xlPasteValues

 

[rollis13]

erow = Worksheets("School Employee Info").Cells(Rows.Count, 1).End(xlUp).Row
Worksheets("School Employee Info").Cells(erow + 1, 1).PasteSpecial Paste:=xlPasteValues

In between or just before you need to carry out the Copy (of something); you need to tell VBE what you going to Paste !

 

[azmatb]

erow = Worksheets("School Employee Info").Cells(Rows.Count, 1).End(xlUp).Row
Worksheets("School Employee Info").Cells(erow + 1, 1).PasteSpecial Paste:=xlPasteValues

In between or just before you need to carry out the Copy (of something); you need to tell VBE what you going to Paste !

Thanks, it worked.

 

[rollis13]

Thanks for the positive feedback, glad having been of some help.