[utenti] R: Re: [utenti] separare il numero romano in una cella

["ndlsas1@inwind.it" <nd...@inwind.it>]

>----Messaggio originale----
>Da: f.demarchi@cislveneto.it
>Data: 02/08/2012 15.51
>A: <oo...@incubator.apache.org>
>Ogg: Re: [utenti] separare il numero romano in una cella
>
>Il 02/08/2012 13:51, ndlsas1@inwind.it ha scritto:
>> Salve a tutti
>>
>> Quesito:
>> Ho un ods diviso così: il primo foglio è un form da compilare, i dati 
inseriti
---CUT---
>Per richimarla su una cella digita =Romano(A1) dove A1 è il riferimento 
>della cella con la stringa da riconoscere e buon divertimento.
>
>Ciao
>
>-- 
>Francesco De Marchi aka Cix

Ho risolto con 10 caselle e le due dritte che mi avete dato.
Riassumo:
A1 > casella immissione indirizzo
B1 > =MAIUSC(STRINGA.ESTRAI(A1;RICERCA(" ";A1;8);6)) [ estrae il numero romano 
dalla cella e lo maiuscolizza]
C1> =RICERCA(" ";A1;8) [ identifica quanti caratteri ci sono prima del numero 
romano]
D1> =SINISTRA(A1;C1) [ estrae la parte testuale dell'indirizzo]
E1> =ANNULLA.SPAZI(B1) [ per eliminare lo spazio iniziale davanti al romano se 
no è impossibile trasformarlo in arabo]
F1> =CODICE(E1) [ per trasformare testo in numero e far lavorare i "se"]
G1> =SE(F1=73;ARABO(E1);SE(F1=86;ARABO(E1);SE(F1=88;ARABO(E1);SE(F1=76;ARABO
(E1);SE(F1=67;ARABO(E1);0))))) [ i "se" che identificano i caratteri dei numeri 
romani " I V X L C"; la controparte "arabo" serve a far lavorare poi i "se 
successivi" dato che lavorano con numeri e non con testo]
H1> =MAIUSC.INIZ(D1) & MAIUSC(B1) [ riunisce l'indirizzo con il numero romano 
in maiuscolo]
I1> =SE(G1;1;0) [discrimina se indirizzo standard o con numeri romani]
J1> =SE(I1=1;H1;MAIUSC.INIZ(A1)) [ cella finale di cui fare copia negli altri 
fogli]
L'8 presente in B1 e in C1 serve per dare modo di funzionare anche con via - 
viale - piazza - largo eccetera.
Funziona splendidamente con un limite, non c'è possibilità di mettere doppi 
nomi tipo Vittorio Emanuele II e fargli riconoscere il numero romano.
Se vi viene in mente qualcosa di più efficace sono a disposizione. Intanto 
Grazie
Angelo



---------------------------------------------------------------------
Per cancellarsi: ooo-utenti-it-unsubscribe@incubator.apache.org
Per informazioni: http://www.openoffice.org/it/
Per avviare una nuova discussione: ooo-utenti-it@incubator.apache.org
Archivi: http://mail-archives.apache.org/mod_mbox/incubator-ooo-utenti-it

Re: [utenti] R: Re: [utenti] separare il numero romano in una cella

["Guido (email.it)" <gu...@email.it>]

Il 02/08/2012 18.36, ndlsas1@inwind.it ha scritto:
> - CUT-
>
> Funziona splendidamente con un limite, non c'è possibilità di mettere doppi
> nomi tipo Vittorio Emanuele II e fargli riconoscere il numero romano.
> Se vi viene in mente qualcosa di più efficace sono a disposizione. Intanto
> ....
Ecco una soluzione per  cercare lo spazio 
posizionato più a destra,
devi comunque ipotizzare il limite degli spazi 
possibili (es.  max 3 spazi in una frase)

- usando 4 celle ad esempio A1, B1, C1, D1
A1  =Ricerca(""; testo;1)     ' trova primo spazio
B1  =Se(val.Err( Ricerca(" "; testo;A1+1);0; 
Ricerca(" "; testo;A1+1))   ' trova il secondo spazio
C1  =Se( val.Err( Ricerca(" "; testo;B1+1);0; 
Ricerca(" "; testo;B1+1))   ' trova il terzo spazio
... e cos' via

D1=max(A1:C1)   ' riporta lo spazio più a destra 
nella frase

ciao
g

---------------------------------------------------------------------
Per cancellarsi: ooo-utenti-it-unsubscribe@incubator.apache.org
Per informazioni: http://www.openoffice.org/it/
Per avviare una nuova discussione: ooo-utenti-it@incubator.apache.org
Archivi: http://mail-archives.apache.org/mod_mbox/incubator-ooo-utenti-it

Re: [utenti] R: Re: [utenti] separare il numero romano in una cella

[Francesco De Marchi <f....@cislveneto.it>]

Il 02/08/2012 18:36, ndlsas1@inwind.it ha scritto:
> ......
>
>
> Ho risolto con 10 caselle e le due dritte che mi avete dato.
> Riassumo:
> A1 > casella immissione indirizzo
> B1 > =MAIUSC(STRINGA.ESTRAI(A1;RICERCA(" ";A1;8);6)) [ estrae il numero romano
> dalla cella e lo maiuscolizza]
> C1> =RICERCA(" ";A1;8) [ identifica quanti caratteri ci sono prima del numero
> romano]
> D1> =SINISTRA(A1;C1) [ estrae la parte testuale dell'indirizzo]
> E1> =ANNULLA.SPAZI(B1) [ per eliminare lo spazio iniziale davanti al romano se
> no è impossibile trasformarlo in arabo]
> F1> =CODICE(E1) [ per trasformare testo in numero e far lavorare i "se"]
> G1> =SE(F1=73;ARABO(E1);SE(F1=86;ARABO(E1);SE(F1=88;ARABO(E1);SE(F1=76;ARABO
> (E1);SE(F1=67;ARABO(E1);0))))) [ i "se" che identificano i caratteri dei numeri
> romani " I V X L C"; la controparte "arabo" serve a far lavorare poi i "se
> successivi" dato che lavorano con numeri e non con testo]
> H1> =MAIUSC.INIZ(D1) & MAIUSC(B1) [ riunisce l'indirizzo con il numero romano
> in maiuscolo]
> I1> =SE(G1;1;0) [discrimina se indirizzo standard o con numeri romani]
> J1> =SE(I1=1;H1;MAIUSC.INIZ(A1)) [ cella finale di cui fare copia negli altri
> fogli]
> L'8 presente in B1 e in C1 serve per dare modo di funzionare anche con via -
> viale - piazza - largo eccetera.
> Funziona splendidamente con un limite, non c'è possibilità di mettere doppi
> nomi tipo Vittorio Emanuele II e fargli riconoscere il numero romano.
> Se vi viene in mente qualcosa di più efficace sono a disposizione. Intanto
> ......
Scusa ma non son riuscito a capire se hai usato la funzione che avevo 
postato o hai solo preso spunto dal codice .... cmq se l'hai usata la 
funzione dovrebbe riconoscere il numero romano ed estrarlo in qualsiasi 
posizione questo sia (quindi anche con "via Vittorio Emenuale II".

Ciao

-- 
Francesco De Marchi aka Cix
VELug Venezia Free Software User Group

---------------------------------------------------------------------
Per cancellarsi: ooo-utenti-it-unsubscribe@incubator.apache.org
Per informazioni: http://www.openoffice.org/it/
Per avviare una nuova discussione: ooo-utenti-it@incubator.apache.org
Archivi: http://mail-archives.apache.org/mod_mbox/incubator-ooo-utenti-it