Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

excel-import file txt

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

excel-import file txt

Postdi prog_jlaw » 14/04/07 22:32

ciao a tutti
ho importato un file di testo ed il risultato e' questo
"1" "2" "3" "4"
"5" "6" "7" "8"
"0" "0" "0" "0"
in ogni cella il numero ha "" e vorrei non averlo per ovvi mitivi che non riesco a gestire il valore. come fare?

piccolo approfondimento di quello che faccio:
importo il file txt in un foglio con il metodo:
With ActiveSheet.QueryTables.Add(Connection:="Text;C:\....\xxx.txt", _
Destination:=Range("A1")).....
dopo con il metodo copia ed incolla copio le celle che mi interessano e le incollo in un altro foglio che uso come database .

durante il primo passaggio subito dopo l'import mi sarebbe piaciuto 'ripulire' i valori da "" ma non so come! :neutral:

chiunque mi aiuti GRAAAAZIE
NB e' 1/2 settimane che mi sono avvicinato al VBA di excel quindi nell'eventuale aiuto non date per scontato niente sulla mia conoscenza! ;)

ciao a tutti
prog_jlaw
Newbie
 
Post: 8
Iscritto il: 14/04/07 22:20

Sponsor
 

Postdi Erick » 15/04/07 11:35

Il file è del tipo txt? Sono già ordinati in colonne come dovrebbe essere il risultato finale? Se si basta che apri direttamente il file con excel e dopo qualche passaggio guidato dovresti avere ciò che vuoi.
Erick
Utente Junior
 
Post: 47
Iscritto il: 11/10/06 13:16

Postdi prog_jlaw » 15/04/07 20:49

forse mi sono spiegato male ....
il file e' formatto cosi:
"valore","valore","valore",.........
dopo aver importato il file con il metodo sopra descritto ottengo
in ogni cella:
"valore"
io volevo 'ripulire' il valore dagli apici ottenendo in ogni cella solo il valore
altrimento non riesco a gestire le operazioni sucessive.

spero di essere stato chiaro.
nb:il tutto da VB ..non voglio fare nessuna opeazione 'manuale'
<<<basta che apri direttamente il file con excel e dopo qualche passaggio guidato >>>>

ciao e grazie
prog_jlaw
Newbie
 
Post: 8
Iscritto il: 14/04/07 22:20

Postdi prog_jlaw » 15/04/07 21:49

ho trovato !!!
n tutte le celle comprese tra A1:W100 se ci sono degli apici li sostituisco con uno spazio qundi nulla!

a chi interessase questo e' il codice:

ActiveSheet.Range("A1:W100").Replace What:="""", Replacement:=" ", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Cells.Find(What:="""", After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _
xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False _
, SearchFormat:=False).Activate

:)
bye
prog_jlaw
Newbie
 
Post: 8
Iscritto il: 14/04/07 22:20


Torna a Applicazioni Office Windows


Topic correlati a "excel-import file txt":


Chi c’è in linea

Visitano il forum: Lucio Peruggini e 3 ospiti

cron