![\"\"](\"https:\/\/andyparkes.co.uk\/blog\/wp-content\/uploads\/2022\/02\/image.png\")
<\/figure>\n\n\n\nEach sheet had exactly the same on it. A logo in the top left corner and various fields to fill out. This was basically an information gathering form. Members of staff would open this file which is the blank template on Monday, fill it out and save it somewhere else to be used for the rest of the week. There were no formulas or anything clever at all so it was a little odd this was causing so many issues. <\/p>\n\n\n\n
Then I spotted the file size. It was 2.25MB. While that’s not a huge amount by modern standards, it’s still massive for what amounts to an almost empty file. <\/p>\n\n\n\n
So at this point I thought I’d figured it out. It must be the logo in the top corner of each page. Someone has clearly inserted a massively high res version of the logo and each page. However, while that might explain the file size, why would it be performing so badly? I could understand if they were 100MB images. But six images across 2.5mb. That’s a few hundred kilobytes tops right? <\/p>\n\n\n\n
Either way it seemed the best place to start. I planned to delete the logo and resave the file and see what happened<\/p>\n\n\n\n
So I clicked onto the logo and pressed the delete key. Nothing happened. Thinking it was just me I pressed it again. No change. I tried a couple more times and the same thing happened. Weird. I checked the sheet wasn’t locked. Nope, not that. <\/p>\n\n\n\n
So I clicked it dragged it across the page and that’s when I found the problem. (see my crude mock up!) <\/p>\n\n\n\n There were loads of copies of the logo all laid on top of each other. <\/p>\n\n\n\n <\/p>\n\n\n\n So first thing, just to satisfy my curiosity I wanted to know exactly many images there were so I threw together a bit of rough VBA code to give me the total on each sheet, and the total amount in the whole workbook. <\/p>\n\n\n\n This is what it spat out<\/p>\n\n\n\n Monday – 2549 <\/p>\n\n\n\n Yes that’s right. The workbook contained a total of 8,439<\/strong> copies of the logo! No wonder it was struggling. <\/p>\n\n\n\n So the next job was to remove them all and see if that fixed the problem. Thankfully there is a pretty easy way of doing it. I could have repurposed the code but I think it’s useful to know how to do this anyway<\/p>\n\n\n\n Frome the home tab click the Find and Select dropdown. Ignore the “Select objects” option, even though that seems the obvious one as that’s for selecting items one at a time. <\/p>\n\n\n\n Instead choose “Go To Special”<\/p>\n\n\n\n![\"\"](\"https:\/\/andyparkes.co.uk\/blog\/wp-content\/uploads\/2022\/02\/EXLPIC.gif\")
<\/figure>\n\n\n\nSub Count_The_Logos()\n\nDim LogoCount As Long\nDim TotalCount as Long\n\nDim wrk As Worksheet\n\nFor Each wrk In ActiveWorkbook.Worksheets\n\n LogoCount = wrk.Shapes.Count\n TotalCount = TotalCount + LogoCount\n\n Debug.Print wrk.Name & \" - \" & LogoCount \n\nNext\n\nDebug.Print \"Total - \" & TotalCount\n\nEnd Sub\n<\/code><\/pre>\n\n\n\n
Tuesday – 2209
Wednesday – 1862
Thursday – 1132
Friday – 686
Sat + Sun – 1
Total – 8439<\/p>\n\n\n\n
![\"\"](\"https:\/\/andyparkes.co.uk\/blog\/wp-content\/uploads\/2022\/02\/image-1.png\")
<\/figure>\n\n\n\n![\"\"](\"https:\/\/andyparkes.co.uk\/blog\/wp-content\/uploads\/2022\/02\/image-2.png\")
<\/figure>\n\n\n\n![\"\"](\"https:\/\/andyparkes.co.uk\/blog\/wp-content\/uploads\/2022\/02\/EXPLIC2.gif\")
<\/figure>\n\n\n\n