Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
shape remains selected
Based upon user selections, I delete and copy in flags and logo's in a chart.
Somehow, in some charts, the shape I copied in remains selected. This is really no problem in Excel 2003 running under Vista, neither in Excel 2007 running under Vista, but it is in Excel 2007 running under XP. Charts become totaly corrupted and unpresentable. Code used : ActiveSheet.ChartObjects("Graph02Base").Activate ActiveChart.ChartArea.Select ActiveChart.Shapes(LogoOld).Select Selection.Delete Sheets("Data availability").Shapes(LogoNew).Copy ActiveSheet.ChartObjects("Graph02Base").Select ActiveChart.Paste ActiveChart.ChartArea.Select ActiveWindow.Visible = False Windows("FileName.xls").Activate Range("A1").Select When I select the ChartArea after running the code, I see that the LogoNew is selected. When I select a title in the graph, the LogoNew becomes unselected, but then the title remains selected. The only way to get rid of it is delete the LogoNew and Undo afterwards (but I can not find VB code to reproduce this). Question is : How do I Unselect a shape on a Chart? |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
shape remains selected
Does this work for you? VBA Code: -------------------- ActiveSheet.ChartObjects("Graph02Base").Activate ActiveChart.ChartArea.Select ActiveChart.Shapes(LogoOld).Select Selection.Delete Sheets("Data availability").Shapes(LogoNew).Copy ActiveSheet.ChartObjects("Graph02Base").Select ActiveChart.Paste Application.CutCopyMode=False ActiveChart.ChartArea.Select ActiveWindow.Visible = False Windows("FileName.xls").Activate Range("A1").Select -------------------- Henk;645900 Wrote: Based upon user selections, I delete and copy in flags and logo's in a chart. Somehow, in some charts, the shape I copied in remains selected. This is really no problem in Excel 2003 running under Vista, neither in Excel 2007 running under Vista, but it is in Excel 2007 running under XP. Charts become totaly corrupted and unpresentable. Code used : ActiveSheet.ChartObjects("Graph02Base").Activate ActiveChart.ChartArea.Select ActiveChart.Shapes(LogoOld).Select Selection.Delete Sheets("Data availability").Shapes(LogoNew).Copy ActiveSheet.ChartObjects("Graph02Base").Select ActiveChart.Paste ActiveChart.ChartArea.Select ActiveWindow.Visible = False Windows("FileName.xls").Activate Range("A1").Select When I select the ChartArea after running the code, I see that the LogoNew is selected. When I select a title in the graph, the LogoNew becomes unselected, but then the title remains selected. The only way to get rid of it is delete the LogoNew and Undo afterwards (but I can not find VB code to reproduce this). Question is : How do I Unselect a shape on a Chart?r -- Simon Lloyd Regards, Simon Lloyd 'Microsoft Office Help' (http://www.thecodecage.com) ------------------------------------------------------------------------ Simon Lloyd's Profile: 1 View this thread: http://www.thecodecage.com/forumz/sh...d.php?t=180020 Microsoft Office Help |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
shape remains selected
Simon,
No, it does not. tHenks "Simon Lloyd" wrote: Does this work for you? VBA Code: -------------------- ActiveSheet.ChartObjects("Graph02Base").Activate ActiveChart.ChartArea.Select ActiveChart.Shapes(LogoOld).Select Selection.Delete Sheets("Data availability").Shapes(LogoNew).Copy ActiveSheet.ChartObjects("Graph02Base").Select ActiveChart.Paste Application.CutCopyMode=False ActiveChart.ChartArea.Select ActiveWindow.Visible = False Windows("FileName.xls").Activate Range("A1").Select -------------------- Henk;645900 Wrote: Based upon user selections, I delete and copy in flags and logo's in a chart. Somehow, in some charts, the shape I copied in remains selected. This is really no problem in Excel 2003 running under Vista, neither in Excel 2007 running under Vista, but it is in Excel 2007 running under XP. Charts become totaly corrupted and unpresentable. Code used : ActiveSheet.ChartObjects("Graph02Base").Activate ActiveChart.ChartArea.Select ActiveChart.Shapes(LogoOld).Select Selection.Delete Sheets("Data availability").Shapes(LogoNew).Copy ActiveSheet.ChartObjects("Graph02Base").Select ActiveChart.Paste ActiveChart.ChartArea.Select ActiveWindow.Visible = False Windows("FileName.xls").Activate Range("A1").Select When I select the ChartArea after running the code, I see that the LogoNew is selected. When I select a title in the graph, the LogoNew becomes unselected, but then the title remains selected. The only way to get rid of it is delete the LogoNew and Undo afterwards (but I can not find VB code to reproduce this). Question is : How do I Unselect a shape on a Chart?r -- Simon Lloyd Regards, Simon Lloyd 'Microsoft Office Help' (http://www.thecodecage.com) ------------------------------------------------------------------------ Simon Lloyd's Profile: 1 View this thread: http://www.thecodecage.com/forumz/sh...d.php?t=180020 Microsoft Office Help . |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
shape remains selected
Maybe then you could use: VBA Code: -------------------- ActiveChart.Deselect -------------------- Instead of (or aswell as): VBA Code: -------------------- Application.CutCopyMode=False -------------------- Henk;647035 Wrote: Simon, No, it does not. tHenks "Simon Lloyd" wrote: Does this work for you? VBA Code: -------------------- ActiveSheet.ChartObjects("Graph02Base").Activate ActiveChart.ChartArea.Select ActiveChart.Shapes(LogoOld).Select Selection.Delete Sheets("Data availability").Shapes(LogoNew).Copy ActiveSheet.ChartObjects("Graph02Base").Select ActiveChart.Paste Application.CutCopyMode=False ActiveChart.ChartArea.Select ActiveWindow.Visible = False Windows("FileName.xls").Activate Range("A1").Select -------------------- Henk;645900 Wrote: Based upon user selections, I delete and copy in flags and logo's in a chart. Somehow, in some charts, the shape I copied in remains selected. This is really no problem in Excel 2003 running under Vista, neither in Excel 2007 running under Vista, but it is in Excel 2007 running under XP. Charts become totaly corrupted and unpresentable. Code used : ActiveSheet.ChartObjects("Graph02Base").Activate ActiveChart.ChartArea.Select ActiveChart.Shapes(LogoOld).Select Selection.Delete Sheets("Data availability").Shapes(LogoNew).Copy ActiveSheet.ChartObjects("Graph02Base").Select ActiveChart.Paste ActiveChart.ChartArea.Select ActiveWindow.Visible = False Windows("FileName.xls").Activate Range("A1").Select When I select the ChartArea after running the code, I see that the LogoNew is selected. When I select a title in the graph, the LogoNew becomes unselected, but then the title remains selected. The only way to get rid of it is delete the LogoNew and Undo afterwards (but I can not find VB code to reproduce this). Question is : How do I Unselect a shape on a Chart?r -- Simon Lloyd Regards, Simon Lloyd 'Microsoft Office Help' ('The Code Cage - Microsoft Office Help - Microsoft Office Discussion' (http://www.thecodecage.com)) ------------------------------------------------------------------------ Simon Lloyd's Profile: 1 View this thread: 'shape remains selected - The Code Cage Forums' (http://www.thecodecage.com/forumz/sh...d.php?t=180020) 'Microsoft Office Help' (http://www.thecodecage.com) . -- Simon Lloyd Regards, Simon Lloyd 'Microsoft Office Help' (http://www.thecodecage.com) ------------------------------------------------------------------------ Simon Lloyd's Profile: 1 View this thread: http://www.thecodecage.com/forumz/sh...d.php?t=180020 Microsoft Office Help |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Which shape is selected | Excel Programming | |||
I have a problem with determining if a shape is selected. | Excel Programming | |||
Identifying the selected Shape | Excel Programming | |||
VBA Help with changing shape color for selected shapes only | Excel Programming | |||
Toolbar's shape remains on the screen | Excel Programming |