De-activate a chart

D

daniel chen

My workbook contains charts.
If I had one of these charts activated, I could not execute Macros.
Please help me with a VBA code to de-activate them.
 
H

Hank Scorpio

My workbook contains charts.
If I had one of these charts activated, I could not execute Macros.
Please help me with a VBA code to de-activate them.
Click to expand...

Regardless of whether the chart is in a chartsheet or on a worksheet,
this should point you in the right direction:

Sub DeselectChart()

'Select any non-chart sheet
Sheet1.Select

'Or if the chart's on the current sheet, this'll do it.
Range("A1").Select

End Sub
 
D

daniel chen

Hi Hank,
I need to enter data in the worksheet that contains the activated chart.
 
H

Hank Scorpio

Hi Hank,
I need to enter data in the worksheet that contains the activated chart.
Click to expand...

Yesssss... and?

All you do is specify the range that you want to enter the data into,
and use the .Select method as originally illustrated.

(In fact you don't even need to specify the exact range if the macro
itself is doing the entry; all you need to do is use the .Select
method on a range... ANY range or cell... which will make the
worksheet rather than the chart active. You can then do your data
entry.)
 
D

daniel chen

Hi Hank,
You are right.
I just found out something that I didn't see the difference.
Please explain. Thanks,

Sub Macro1()
Sheets("abc").Select
Range("A1").Select ' This one works
' Cells(1, 1).Select ' This one doesn't work, if a chart is
activated.
End Sub
 
H

Hank Scorpio

Hi Hank,
You are right.
I just found out something that I didn't see the difference.
Please explain. Thanks,

Sub Macro1()
Sheets("abc").Select
Range("A1").Select ' This one works
' Cells(1, 1).Select ' This one doesn't work, if a chart is
activated.
End Sub
Click to expand...

The following is from on-line help on the Range property, and explains
why it doesn't need a qualifying object. (Typically the qualifying
object would be a reference to the worksheet that the range is on):
---------------------------
"When used without an object qualifier, this property is a shortcut
for ActiveSheet.Range (it returns a range from the active sheet; if
the active sheet isn’t a worksheet, the property fails)."
------------------------------

The Cells property is less forgiving. Thus you would need to qualify
it as (for example) :

'Only if abc is the current sheet!
'Otherwise, add the line
'Worksheets("abc").Select
'first.

Worksheets("abc").Cells(1, 1).Select
 
D

daniel chen

Hi Hank,
Thank you very much.
Nicely explained.

Hank Scorpio said:
The following is from on-line help on the Range property, and explains
why it doesn't need a qualifying object. (Typically the qualifying
object would be a reference to the worksheet that the range is on):
---------------------------
"When used without an object qualifier, this property is a shortcut
for ActiveSheet.Range (it returns a range from the active sheet; if
the active sheet isn't a worksheet, the property fails)."
------------------------------

The Cells property is less forgiving. Thus you would need to qualify
it as (for example) :

'Only if abc is the current sheet!
'Otherwise, add the line
'Worksheets("abc").Select
'first.

Worksheets("abc").Cells(1, 1).Select
Click to expand...
 
Top