aanpassen textboxen in geopende userform

[AD1957]

Is het mogelijk om bij geopende userform de waardes van de textboxen
meteen aan te passen. Dit als de waardes in de range("B3:G15'") wijzigen.

Bekijk bijlage totalen inkoopboek nsb.xlsb

Groet,
Albert

 

[E v R]

Ja dat is mogelijk, of je het moet willen is een tweede
Haal het woordje Private weg van Private Sub TabStrip1_Change()

Private Sub Worksheet_Change(ByVal Target As Range)
UserForm_totaleninkoopboek.ListBox1.List = Range("A3:G15").Value
UserForm_totaleninkoopboek.TabStrip1_Change
End Sub

 

[AD1957]

bedankt voor je reactie,
kan het problemen opleveren als ik jouw code uitvoer ?

 

[E v R]

Nee, maar normailter gebruik je een userform om data in te voeren/wijzigen en niet andersom

 

[AD1957]

ik heb de code gewoon eens geprobeerd, hij werkt in ieder geval perfect.
mijn dank,
Gr. Albert