Editable Text Based on Drop Down List

[rxharp419]

Hello,

I would like to have a drop-down list in A1.

Based on the value selected in the drop-down list in A1, I would like a specific parage of text to pop up in A2. I would like for this text in A2 to be editable so minor things can be changed as needed.

Is this possible?

 

[rxharp419]

You need to put the script in a sheet by itself and see if it works. Do not have your other script in the sheet.
Do you have a TextBox named "TextBox6" in a sheet named "Quote" ??
And in your other script it talks about protecting and unprotecting the sheet. If the sheet is protected this script will maybe create a error.

I have tried both of those things you mentioned and FOR SURE have a box in the "Quote" sheet named "TextBox6'.

I know it is doing something because every time I try to run it by changing the value in "C2", that error message happens, and if I click the debug and than try to go to the "TextBox6" on the "Quote" sheet, it is locked and I cant edit it until i stop the design mode or break mode what ever it is called.

 

[My Aswer Is This]

You cannot run the script if your still in Developer Mode.

 

[rxharp419]

You cannot run the script if your still in Developer Mode.

I understand. It still will not work. Same error code every time. It works for you with your text box your testing on?

 

[My Aswer Is This]

Here is what I'm going to do.
I'm going to let someone else here on Mr. Excel help you.
We are now up to post #45 and I'm not getting you what you want.
So you take care and lets see if someone else can help you.

 

[rxharp419]

Here is what I'm going to do.
I'm going to let someone else here on Mr. Excel help you.
We are now up to post #45 and I'm not getting you what you want.
So you take care and lets see if someone else can help you.

I appreciate all of your help.

 

[rxharp419]

Here is what I'm going to do.
I'm going to let someone else here on Mr. Excel help you.
We are now up to post #45 and I'm not getting you what you want.
So you take care and lets see if someone else can help you.

Hi, I just wanted to let you know that this ended up solving the problem:

If Target.Value = "Estimate" Then Sheets("Quote").TextBoxes("TextBox6").Text = Sheets("Wages & Rates").Range("J16").Value
If Target.Value = "Lump Sum" Then Sheets("Quote").TextBoxes("TextBox6").Text = Sheets("Wages & Rates").Range("J18").Value

 

[My Aswer Is This]

Glad you have it working. Not sure why you needed it this way. My way worked fine for me using Excel 2013

Hi, I just wanted to let you know that this ended up solving the problem:

If Target.Value = "Estimate" Then Sheets("Quote").TextBoxes("TextBox6").Text = Sheets("Wages & Rates").Range("J16").Value
If Target.Value = "Lump Sum" Then Sheets("Quote").TextBoxes("TextBox6").Text = Sheets("Wages & Rates").Range("J18").Value

 

[rxharp419]

This is what the other fella told me.

Thanks again for all the help!

My guess is that you don't have an ActiveX-type textbox named Textbox6 on the Quote sheet.
- Double-check the exact name of the textbox.
- There are two types of textboxes; an ActiveX-type and a Forms-type. If you used a Form-type control, try this syntax.

If Target.Value = "Estimate" Then Sheets("Quote").TextBoxes("TextBox6").Text = Sheets("Wages & Rates").Range("J16").Value
If Target.Value = "Lump Sum" Then Sheets("Quote").TextBoxes("TextBox6").Text = Sheets("Wages & Rates").Range("J18").Value

 

[My Aswer Is This]

I was wondering later what type TextBox you were using. But the thread was getting very long and I was getting tired of asking questions.

Best thing is when wanting help on the forumn is to always be very specific like putting sheet names in quotes like Sheet named "Me" or Sheet named "Her"

And try and not change what you want. But I do know sometimes that can happen.

And like in your other post you had already come to a conclusion that you needed all those 300 lines of code when I was sure if we knew the relationship between the number 1 and 2 or all the way up to 60
we could write a shorter code. Another poster after seeing more details you provided about number of rows per quote noticed the link between numbers and rows and wrote a nice simple code.

But that's all OK we all learn as we go.

Glad it all worked out for you.
And if you were to ever ask a question and your using a "Apple" computer always point that out at the beginning.

Take care:

Glad I was able to help you. Come back here to Mr. Excel next time you need additional assistance.

This is what the other fella told me.

Thanks again for all the help!



If Target.Value = "Estimate" Then Sheets("Quote").TextBoxes("TextBox6").Text = Sheets("Wages & Rates").Range("J16").Value
If Target.Value = "Lump Sum" Then Sheets("Quote").TextBoxes("TextBox6").Text = Sheets("Wages & Rates").Range("J18").Value

 

[rxharp419]

Thank you for the words of wisdom and all noted!