Textbox vraagje

[Mati6n2]

Hoi mensen,

Ik zit met een klein textbox vraagje.

Wanneer ik tekst in mijn textbox ingeef, verschijnt volgende foutmelding.
Het subscript valt buiten bereik.

Code:

  ElseIf OptionButton3 = True Then
        Sheets("Berijfsschema").Range("waardek") = TextBox1.Text

Deze is toch juist veronderstel ik?

Graag hulp

Mvg

 

[richard1970]

Hoi mensen,

  ElseIf OptionButton3 = True Then
        Sheets("Berijfsschema").Range("waardek") = TextBox1.Text

Berijfsschema? Mis je de D niet?

Richard

 

[Mati6n2]

Klopt, het zit soms in een klein hoekje he richard :thumb: Het zal van al de cijfers en formules zijn die ik zie ...

 

[Wigi]

ElseIf maat04 Then
         Dim d As Range
            For Each d In Selection
                d.Formula = d.Formula & TextBox1.Text

 

[Mati6n2]

Bedankt Wigi & Richard !

Vraag opgelost

Prettige dag verder