macro per importare dati file txt in excel 2

[alaves12]

( prosegue da "macro per importare dati file txt in excel ")
Ancora Grazie Flash per il grosso aiuto. Il file che mi hai inviato è spettacolare ( però non mi visualizza la colonna piatti vinti allo SD), ma usando un file .txt con molti risultati mi da errore dopo quattro blocchi ( si ferma al quinto blocco). Ti spiego meglio: questi sono risultati che mi arrivano tramite mail quando li richiedo, faccio un lavoro di copia incolla e salvo il mio file di testo. Quindi è possibile che gli spazi tra un blocco e l' altro non sempre siano uguali. Devo rispettare degli spazi tra un blocco e l' altro ? E' possibile controllare se un torneo è già stato inserito e quindi non metterlo per due volte ?

Grazie
Alaves12

P.S. Ti invio un file di testo

[alaves12]

Ho sistemato alcuni piccoli problemucci, e fatto una macro per i record duplicati.
Grazie mille Flash !!
Alaves12

[alaves12]

Ciao Flash, ho sistemato qualche problemuccio, ma non riesco a:
fa visualizzare la colonna SD ( con le percentuali dello showdown ) e poi per non mi fa inserire le partite ancora in corso, per farle prendere dal programma mi devo inserire una riga dopo quella dei 9 giocatori. ( mi spieghi come hai fatto a far in modo di inserire i numeri percentuali tra parentesi ? non riesco a capire da codice )

PokerStars Torneo #158192296, No Limit Hold'em
Buy-in: $6.00/$0.50
9 giocatori
************************inserisco qui la riga, forse perchè da codice non hai previsto x=25 ?
Torneo iniziato 23/04/2009 16:51:39 ET
Il torneo è ancora in corso
1: Broxwalker (Tübingen), ancora in gioco
2: allprowi (Mequon), ancora in gioco
3: brunolimao (São Paulo), ancora in gioco
4: sir14 (Frankfurt), ancora in gioco
5: maggisch87 (bad wildungen), ancora in gioco
6: Malldiny85 (CALARASI), ancora in gioco
7: Gynheimer (Shawnee),
8: alaves12 (magenta),
9: Backieken (Ninove),

Ti sei piazzato al 8° posto (eliminato alla mano #27415999797).

16 mani giocate e ha visto il flop:
- 0 volte su 1 dallo small blind (0%)
- 1 volte su 1 dal big blind (100%)
- 3 volte su 14 da un'altra posizione (21%)
- un totale di 4 volte su 16 (25%)

[Flash30005]

Allora il codice per definire il valore tra la parentesi ( e il simbolo % è questo

Codice: Seleziona tutto

     If x > 19 And x < 23 Then
        vettore(x) = Mid(vettore(x), InStrRev(vettore(x), "(") + 1, InStrRev(vettore(x), "%") - InStrRev(vettore(x), "(") - 1)


sapendo che è il vettore19 quello interessato

Codice: Seleziona tutto

 - 9 volte su 11 dal big blind      (82%)

allora di quel vettore uso il
Mid(Stringa, Inizio, Ncaratteri), sostituisco questa formula del Mid
Mid
(
Stringa = Vettore(x)
,
Inizio = Lunghezza della stringa fino alla parentesi aperta "(" + 1 carattere
,
NCaratteri = Lunghezza della stringa fino al simbolo "%" meno il numero dei caratteri della stringa alla parentesi aperta -1
)

E' più chiaro?
Per quel che riguarda l'aggiunta manuale della riga è perché il file testo che hai postato all'inizio non rappresenta il vero log delle partite ma solo una parte mentre questo che hai postato ora ha diversi incontri e non è regolare negli intervalli di inizio mano.
Comunque appena ho un attimo di tempo lo guardo.

Per L'SD mi devi dire qual'è il valore che deve essere preso in considerazione in un log tipo questo

Codice: Seleziona tutto

PokerStars Torneo #152359330, No Limit Hold'em
Buy-in: $6.00/$0.50
9 giocatori
Montepremi totale: $54.00
Torneo iniziato 31/03/2009 18:10:33 ET
Torneo finito 31/03/2009 18:45:44 ET
  1: bear3004 (HAMILTON), $27.00 (50%)
  2: alaves12 (magenta), $16.20 (30%)
  3: noone9 (Osterode), $10.80 (20%)
  4: Revil85 (Berlin),
  5: JoeDeMoeFoe (Amsterdam),
  6: deljanwhite (London),
  7: Favre44More (Coralville),
  8: shootie200 (Grand Blanc),
  9: pfeif008 (Mullica Hill),

Ti sei piazzato al 2° posto (eliminato alla mano #26586205021).

61 mani giocate e ha visto il flop:
 - 9 volte su 15 dallo small blind      (60%)
 - 7 volte su 16 dal big blind      (44%)
 - 3 volte su 30 da un'altra posizione      (10%)
 - un totale di 19 volte su 61      (31%)

 Piatti vinti allo showdown - 5 su 6      (83%)
 Piatti vinti senza showdown - 10


Qual'è il valore dei piatti vinti SD ? 5 6 o 10? e poi il segno - (es. - 5) deve essere riportato nel foglio di excel?

Ciao

[Flash30005]

Ciao Alaves,
Quel log non è proprio uno dei migliori...
Comunque prova questo file

Ciao

[alaves12]

Flash, ti ho fatto lavorare anche il 25 Aprile ??
Ti ringrazio molto per la versione 3. E grazie per la spiegazione adesso è un poco più chiaro.

Diciamo che i dati che mi servirebbe in realtà sono due:

in una colonna %SD -- in questo caso 83
e in un altra Senza SD -- in questo caso 10

Piatti vinti allo showdown - 5 su 6 (83%)
Piatti vinti senza showdown - 10

Grazie
Alaves

[alaves12]

Dimenticavo: una osa strana che mi succede con la colonna Data: fino al 13 di Aprile mi ha messo la data all' americana e poi dal 13 la data la inserisce corretta 13/04/09. Come mai ?

Grazie
Alaves

[Flash30005]

Dimenticavo: una osa strana che mi succede con la colonna Data: fino al 13 di Aprile mi ha messo la data all' americana e poi dal 13 la data la inserisce corretta 13/04/09. Come mai ?

Per quanto riguarda la data, modifica questo codice, aggiungendo il formato data (vettore 4) nella macro Compila()

Codice: Seleziona tutto

Range("D" & UR).Value = Format(vettore(4), "dd/mm/yyyy")

Diciamo che i dati che mi servirebbe in realtà sono due:
in una colonna %SD -- in questo caso 83
e in un altra Senza SD -- in questo caso 10

Per questi valori ho dovuto rimettere mano alle tabelle e vettori quindi invio di nuovo il file

Ciao

P.s. Ti ricordo che cliccando due volte consecutive sulla cella A1 (su Torneo) si attiva la macro di caricamento dati

[alaves12]

Ho "sistemato" in questo modo adesso che ho capito il funzionamento del vettore:

[...]
If X = 6 Then Elimin = Mid(riga, 51, 11)


[..] Range("J" & UR).Value = vettore(10)
Range("K" & UR).Value = vettore(12)
Range("L" & UR).Value = vettore(13)
Range("M" & UR).Value = Elimin

GRAZIE MILLE !!!!!!!!!!!!!!!!!!!!

alaves12