tekst bewerken in een tekstveld op een VBA userform

[novec]

Hallo

Wie wil me helpen.
Ik werk samen met collega's in een grote sheet waar we veel tekst verwerken.
Het werken in een tekstveld op een userform wordt prettiger ervaren dan tekstverwerken in een cel.

Als ik op de knop klikt opent zich een formulier.
Met dat formulier zou ik het volgende willen

Ik moet verplicht worden om het tekstvak te vullen "om welke cel gaat het" (dat hoeft niet als ik het formulier sluit zonder dat er ook maar iets is ingevuld)

Bij opslaan moet tekst die in het grote tekstvlak is getypt naar die cel. Ik zorg zelf wel voor tekstterugloop in de cel etc. etc.
Bij knop 'haal tekst op' moet de tekst uit de genoemde cel in het formulier komen zodat we het kunnen bewerken.

Ik heb even een sample bijgevoegd.


Dank je wel alvast

Steven

 

[edmoor]

Opslaan:

If TextBox2.Text = "" Then Exit Sub
Range(Tekstbox2.text) = TextBox1.Text

Haal tekst op:

If TextBox2.Text = "" Then Exit Sub
TextBox1.Text = Range(Tekstbox2.text)

Eventueel in de Userform_Activate():

Textbox2.Text = Activecell.Address
TextBox1.Text = Range(Tekstbox2.text)

 

[novec]

Helemaal geweldig.
Ook de derde optie is zee nuttig

TNX

Steven