VBA to Copy, Open a New Workbook and Save

[GCLIFTON]

I need help. I need the vba to

Copy cells A10:G
Open a New Excel workbook and Formatting R paste
Then Bold the Top Line A1:D1 and that is it.

 

[par60056]

You would want something like this:

Range("A10:G200").Copy
Workbooks.Add
Range("A1").PasteSpecial xlPasteValuesAndNumberFormats
Range("A1:D1").Font.Bold = True

you didn't say how big the area to copy is.

 

[GCLIFTON]

From Column A10 over to Columen G10 all the way down until there is no information and is there a way to Paste by Formatting R. Columns E, F, G that are being copied are highlighted in Grey.

 

[par60056]

There are a number of options for pastespecial. I'm not sure which will do what you want. I usually paste values and numberformats and then format the information the way I want. I'm sure there is an option to copy the cell formats too.

If you erase the parameter in the editor and hit space it will show the the possible values for the parameter.

 

[GCLIFTON]

If the Macro could Highlight those cells all the down with the give data that would be great E1:G
So then the Macro would say
Range A1:G1. Font. Bold= True
Then could you also add
Grind line all of the given data and Center all data