VBA delete value from cell

[f_b2050]

Hi,

i'm trying to make a template. One of the questions uses radio buttons. if radio button 1(yes) is selected, no further info is needed. if radio button 2(no) is selected, extra info needs to be inserted in cell F15. (the linked cell for the radio buttons is O15)

I want to delete this info if the user decides to select radio button 1 again.

Can someone provide me with the VBA code please?

THanks!

 

[Fluff]

If its an ActiveX Option button try

Private Sub OptionButton1_Click()
If OptionButton1 Then Range("F15").ClearContents
End Sub

 

[f_b2050]

Ok, is there also a code for a form control? or should i change them to an active x control?


Just for another (little) issue: i have a cell which contains a data validation (list). If one of the options is chosen, extra information is necessary cell(G30). If this info was completed and i change it to another value which doesn't require the extra info, i want the cell G30 to be empty again. For the moment I have the following code but it doesnt work:

if cells(28,"C").value<> "No" then
cells(30,"G").value=""
end if

What did i do wrong?

 

[Fluff]

For a form Control try this in a standard module

Sub Macro1()
If ActiveSheet.OptionButtons(Application.Caller) Then Range("F15").ClearContents
End Sub

For your 2nd issue, could you supply the entire code?