View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
patrick molloy patrick molloy is offline
external usenet poster
 
Posts: 391
Default Automating the "Oval" Object

This can be done using the sheet's Change event. This is
fired when a new value is entered into a cell.

The example places the text from cell C3 into the oval.
I've drawn an oval and left the default name 'Oval 1' in
the code.

Paste the following code into your worksheet's code page.
To open the code page, right click on the sheet's tab and
select the last menu item: 'View Code'


Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Address = "$C$3" Then

ActiveSheet.Shapes("Oval 1").Select
Selection.Characters.Text = Target.Text


Target.Select
End If

End Sub


First the code check's that the changed cell is C3. If it
is the oval is selected, the text is changed and then the
cell is re-selected.

It's a pity, but this is one object that you have to
select for this.

Patrck Molloy
Microsoft Excel MVP


-----Original Message-----
Is it possible to link text in the Oval object (from the

Drawing toolbar) with text in a merged cell range - the
object being when a user types text in one, it appears in
the other? If so how would this be done?
.