met onderstaande code wil ik bereiken dat, als checkbox1=true hij op de sheet berekeningen een bepaalde tekst in een cel zet. Dit werkt allemaal naar behoren maar nu heb ik het volgende probleem:
in de te plaatsen tekst moet een waarde komen uit een andere cel. Deze waarde staat op sheet berekeningen in cel D11. Deze waarde is het resultaat van een formule en is opgeslagen als een getal met 1 decimaal. Zodra deze samen met de tekst op de andere sheet wordt geplaats verdwijnt de instelling en staat het getal dus met tig decimalen tussen de tekst. dus bijvoorbeeld "tekst 9.1564654564 testing"
hoe kan ik dit aanpassen dat hij de zichtbare en niet de werkelijke waarde neemt van cel D11???
in de te plaatsen tekst moet een waarde komen uit een andere cel. Deze waarde staat op sheet berekeningen in cel D11. Deze waarde is het resultaat van een formule en is opgeslagen als een getal met 1 decimaal. Zodra deze samen met de tekst op de andere sheet wordt geplaats verdwijnt de instelling en staat het getal dus met tig decimalen tussen de tekst. dus bijvoorbeeld "tekst 9.1564654564 testing"
hoe kan ik dit aanpassen dat hij de zichtbare en niet de werkelijke waarde neemt van cel D11???
Code:
Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then
Sheets("voorbeeld").Range("A" & Rows.Count).End(xlUp).Offset(2, 0) = ("tekst " & Sheets("Berekeningen").Range("D11") & " testing")
End If