Re Excel 97 --

Is there a way to draw a circle (I know how to do that) over a cell and get
the cell's contents to appear on top?

Jack

You can set the fill color to none and see the cells behind.

Jack

Set the circle's Color Property to 100% Transparent.

Right-click on circle and FormatColors and Lines.

Contents will show through but not be "on top".

If you want to draw circles around selected cells here's a macro from Bob
Flanagan.

'Draw a Circle Around Highlighted Cells
'This command draws circles. And, it does it around each area that is
'selected, so that you can insert many circles at one time!


Sub My_Circle()
Dim x, y As Single, area As Range

'rotate through areas - this allows multiple circles to be drawn
For Each area In Selection.Areas
With area
' x and y are numbers that are a function of the
' area's height and width
x = .Height * 0.2
y = .Width * 0.2

ActiveSheet.Ovals.Add Top:=.Top - x, Left:=.Left - y, _
Height:=.Height + 2 * x, Width:=.Width + 2 * y

ActiveSheet.Ovals(ActiveSheet.Ovals.Count) _
.Interior.ColorIndex = xlNone
End With
Next area
End Sub


Gord Dibben Excel MVP

On Mon, 12 Dec 2005 17:09:08 -0500, "Jack"
wrote:

Re Excel 97 --

Is there a way to draw a circle (I know how to do that) over a cell and get
the cell's contents to appear on top?

Jack

Select the circle, and in the Formula Bar type "=A1" without quotes.....the
value in cell A1 will appear as tho it be text in the circle...

Vaya con Dios,
Chuck, CABGx3


"Gord Dibben" <gorddibbATshawDOTca@ wrote in message
...
Jack

Set the circle's Color Property to 100% Transparent.

Right-click on circle and FormatColors and Lines.

Contents will show through but not be "on top".

If you want to draw circles around selected cells here's a macro from Bob
Flanagan.

'Draw a Circle Around Highlighted Cells
'This command draws circles. And, it does it around each area that is
'selected, so that you can insert many circles at one time!


Sub My_Circle()
Dim x, y As Single, area As Range

'rotate through areas - this allows multiple circles to be drawn
For Each area In Selection.Areas
With area
' x and y are numbers that are a function of the
' area's height and width
x = .Height * 0.2
y = .Width * 0.2

ActiveSheet.Ovals.Add Top:=.Top - x, Left:=.Left - y, _
Height:=.Height + 2 * x, Width:=.Width + 2 * y

ActiveSheet.Ovals(ActiveSheet.Ovals.Count) _
.Interior.ColorIndex = xlNone
End With
Next area
End Sub


Gord Dibben Excel MVP

On Mon, 12 Dec 2005 17:09:08 -0500, "Jack"
wrote:

Re Excel 97 --

Is there a way to draw a circle (I know how to do that) over a cell and
get
the cell's contents to appear on top?

Jack

Dynamic text in a circle<g

Can't remember if I ever knew about that trick, Chuck


Gord

On Mon, 12 Dec 2005 19:15:17 -0500, "CLR" wrote:

Select the circle, and in the Formula Bar type "=A1" without quotes.....the
value in cell A1 will appear as tho it be text in the circle...

Vaya con Dios,
Chuck, CABGx3


"Gord Dibben" <gorddibbATshawDOTca@ wrote in message
.. .
Jack

Set the circle's Color Property to 100% Transparent.

Right-click on circle and FormatColors and Lines.

Contents will show through but not be "on top".

If you want to draw circles around selected cells here's a macro from Bob
Flanagan.

'Draw a Circle Around Highlighted Cells
'This command draws circles. And, it does it around each area that is
'selected, so that you can insert many circles at one time!


Sub My_Circle()
Dim x, y As Single, area As Range

'rotate through areas - this allows multiple circles to be drawn
For Each area In Selection.Areas
With area
' x and y are numbers that are a function of the
' area's height and width
x = .Height * 0.2
y = .Width * 0.2

ActiveSheet.Ovals.Add Top:=.Top - x, Left:=.Left - y, _
Height:=.Height + 2 * x, Width:=.Width + 2 * y

ActiveSheet.Ovals(ActiveSheet.Ovals.Count) _
.Interior.ColorIndex = xlNone
End With
Next area
End Sub


Gord Dibben Excel MVP

On Mon, 12 Dec 2005 17:09:08 -0500, "Jack"
wrote:

Re Excel 97 --

Is there a way to draw a circle (I know how to do that) over a cell and
get
the cell's contents to appear on top?

Jack

Yeah, it's neat, and works good too if you want the result of a formula
inside a drawing object....just put the formula in a helper cell somewhere
and do this trick.....


Vaya con Dios,
Chuck, CABGx3



"Gord Dibben" <gorddibbATshawDOTca@ wrote in message
...
Dynamic text in a circle<g

Can't remember if I ever knew about that trick, Chuck


Gord

On Mon, 12 Dec 2005 19:15:17 -0500, "CLR"
wrote:

Select the circle, and in the Formula Bar type "=A1" without
quotes.....the
value in cell A1 will appear as tho it be text in the circle...

Vaya con Dios,
Chuck, CABGx3


"Gord Dibben" <gorddibbATshawDOTca@ wrote in message
.. .
Jack

Set the circle's Color Property to 100% Transparent.

Right-click on circle and FormatColors and Lines.

Contents will show through but not be "on top".

If you want to draw circles around selected cells here's a macro from
Bob
Flanagan.

'Draw a Circle Around Highlighted Cells
'This command draws circles. And, it does it around each area that is
'selected, so that you can insert many circles at one time!


Sub My_Circle()
Dim x, y As Single, area As Range

'rotate through areas - this allows multiple circles to be drawn
For Each area In Selection.Areas
With area
' x and y are numbers that are a function of the
' area's height and width
x = .Height * 0.2
y = .Width * 0.2

ActiveSheet.Ovals.Add Top:=.Top - x, Left:=.Left - y, _
Height:=.Height + 2 * x, Width:=.Width + 2 * y

ActiveSheet.Ovals(ActiveSheet.Ovals.Count) _
.Interior.ColorIndex = xlNone
End With
Next area
End Sub


Gord Dibben Excel MVP

On Mon, 12 Dec 2005 17:09:08 -0500, "Jack"

wrote:

Re Excel 97 --

Is there a way to draw a circle (I know how to do that) over a cell
and
get
the cell's contents to appear on top?

Jack

Thanks everybody -- good stuff!


Jack

CLR,
Yeah, i use this on text boxes and whatnot,
and you can have your "Source Cell" on another sheet IE:
"=Sheet2!A1"
Dave
CLR Wrote:
Select the circle, and in the Formula Bar type "=A1" without
quotes.....the
value in cell A1 will appear as tho it be text in the circle...

Vaya con Dios,
Chuck, CABGx3


"Gord Dibben" <gorddibbATshawDOTca@ wrote in message
...
Jack

Set the circle's Color Property to 100% Transparent.

Right-click on circle and FormatColors and Lines.

Contents will show through but not be "on top".

If you want to draw circles around selected cells here's a macro from
Bob
Flanagan.

'Draw a Circle Around Highlighted Cells
'This command draws circles. And, it does it around each area that
is
'selected, so that you can insert many circles at one time!


Sub My_Circle()
Dim x, y As Single, area As Range

'rotate through areas - this allows multiple circles to be drawn
For Each area In Selection.Areas
With area
' x and y are numbers that are a function of the
' area's height and width
x = .Height * 0.2
y = .Width * 0.2

ActiveSheet.Ovals.Add Top:=.Top - x, Left:=.Left - y, _
Height:=.Height + 2 * x, Width:=.Width + 2 * y

ActiveSheet.Ovals(ActiveSheet.Ovals.Count) _
.Interior.ColorIndex = xlNone
End With
Next area
End Sub


Gord Dibben Excel MVP

On Mon, 12 Dec 2005 17:09:08 -0500, "Jack"

wrote:

Re Excel 97 --

Is there a way to draw a circle (I know how to do that) over a cell
and
get
the cell's contents to appear on top?

Jack



--
Desert Piranha


------------------------------------------------------------------------
Desert Piranha's Profile: http://www.excelforum.com/member.php...o&userid=28934
View this thread: http://www.excelforum.com/showthread...hreadid=492895

Right-on!........good point to remember, thanks for sharing that.....

Vaya con Dios,
Chuck, CABGx3


"Desert Piranha"
<Desert.Piranha.1zyloa_1134444900.5085@excelforu m-nospam.com wrote in
message news:Desert.Piranha.1zyloa_1134444900.5085@excelfo rum-nospam.com...

CLR,
Yeah, i use this on text boxes and whatnot,
and you can have your "Source Cell" on another sheet IE:
"=Sheet2!A1"
Dave
CLR Wrote:
Select the circle, and in the Formula Bar type "=A1" without
quotes.....the
value in cell A1 will appear as tho it be text in the circle...

Vaya con Dios,
Chuck, CABGx3


"Gord Dibben" <gorddibbATshawDOTca@ wrote in message
...
Jack

Set the circle's Color Property to 100% Transparent.

Right-click on circle and FormatColors and Lines.

Contents will show through but not be "on top".

If you want to draw circles around selected cells here's a macro from
Bob
Flanagan.

'Draw a Circle Around Highlighted Cells
'This command draws circles. And, it does it around each area that
is
'selected, so that you can insert many circles at one time!


Sub My_Circle()
Dim x, y As Single, area As Range

'rotate through areas - this allows multiple circles to be drawn
For Each area In Selection.Areas
With area
' x and y are numbers that are a function of the
' area's height and width
x = .Height * 0.2
y = .Width * 0.2

ActiveSheet.Ovals.Add Top:=.Top - x, Left:=.Left - y, _
Height:=.Height + 2 * x, Width:=.Width + 2 * y

ActiveSheet.Ovals(ActiveSheet.Ovals.Count) _
.Interior.ColorIndex = xlNone
End With
Next area
End Sub


Gord Dibben Excel MVP

On Mon, 12 Dec 2005 17:09:08 -0500, "Jack"

wrote:

Re Excel 97 --

Is there a way to draw a circle (I know how to do that) over a cell
and
get
the cell's contents to appear on top?

Jack



--
Desert Piranha


------------------------------------------------------------------------
Desert Piranha's Profile:
http://www.excelforum.com/member.php...o&userid=28934
View this thread: http://www.excelforum.com/showthread...hreadid=492895