Předmět Autor Datum
Pak to ale nemůže být "číslo". Jedině "text". To má tak jen "vypadat" nebo se to má jako číslo inte…
L-Core 24.04.2019 07:40
L-Core
Tak ako píše L-Core - skonvertuj si čísla na text (nástrojom text na stĺpce) Potom pokiaľ "čísla" za… poslední
robert13 24.04.2019 10:41
robert13

Pak to ale nemůže být "číslo".
Jedině "text".

To má tak jen "vypadat" nebo se to má jako číslo interpretovat?

Pokud jde jen o "vzhled", udělal bych to takto, viz příloha.
Do sloupce B zadáváš čísla, v D+E je výsledek. Sloupec E má formát "tučně"

Pokud to chceš v jednom sloupečku, bude potřeba napsat makro (soubor musí být *xlsm), počkej si na někoho zdatnějšího :)

Tak ako píše L-Core - skonvertuj si čísla na text (nástrojom text na stĺpce)
Potom pokiaľ "čísla" začínajú na A1, aplikuj makro:

Sub HrubaCast()
    For i = 1 To Range("A1").End(xlDown).Row
        Range("A" & i).Characters(Start:=7, Length:=4).Font.FontStyle = "Bold"
    Next i
End Sub

Ak je tých cca 420 "čísel" pod sebou niekde inde, musíš upraviť index riadka i a východziu bunku Range("A" & i)
Napr ak čísla pod sebou začínajú v H8, bude kód vyzerať:

Sub HrubaCast()
    For i = 8 To Range("H8").End(xlDown).Row
        Range("H" & i).Characters(Start:=7, Length:=4).Font.FontStyle = "Bold"
    Next i
End Sub

Zpět do poradny Odpovědět na původní otázku Nahoru