superscript in TEKST.SAMENVOEGEN

[HenkBakker]

Met behulp van TEKST.SAMENVOEGEN (of &) kun je gedeeltes van teksten samenvoegen (bv uit andere cellen).
De opmaak van verschillende tekstgedeeltes kun je opmaken met de functie TEKST.

Nu wil ik graag de waarde uit een cel, in een samengestelde tekst, opmaken als superscript.

in cel A1 staat een getal, dat het aantal kuubs weergeeft. dit getal wil ik in een samgestelde tekst weergeven als (even aangenomen dat de waarde van A1 "2,8" is):
"2,8 m3". De 3 moet dan dus superscript zijn.
Hoe doe je dat met de TEKST-functie?

 

[edmoor]

Probeer het eens zo:

=A1&" m"&TEKEN(179)

 

[HenkBakker]

@ edmoor

Bedankt voor je oplossing!
Dit gaat zeker werken.

Soms wil ik (deel)volumes uitdrukken in V1, V2, V3 enz. Met de cijfers als subscript.
Zodat ik uiteindelijk de volumes kan optellen: V1 + V2 + V3 + ... = Vtotaal (en dan 'totaal' ook subscript).
Hoe doe je dat?

 

[emields]

met een voorbeeldbestand te plaatsen.

 

[OctaFish]

Als je in A1 deze formule zet: =TEKEN(RIJ()) en doortrekt naar rij 255, dan zie je alle mogelijke tekens die je op deze manier kan maken. Daar zit dus geen subscript of superscript bij, maar wel tekens die in super/subscript gemaakt zijn, zoals 178 (2) en 179 (3). Veel meer zijn er niet. V² kan dus wel, V¹ ook en V³ heb je al

 

[OctaFish]

Wil je meer, zoals het woord 'Totaal', dan kan dat dus niet met tekens, en zul je moeten gaan programmeren. Bijvoorbeeld met dit testje:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim i As Integer, j As Integer
    
    If InStr(1, Target.Text, "superscript") > 0 Then
        i = InStr(1, Target.Text, "superscript")
        Target.Characters(Start:=i, Length:=11).Font.Superscript = True
    End If

End Sub

Uiteraard kun je op deze manier meer steekwoorden omzetten.