UserForm to Add Text Box on Sheet

[dannie]

Hello and thank you in advance if anyone can help me.

I am trying to create a Button Click to open up a Text Box that can be Edited. And then I would like that Text Box to be placed on the active sheet. Nothing fancy. The goal is to have a place where employees that are viewing the page can see Announcements, and the Boss click to update the announcements.

Any help would be great. Thanks!

 

[My Aswer Is This]

Try this:

1. Use the insert command on your ribbon Home menu.
2. Select insert Text Box
3. Select the textbox
4. In the little box above cell “A1” Type in the name “UpDates”
5. Click on the textbox and choose your style of text and size.
6. Positon the textbox where you like
7. Create yourself another shape to use as your button
8. Right click on the button and choose assign Macro
9. Choose New and then clear any text in the window and paste in the below script. And close the window.
10. Now when you click on the button the textbox will toggle between being visible or hidden
11. Type in whatever text you want in the textbox.

Sub Toggle_Text_Box()
ActiveSheet.Shapes("UpDates").Visible = Not ActiveSheet.Shapes("Updates").Visible
End Sub

 

[dannie]

works. thank you very much. this helped me get started with my project.

 

[My Aswer Is This]

Glad I was able to help you. If you need more assistance come back here to Mr. Excel and we will see if we can help you.

works. thank you very much. this helped me get started with my project.