Příspěvky uživatele


< návrat zpět

Strana:  1 ... « předchozí  48 49 50 51 52 53 54 55 56   další » ... 156

Zrejme to podmienené formátovanie treba prerobiť v starej verzii a uložiť.

Obrázky si môžeš nechať. Prilož súbor v exceli.

Naozaj netuším ako by som mal upraviť tvoju tabuľku. Akosi sa mi tu nezobrazuje. 6

http://www.akonasoftver.sk/index.php?sekcia=clanok&idclanku=121

Dáta treba previesť na tabuľku.

pomocou index takto

No zrejme som to pochopil trochu inak.
slabiky versus rozdeľovanie slov.
A aj pri sadzbe(DTP) sú iné pravidlá.
U nás je to asi takto.
http://www.slovencina.vselico.com/rozdelovanie.html

Kedysi som nechápal, prečo je a USA také dôležité vyhláskovať slová.
No zmysel slabikovania u nás doteraz celkom nechápem. Ešteže to nie je v maturitných otázkach. 2

slabiky s "r" alebo "l" neriešim.
napríklad "vrhl" je jedna slabika
"trhat" sa asi tiež nedá rozdeliť na tr-hat
Aj so samohláskou na začiatku je to nejednoznačné
"aspoň" sa asi dá rozdeliť as-poň
ale "auto" na au-to je dosť podivné
a "alebo" nejde na a-le-bo
Toto je skôr úloha pre jazykovedcov.

@eLCHa
No aj češi môžu pracovať s anglickými textami. Netuším na aký účel to zadávateľ chce použiť v exceli.

Ja som vymyslel niečo takéto na eliminovanie dvoch samohlások za sebou.
Function slab(tex As String) As Long
slab = 0
tex = Replace(tex, "a", "#")
tex = Replace(tex, "e", "#")
tex = Replace(tex, "i", "#")
tex = Replace(tex, "o", "#")
tex = Replace(tex, "u", "#")
tex = Replace(tex, "y", "#")
' doplniť o diakritiku
tex = Replace(tex, "##", "#")
For i = 2 To Len(tex)
If Mid(tex, i, 1) = "#" Then slab = slab + 1
Next i
End Function

No asi bolo vhodné uviesť aj o aký jazyk ide. Vo francúzštine alebo angličtine budú výsledky asi problematické.

Hex2Dec
Dec2Hex
Preveď to na dekadické vlož ako hodnotu. Predĺž to na 50 a potom to preveď zase na hexadecimálne.

@elninoslov
Veď na to stačí jednoduchý kód a bude mať výsledok ako je v zadaní.
Sub rovnica()
k = 0
ytext = ""
For i = 1 To InputBox("zadaj x=")
xtext = ""
For j = 1 To i
k = k + 1
xtext = xtext & k & " "
Next j
ytext = ytext & xtext & Chr(13)
Next i
MsgBox ytext
End Sub

Marcelus napsal/a:


pro tenhle případ by rovnice byla Xn = Xn-1 + n
Nevím jak ji zapsat ve Vb

n=1: X1=X0+1=1
n=2: X2=X1+2=1+2=3
n=3: X3=X2+3=3+3=6
No nejaká logika tu je. Ale neviem prísť na to aká. 4

To má byť vo VBA? Ako to, že na to nikto doteraz neprišiel?

Čo je podľa teba rovnica?


Strana:  1 ... « předchozí  48 49 50 51 52 53 54 55 56   další » ... 156

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Helios iNuvio

Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.

On-line nástroje