Please Note: This article is written for users of the following Microsoft Excel versions: 2007 and 2010. If you are using an earlier version (Excel 2003 or earlier), this tip may not work for you. For a version of this tip written specifically for earlier versions of Excel, click here: Copying Pictures with a Macro.
Lowell developed a macro to copy select cells' data to a specific location on another worksheet. Some of the source cells contain pictures, and he would like those pictures copied, as well. Lowell wonders how he can get the macro to recognize if a picture is at the source cell and then copy the pictures to the new worksheet along with the data.
If you use the Copy method with the Selection object, you can copy everything—including pictures—from your source to your target. Consider the following short macro:
Sub CopyPict() Sheets("Sheet1").Select Range("B3:F7").Select Selection.Copy Sheets("Sheet3").Select Range("H8").Select ActiveSheet.Paste End Sub
Assuming that some of the cells within the source range (B3:B7 on Sheet1) contain pictures, then the Paste method will paste those into the target (cell H8 on Sheet3). This technique is, in fact, the same as using copy and paste manually with the information.
If you are identifying and moving information in a different manner (perhaps using an intermediary variable instead of copying to the Clipboard), then it is very possible that the pictures aren't copying. If you need to do some processing of the data before pasting it into the target, you could use the Paste method, as shown above, and then process the data and place it back into the target cell. That would allow the pictures to remain undisturbed at the target.
Note:
ExcelTips is your source for cost-effective Microsoft Excel training. This tip (11333) applies to Microsoft Excel 2007 and 2010. You can find a version of this tip for the older menu interface of Excel here: Copying Pictures with a Macro.
Professional Development Guidance! Four world-class developers offer start-to-finish guidance for building powerful, robust, and secure applications with Excel. The authors show how to consistently make the right design decisions and make the most of Excel's powerful features. Check out Professional Excel Development today!
Creating lot of copies of a worksheet is a snap within a macro. This tip introduces a macro that will make three copies ...
Discover MoreDoes your macro need to change the width of some columns in a worksheet? Here's how to do it.
Discover MoreGot a workbook that has lots and lots of macros associated with it? Here's a way you can get a list of all of those ...
Discover MoreFREE SERVICE: Get tips like this every week in ExcelTips, a free productivity newsletter. Enter your address and click "Subscribe."
2016-05-10 10:51:34
Gary Lundblad
Can the copy range be dynamic? That is, a cell in your worksheet can specify the range to copy. What I'm looking to do is to have one of a number of pictures copied and pasted into a certain position based on the outcome of a formula. For example, if the answer is 1, then picture number one would be copied and pasted to the spot. If the answer is 2, then picture number 2 would be copied and pasted, etc...
Thank you!
Gary
2016-04-12 22:36:51
murray
Question:
My macros create lots of charts (and picture copies) on different sheets.
Is there a way to construct a table or similar to keep track of what Excel thinks what charts are there and where they are?
2013-04-26 07:45:53
Bryan
There is no need to select!! This is VBA programming 101!
You can replace all 6 lines of your code with 1 line:
Sheets("Sheet1").Range("B3:F7").Copy Sheets("Sheet3").Range("H8")
If you want to have the destination range displayed when the code is finished then you need to add 2 more lines:
Sheets("Sheet3").Select
Range("H8").Select
2012-02-18 12:06:06
Lowell
Thanks for the tip regarding copying pictures with macros.
2012-02-18 05:32:01
kavita
I really needed this tip. Thanks.
Got a version of Excel that uses the ribbon interface (Excel 2007 or later)? This site is for you! If you use an earlier version of Excel, visit our ExcelTips site focusing on the menu interface.
FREE SERVICE: Get tips like this every week in ExcelTips, a free productivity newsletter. Enter your address and click "Subscribe."
Copyright © 2025 Sharon Parq Associates, Inc.
Comments