Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

macro per importare dati file txt in excel 2

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

macro per importare dati file txt in excel 2

Postdi alaves12 » 14/04/09 15:11

( 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
Allegati

[L’estensione txt è stata disattivata e non puó essere visualizzata.]

alaves12
Utente Junior
 
Post: 21
Iscritto il: 09/04/09 11:20

Sponsor
 

Re: macro per importare dati file txt in excel 2

Postdi alaves12 » 16/04/09 11:53

Ho sistemato alcuni piccoli problemucci, e fatto una macro per i record duplicati.
Grazie mille Flash !!
Alaves12
alaves12
Utente Junior
 
Post: 21
Iscritto il: 09/04/09 11:20

Re: macro per importare dati file txt in excel 2

Postdi alaves12 » 24/04/09 14:30

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%)
alaves12
Utente Junior
 
Post: 21
Iscritto il: 09/04/09 11:20

Re: macro per importare dati file txt in excel 2

Postdi Flash30005 » 24/04/09 16:51

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
Flash
Win7 + Office 2010 Ita
"Fotografica" al servizio dell'immagine

Ottime opportunità di lavoro (part-time o full-time) con guadagni immediati. Info in MP
Avatar utente
Flash30005
Moderatore
 
Post: 8460
Iscritto il: 27/09/07 11:44
Località: Roma +o-

Re: macro per importare dati file txt in excel 2

Postdi Flash30005 » 25/04/09 02:43

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

Ciao
Allegati

[L’estensione rar è stata disattivata e non puó essere visualizzata.]

Flash
Win7 + Office 2010 Ita
"Fotografica" al servizio dell'immagine

Ottime opportunità di lavoro (part-time o full-time) con guadagni immediati. Info in MP
Avatar utente
Flash30005
Moderatore
 
Post: 8460
Iscritto il: 27/09/07 11:44
Località: Roma +o-

Re: macro per importare dati file txt in excel 2

Postdi alaves12 » 27/04/09 14:40

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
Utente Junior
 
Post: 21
Iscritto il: 09/04/09 11:20

Re: macro per importare dati file txt in excel 2

Postdi alaves12 » 27/04/09 14:48

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
alaves12
Utente Junior
 
Post: 21
Iscritto il: 09/04/09 11:20

Re: macro per importare dati file txt in excel 2

Postdi Flash30005 » 27/04/09 15:28

alaves12 ha scritto: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")


alaves12 ha scritto: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 ;)
Allegati

[L’estensione rar è stata disattivata e non puó essere visualizzata.]

Flash
Win7 + Office 2010 Ita
"Fotografica" al servizio dell'immagine

Ottime opportunità di lavoro (part-time o full-time) con guadagni immediati. Info in MP
Avatar utente
Flash30005
Moderatore
 
Post: 8460
Iscritto il: 27/09/07 11:44
Località: Roma +o-

Re: macro per importare dati file txt in excel 2

Postdi alaves12 » 28/04/09 10:32

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
alaves12
Utente Junior
 
Post: 21
Iscritto il: 09/04/09 11:20


Torna a Applicazioni Office Windows


Topic correlati a "macro per importare dati file txt in excel 2":


Chi c’è in linea

Visitano il forum: Anthony47 e 6 ospiti