Solun arvojen ...

... kiitos
;-)


Mutta kuis 2 sanaa??
1 ei ilm kuvaa poimittavien sanojen lukumäärää???
Ja tuo kaava ei ilm toimi jos vasemman vaihtaa oikeaksi, ei ota oikealta yhtä sanaa?!?!?!?

Kirjainten poimintaan löysin vanhan kaavan?
Off 2007 niin "outo" vielä mutta ... ..
;-)

Oliskos missään lie ohjeita tollaisiin kaavoihin?!?!?

nimimerkki
huono surffari

"paa-mup" kirjoitti:

... kiitos
;-)


Mutta kuis 2 sanaa??
1 ei ilm kuvaa poimittavien sanojen lukumäärää???
Ja tuo kaava ei ilm toimi jos vasemman vaihtaa oikeaksi, ei ota oikealta yhtä sanaa?!?!?!?

Kirjainten poimintaan löysin vanhan kaavan?
Off 2007 niin "outo" vielä mutta ... ..
;-)

Oliskos missään lie ohjeita tollaisiin kaavoihin?!?!?

nimimerkki
huono surffari

Lue lisää

moduuliin...
Function HaeSana(Solu As Range, Erotin As String, MontakoSanaa As Integer) As String
Dim a As Variant
Dim i As Long
On Error GoTo virhe
a = Split(Solu, Erotin)
For i = 0 To MontakoSanaa - 1
HaeSana = HaeSana & a(i) & " "
Next i
HaeSana = RTrim(HaeSana)
Exit Function
virhe:
HaeSana = "VIRHEELLINEN TIETO!"
End Function

HaeSana(Solu As Range, Erotin As String, MontakoSanaa As Integer)

käyttäjän määrittelemässä funktiossa

Solu = solu mistä tietoa haetaan
Erotin= välimerkki sanojen välillä
MontakoSanaa= montako sanaa palautetaan vasemmalta lukien
eli
soluun kaava =HaeSana(A1;" ";2)

palauttaa solusta A1 2 sanaa jotka on erotettu välilyönnillä...
virhetilaanteessa soluun teksti VIRHEELLINEN TIETO! (liian monta sanaa tai virheellinen erotin)

Keep Excelling
@Kunde

kunde kirjoitti:

moduuliin...
Function HaeSana(Solu As Range, Erotin As String, MontakoSanaa As Integer) As String
Dim a As Variant
Dim i As Long
On Error GoTo virhe
a = Split(Solu, Erotin)
For i = 0 To MontakoSanaa - 1
HaeSana = HaeSana & a(i) & " "
Next i
HaeSana = RTrim(HaeSana)
Exit Function
virhe:
HaeSana = "VIRHEELLINEN TIETO!"
End Function

HaeSana(Solu As Range, Erotin As String, MontakoSanaa As Integer)

käyttäjän määrittelemässä funktiossa

Solu = solu mistä tietoa haetaan
Erotin= välimerkki sanojen välillä
MontakoSanaa= montako sanaa palautetaan vasemmalta lukien
eli
soluun kaava =HaeSana(A1;" ";2)

palauttaa solusta A1 2 sanaa jotka on erotettu välilyönnillä...
virhetilaanteessa soluun teksti VIRHEELLINEN TIETO! (liian monta sanaa tai virheellinen erotin)

Keep Excelling
@Kunde

Lue lisää

on vaikeaa, niin tässä sinulle helppoja kaavoja hakea sanoja tekstistä.
Tapaus1: A10 sisältää tekstin, B10 annat luvun kuinka monennen sanan haluat tekstistä hakea
Kaava on matriisikaava. Solun muokkaustilassa paina Ctrl Vaihto ENTER. Kaavan ympärille tulee hakasulkeet {}. Niitä ei saa kirjoittaa käsin. Aina kun muokkaat kaavaa, muista Ctrl Vaihto ENTER.
Muuten kaava ei toimi. Huomaat sen kyllä.
C10=POIMI.TEKSTI(A10;PIENI(JOS(POIMI.TEKSTI(" "&A10;RIVI(EPÄSUORA("1:"&PITUUS(A10) 1));1)=" ";RIVI(EPÄSUORA("1:"&PITUUS(A10) 1)));B10);SUMMA(PIENI(JOS(POIMI.TEKSTI(" "&A10&" ";RIVI(EPÄSUORA("1:"&PITUUS(A10) 2));1)=" ";RIVI(EPÄSUORA("1:"&PITUUS(A10) 2)));B10 {0;1})*{-1;1})-1)

Tapaus2: A11 sisältää tekstin, B11 annat luvun kuinka monennesta sanasta aloitetaan, C11 annat luvun kuinka montaa sanaa B11:sta alkaen haetaan.
D11=POIMI.TEKSTI(A11;PIENI(JOS(POIMI.TEKSTI(" "&A11;RIVI(EPÄSUORA("1:"&PITUUS(A11) 1));1)=" ";RIVI(EPÄSUORA("1:"&PITUUS(A11) 1)));B11);SUMMA(PIENI(JOS(POIMI.TEKSTI(" "&A11&" ";RIVI(EPÄSUORA("1:"&PITUUS(A11) 2));1)=" ";RIVI(EPÄSUORA("1:"&PITUUS(A11) 2)));B11 C11*{0;1})*{-1;1})-1)
Kaava on myöskin matriisikaava. Muista Ctrl Vaihto ENTER
Helppoa eikö vain.

sanaseppä kirjoitti:

on vaikeaa, niin tässä sinulle helppoja kaavoja hakea sanoja tekstistä.
Tapaus1: A10 sisältää tekstin, B10 annat luvun kuinka monennen sanan haluat tekstistä hakea
Kaava on matriisikaava. Solun muokkaustilassa paina Ctrl Vaihto ENTER. Kaavan ympärille tulee hakasulkeet {}. Niitä ei saa kirjoittaa käsin. Aina kun muokkaat kaavaa, muista Ctrl Vaihto ENTER.
Muuten kaava ei toimi. Huomaat sen kyllä.
C10=POIMI.TEKSTI(A10;PIENI(JOS(POIMI.TEKSTI(" "&A10;RIVI(EPÄSUORA("1:"&PITUUS(A10) 1));1)=" ";RIVI(EPÄSUORA("1:"&PITUUS(A10) 1)));B10);SUMMA(PIENI(JOS(POIMI.TEKSTI(" "&A10&" ";RIVI(EPÄSUORA("1:"&PITUUS(A10) 2));1)=" ";RIVI(EPÄSUORA("1:"&PITUUS(A10) 2)));B10 {0;1})*{-1;1})-1)

Tapaus2: A11 sisältää tekstin, B11 annat luvun kuinka monennesta sanasta aloitetaan, C11 annat luvun kuinka montaa sanaa B11:sta alkaen haetaan.
D11=POIMI.TEKSTI(A11;PIENI(JOS(POIMI.TEKSTI(" "&A11;RIVI(EPÄSUORA("1:"&PITUUS(A11) 1));1)=" ";RIVI(EPÄSUORA("1:"&PITUUS(A11) 1)));B11);SUMMA(PIENI(JOS(POIMI.TEKSTI(" "&A11&" ";RIVI(EPÄSUORA("1:"&PITUUS(A11) 2));1)=" ";RIVI(EPÄSUORA("1:"&PITUUS(A11) 2)));B11 C11*{0;1})*{-1;1})-1)
Kaava on myöskin matriisikaava. Muista Ctrl Vaihto ENTER
Helppoa eikö vain.

Lue lisää

tietestin. Mun moka. {}

sanaseppä kirjoitti:

tietestin. Mun moka. {}

tosi helppoa muokata tommosia...
;-)

kunde kirjoitti:

tosi helppoa muokata tommosia...
;-)

laitoin nuo kaavat. Sattu silmään jostain ulkolaiselta sivulta. Siinä on tupakka poikineen palanut, ennenkuin nuo on saatu toimimaan.
Hirviöitä nuo on, mutta toimii kyllä.