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:
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: 
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.
Program Successfully in Excel! This guide will provide you with all the information you need to automate any task in Excel and save time and effort. Learn how to extend Excel's functionality with VBA to create solutions not possible with the standard features. Includes latest information for Excel 2024 and Microsoft 365. Check out Mastering Excel VBA Programming today!
If you are getting an error when you try to create an event handler, it could be related to a long-known bug in Excel. ...
Discover MoreVBA provides a few different ways you can search for information within strings. This tip looks at the most efficient ...
Discover MoreNeed to rename a file in a macro? It's easy to do using the Name command, as discussed in this tip.
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