Estrarre Stringa

stefano....@gmail.com

unread,

Apr 13, 2020, 12:39:40 AM4/13/20

to

Ciao a Tutti avrei bisogno di estrarre da questa Stringa i seguenti valori e riportarli in orizzontale nelle singole celle

1 10.10.1992 BA 65.90.72.78.49

questa è la sequenza
1
10.10.1992 questa è una data
BA
65
90
72
78
49

Grazie

Message has been deleted

Andrea.9

unread,

Apr 13, 2020, 12:43:41 PM4/13/20

to

ciao. usa questa tipo di formula:
=A1&" "&B1&" "&C1&" "&D1&"."&E1&"."&F1&"."&G1&"."&H1
la & unisce il contenuto di diverse celle e stringhe esattamente come la funzione CONCATENA
tra virgolette "" metti spazi e punti in base alle tue necessità.
andrea

Andrea.9

unread,

Apr 13, 2020, 12:49:13 PM4/13/20

to

guardando meglio c'e' una data, per cui:
=A1&" "&GIORNO(A2)&"."&MESE(A2)&"."&ANNO(A2)&" "&A3&" "&A4&"."&A5&"."&A6&"."&A7&"."&A8
andrea

stefano....@gmail.com

unread,

Apr 13, 2020, 1:31:18 PM4/13/20

to

Scusa ma in questo modo le estraggo nelle singole celle?

Andrea.9

unread,

Apr 13, 2020, 2:06:35 PM4/13/20

to

Il giorno lunedì 13 aprile 2020 19:31:18 UTC+2, stefano....@gmail.com ha scritto:
> Scusa ma in questo modo le estraggo nelle singole celle?

io ho capito che hai più celle che vuoi unire in una unica cella.
vuoi fare il contrario?
cioe' da una unica cella ottenere diverse celle con i contenuti separati?
in questo caso le lunghezze delle stringhe sono sempre le stesse?
nel tuo esempio: 1 10.10.1992 BA 65.90.72.78.49
io vedo:
1 carattere
degli spazi (quanti?)
10 caratteri della data
spazio
2 caratteri
spazio
2 caratteri
punto
due caratteri
punto
due caratteri
punto
due caratteri

è sempre cosi'?
ci sono altri criteri? quali?
andrea

Andrea.9

unread,

Apr 13, 2020, 2:12:38 PM4/13/20

to

se le lunghezze delle stringhe sono sempre quelle che tu hai inserito nel testo , le formule sono queste:
=SINISTRA(A1;1)
=STRINGA.ESTRAI(A1;5;10)
=STRINGA.ESTRAI(A1;16;2) estratto come testo
=STRINGA.ESTRAI(A1;19;2)
=STRINGA.ESTRAI(A1;22;2)
=STRINGA.ESTRAI(A1;25;2)
=STRINGA.ESTRAI(A1;28;2)
=STRINGA.ESTRAI(A1;31;2)

andrea

stefano....@gmail.com

unread,

Apr 13, 2020, 2:14:34 PM4/13/20

to

Ciao, grazie, lunico problema che ho riscontrato e che tra il primo numero e la data a volte gli spazi sono diversi per il resto vorrei prorio suddivisi i nuemri in ogni singola cella compresa la data via tutti i punti e spazi

Andrea.9

unread,

Apr 13, 2020, 2:47:00 PM4/13/20

to

Il giorno lunedì 13 aprile 2020 20:14:34 UTC+2, stefano....@gmail.com ha scritto:
> Ciao, grazie, lunico problema che ho riscontrato e che tra il primo numero e la data a volte gli spazi sono diversi per il resto vorrei prorio suddivisi i nuemri in ogni singola cella compresa la data via tutti i punti e spazi

per avere la data in formato data anziché in formato testo usa questa:
=DATA.VALORE(SOSTITUISCI(STRINGA.ESTRAI(A1;5;10);".";"/"))

per il problema degli spazi variabili si puo' utilizzare la funzione ANNULLA.SPAZI

le formule diventano queste:
=SINISTRA(A1;1)
=STRINGA.ESTRAI(ANNULLA.SPAZI(A1);3;10)
=STRINGA.ESTRAI(ANNULLA.SPAZI(A1);14;2)
=STRINGA.ESTRAI(ANNULLA.SPAZI(A1);17;2)
=STRINGA.ESTRAI(ANNULLA.SPAZI(A1);20;2)
=STRINGA.ESTRAI(ANNULLA.SPAZI(A1);23;2)
=STRINGA.ESTRAI(ANNULLA.SPAZI(A1);26;2)
=STRINGA.ESTRAI(ANNULLA.SPAZI(A1);31;2)

andrea

Andrea.9

unread,

Apr 13, 2020, 2:50:14 PM4/13/20

to

pardon...
per la data questa
=DATA.VALORE(SOSTITUISCI(STRINGA.ESTRAI(ANNULLA.SPAZI(A1);3;10);".";"/"))
andrea

stefano....@gmail.com

unread,

Apr 13, 2020, 11:49:51 PM4/13/20

to

Scusa se rispondo solo ora ma internet faceva le bizze.... Ti ringrazio per l'aiuto.

Andrea.9

unread,

Apr 14, 2020, 3:11:27 AM4/14/20

to

Il giorno martedì 14 aprile 2020 05:49:51 UTC+2, stefano....@gmail.com ha scritto:
> Scusa se rispondo solo ora ma internet faceva le bizze.... Ti ringrazio per l'aiuto.

grazie a te per il riscontro
andrea

Ammammata

unread,

Apr 14, 2020, 3:16:41 AM4/14/20

to

Il giorno Mon 13 Apr 2020 06:39:38a, ** ha inviato su
microsoft.public.it.office.excel il messaggio news:a26ef141-33a0-41e9-85fc-
4edfd6...@googlegroups.com. Vediamo cosa ha scritto:

> questa Ã¨ la sequenza
> 1
> 10.10.1992 questa Ã¨ una data

> BA
> 65
> 90
> 72
> 78
> 49
>

sembrerebbe un'estrazione del lotto
se così fosse una volta avevo trovato tutti i dati di sempre già belli
pronti in csv :)

--
/-\ /\/\ /\/\ /-\ /\/\ /\/\ /-\ T /-\
-=- -=- -=- -=- -=- -=- -=- -=- - -=-
........... [ al lavoro ] ...........

Andrea.9

unread,

Apr 14, 2020, 5:05:15 AM4/14/20

to

Non avevo capito che fosse per il gioco del lotto.
Sono sempre contrario ad ogni forma di calcolo pseudo-previsionista sulle estrazioni.
Meglio tirare a caso o affidarsi ai sogni, sono metodi altrettanto validi.
andrea

Bruno Campanini

unread,

Apr 14, 2020, 12:59:46 PM4/14/20

to

stefano....@gmail.com laid this down on his screen :

Se la serie dei dati fosse un po' troppo lunga...

=======================================
Public Sub Lotto()
Dim SR As Range, TR As Range, i As Long, k As Integer

'SourceRange:
Set SR = Range([Data!AS1], [Data!AS1].End(xlDown))
'TargetRange:
Set TR = [Data!AU1]

For i = 1 To SR.Rows.count Step 8
k = k + 1
TR(k, 1) = SR(i + 0)
TR(k, 2) = Replace(SR(i + 1), ".", "/")
TR(k, 3) = SR(i + 2)
TR(k, 4) = SR(i + 3)
TR(k, 5) = SR(i + 4)
TR(k, 6) = SR(i + 5)
TR(k, 7) = SR(i + 6)
TR(k, 8) = SR(i + 7)
Next

End Sub
========================================

Bruno

Ammammata

unread,

Apr 15, 2020, 3:31:29 AM4/15/20

to

Il giorno Tue 14 Apr 2020 11:05:13a, *Andrea.9* ha inviato su
microsoft.public.it.office.excel il messaggio news:da62c93b-db18-464d-b2f9-
7c3b13...@googlegroups.com. Vediamo cosa ha scritto:

> Non avevo capito che fosse per il gioco del lotto.
>

http://www.franknet.altervista.org/lotto/1992.HTM

e in particolare

https://i.imgur.com/kLNczd4.png

nota bene: questo NON è il database di cui parlavo, quello in formato CSV