try this code it may help you. Sub removeshadow()
Dim i As Integer Dim sh As Shape For i = 1 To Worksheets.Count Sheets(i).Activate For Each sh In ActiveSheet.Shapes sh.Shadow.Visible = msoFalse Next sh Next i End Sub On Fri, Oct 8, 2010 at 4:54 AM, Jude Barnes <barnes_j...@yahoo.com> wrote: > Our company is new to Excel 2007. I have moderate experience in VBA. > When we converted to Excel 2007 from Excel 2000 we have a staff member > who suddenly found that 1000+ of her excel files for whatever reason > has a shadow effect on misc shapes in the excel files. Each of the > files has between 1 and 30 worksheets, each with the problem. > > I was going to create a macro which removed this effect, but I noticed > that the vba capture (record macro) does not seem to record anything I > do with shapes. As I am not a VBA proggrammer by nature I usually > start by recording and then hacking my way through. > > Here is the manual procedure that works in excel: > 1. highlight the shape(s) > 2. right click and choose "format shape" > 3. choose shadow, and change color from black to white > (although they are not sure why it's set ON and black in the first > place) > > I cannot figure out yet how to get this into vba to try to automate > this. > Can someone send me the code to do this? Our office online help > doesn't seem to have much in it.. not sure if we did not configure it > correctly on our end when we installed office in our shared network > environment. I also tried a handful of google searches but never have > found the exact match of what I'm trying to do in the simple 3 step > proccess above. > > -- > > ---------------------------------------------------------------------------------- > Some important links for excel users: > 1. Follow us on TWITTER for tips tricks and links : > http://twitter.com/exceldailytip > 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 > 3. Excel tutorials at http://www.excel-macros.blogspot.com > 4. Learn VBA Macros at http://www.quickvba.blogspot.com > 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com > > To post to this group, send email to excel-macros@googlegroups.com > > <><><><><><><><><><><><><><><><><><><><><><> > Like our page on facebook , Just follow below link > http://www.facebook.com/pages/discussexcelcom/160307843985936?v=wall&ref=ts > -- *Regards* * * *Ashish Koul* *akoul*.*blogspot*.com <http://akoul.blogspot.com/> *akoul*.wordpress.com <http://akoul.wordpress.com/> My Linkedin Profile <http://in.linkedin.com/pub/ashish-koul/10/400/830> P Before printing, think about the environment. -- ---------------------------------------------------------------------------------- Some important links for excel users: 1. Follow us on TWITTER for tips tricks and links : http://twitter.com/exceldailytip 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 3. Excel tutorials at http://www.excel-macros.blogspot.com 4. Learn VBA Macros at http://www.quickvba.blogspot.com 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com To post to this group, send email to excel-macros@googlegroups.com <><><><><><><><><><><><><><><><><><><><><><> Like our page on facebook , Just follow below link http://www.facebook.com/pages/discussexcelcom/160307843985936?v=wall&ref=ts