Adding code to a worksheet on the fly

[SeanJ]

is there a way to add code on the fly from excuting code to a worksheet without having "trusted access to the vba project object model" to be turned on?

[VBA]Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$104" Then
Call TgrphSzedown
ElseIf Target.Address = "$A$105" Then
Call TgrphSzeUp
ElseIf Target.Address = "$A$106" Then
Call reset_graph
End If
End Sub[/VBA]

[Bob Phillips]

No.

[GTO]

...answered