Forum Discussion
Dave_StewartUK
Aug 12, 2022Copper Contributor
Help to automate a process
Hi,
Still learning with excel but I am hoping this is not too hard.
I have a spreadsheet named PDF.
I want a macro to select range A1 to I26
copy as picture - as shown when printed
I can then just paste into a document as needed.
I tried to record a macro but it does not record me choosing "copy as picture>as shown when printed"
Anyone can help please?
Here is a small macro, untested..hope it will help you.
Public Sub PicAreaCopy() Sheet1.Range("A1:H15").CopyPicture Appearance:=xlScreen, Format:=xlPicture With Sheet2 .Paste .Range("A1") End With End Sub
I know I don't know anything (Socrates)
- NikolinoDEGold Contributor
Here is a small macro, untested..hope it will help you.
Public Sub PicAreaCopy() Sheet1.Range("A1:H15").CopyPicture Appearance:=xlScreen, Format:=xlPicture With Sheet2 .Paste .Range("A1") End With End Sub
I know I don't know anything (Socrates)
- Dave_StewartUKCopper Contributor
Thanks so much for the help, i was able to tweak that to get it to work.
Much appreciated
- NikolinoDEGold ContributorI am glad that I could help
I wish you continued success with Excel