| | Post: 4 | Registrato il: 10/03/2011
| Città: ANCONA | Età: 48 | Utente Junior | EXCEL 2007 | | OFFLINE |
|
  02/05/2017 15:25 | |
Espongo il problema:
Devo creare diversi files di testo con delle righe di programma CN all'interno che rimangono quasi tutte identiche tranne i valori virgolettati dopo le istruzioni "MK"
Ho allegato il file xls e un esempio del file in uscita(txt) che dovrebbe venire generato.
In realta' il file di testo dovrebbe avere estensione .tml(proprietario della macchina) ma rinominando il txt non ho problemi a farglielo leggere.
Sto gia' velocizzando il processo creandomi questi file singolarmente(usando i comandi "sostituisci" e salvandomi manualmente il programma cn copiandolo(da excel) ed incollandolo nel file di testo relativo) e mi chiedevo se ci potesse esser modo di automatizzare il processo di creazione.
Suggerimenti?
Utilizzo Excel 2007
Grazie e Buona serata :)
[Modificato da Isoladimann 02/05/2017 16:10] MS Excel 2007 |
|
| | Post: 3.838 | Registrato il: 13/03/2012
| Città: LIVORNO | Età: 78 | Utente Master | 2010 | | OFFLINE | |
|
| 02/05/2017 15:43 | |
Sub salvatesto()
fname = "F:\Download\file.tml" ' <<< da modificare
LR = Cells(Rows.Count, "A").End(xlUp).Row
sn = Range("A3:A" & LR)
For j = 1 To UBound(sn)
c00 = c00 & Join(Application.Index(sn, j, 0), ",") & vbCrLf
Next
CreateObject("scripting.filesystemobject").createtextfile(fname).write c00 'Mid(c00, 2)
End Sub
----------
Win 10 - Excel 2010
allega un file di esempio, guadagnerai tempo tu e lo farai risparmiare a chi ti aiuta |
| | Post: 4 | Registrato il: 10/03/2011
| Città: ANCONA | Età: 48 | Utente Junior | EXCEL 2007 | | OFFLINE |
|
| 02/05/2017 22:40 | |
grazie per la risposta...
inserendo la sub mi riporta l'errore "runtime 76 impossibile trovare il percorso"
cosa mi sfugge?
MS Excel 2007 |
| | Post: 3.839 | Registrato il: 13/03/2012
| Città: LIVORNO | Età: 78 | Utente Master | 2010 | | OFFLINE | |
|
| 03/05/2017 07:52 | |
c'è scritto "da modificare", il percorso del file da salvare deve essere il tuo, non il mio
----------
Win 10 - Excel 2010
allega un file di esempio, guadagnerai tempo tu e lo farai risparmiare a chi ti aiuta |
| | Post: 5 | Registrato il: 10/03/2011
| Città: ANCONA | Età: 48 | Utente Junior | EXCEL 2007 | | OFFLINE |
|
| 03/05/2017 10:47 | |
Hai ragione... mi sono rincoglionito.. ero di fretta ieri sera e visualizzavo su un tablet..
Ora funziona Correttamente la generazione del file,Vorrei solo fare in modo che in automatico mi sostituisse anche i valori all'interno del campo "MK" (l'indicazione "deve contenere" ) e non so se c'e' un modo per creare il file di testo gia' col nome corretto invece di foverlo poi rinominare manualmente..
Chiedo venia per gli errori ma era una vita che non utilizzavo VB e sto riprendendo mano praticamente adesso.. MS Excel 2007 |
| | Post: 3.840 | Registrato il: 13/03/2012
| Città: LIVORNO | Età: 78 | Utente Master | 2010 | | OFFLINE | |
|
| 03/05/2017 11:26 | |
puoi spiegare meglio ?
----------
Win 10 - Excel 2010
allega un file di esempio, guadagnerai tempo tu e lo farai risparmiare a chi ti aiuta |
| | Post: 6 | Registrato il: 10/03/2011
| Città: ANCONA | Età: 48 | Utente Junior | EXCEL 2007 | | OFFLINE |
|
| 03/05/2017 12:53 | |
si,scusami.. ho modificato il file e l'ho riallegato (zippato,e contiene la macro vba)
In pratica,come si vede dal file suddetto in alto ho 3 colonne principali (di cui poi eventualmente modifichero' la posizione.. questa configurazione era solo per cercare di contenere tutto in un unico foglio per spiegare meglio quello che avevo intenzione di fare..)dicevo.. in alto ho tre colonne principali :
1 "PROGRAMMA DA INVIARE A PUNZONATRICE"
2 "DATI PROVENIENTI DA DATABASE"
3 "DATI ESTRATTI DA DATABASE".
Dovrei far generare tanti files quante sono le righe del database
il primo file che genera se si fa partire la macro adesso e' riferito ai dati evidenziati in giallo.dovrei applicare lo stesso principio a tutte le righe del "database" e se possibile assegnare in automatico il nome file generato prendendolo da una cella predefinita (ad esempio,nell'allegato,il nome del primo files dovrebbe essere "602-6.tml" e cioe' l'unione dei valori (concatenati) delle celle E3+F3...
spero di essermi spiegato un po' meglio..
Grazie ancora [Modificato da Isoladimann 03/05/2017 12:54] MS Excel 2007 |
| | Post: 3.841 | Registrato il: 13/03/2012
| Città: LIVORNO | Età: 78 | Utente Master | 2010 | | OFFLINE | |
|
| 03/05/2017 19:25 | |
Isoladimann, 03/05/2017 12.53:
Dovrei far generare tanti files quante sono le righe del database
un file per ogni riga ?
allega anche i file di testo che vuoi ottenere dal file allegato
[Modificato da patel45 03/05/2017 19:26]
----------
Win 10 - Excel 2010
allega un file di esempio, guadagnerai tempo tu e lo farai risparmiare a chi ti aiuta |
| | Post: 7 | Registrato il: 10/03/2011
| Città: ANCONA | Età: 48 | Utente Junior | EXCEL 2007 | | OFFLINE |
|
| 03/05/2017 19:36 | |
È allegato al primo download della discussione insieme al primo xls..il nome del file di testo identifica anche il contenuto.. se serve lo riuppo.. MS Excel 2007 |
| | Post: 3.842 | Registrato il: 13/03/2012
| Città: LIVORNO | Età: 78 | Utente Master | 2010 | | OFFLINE | |
|
| 03/05/2017 20:29 | |
non hai risposto alla donmanda ed io continuo a non capire cosa vuoi ottenere
----------
Win 10 - Excel 2010
allega un file di esempio, guadagnerai tempo tu e lo farai risparmiare a chi ti aiuta |
| | Post: 8 | Registrato il: 10/03/2011
| Città: ANCONA | Età: 48 | Utente Junior | EXCEL 2007 | | OFFLINE |
|
| 03/05/2017 20:40 | |
Si..un file per ogni riga.. ognuno di questi file va poi attraverso una chiavetta usb dentro una macchina portatile che micropunzona della lamiera con i dati inseriti all interno di ogni fIles.. in pratica ogni file corrisponde alla marcatura di un manufatto in ferro..e contiene il codice di quel pezzo,appunto MS Excel 2007 |
| | Post: 3.843 | Registrato il: 13/03/2012
| Città: LIVORNO | Età: 78 | Utente Master | 2010 | | OFFLINE | |
|
| 04/05/2017 08:58 | |
nel file di testo che hai allegato ci sono molte righe, quindi non capisco come poter fare un file per ogni riga
----------
Win 10 - Excel 2010
allega un file di esempio, guadagnerai tempo tu e lo farai risparmiare a chi ti aiuta |
| | Post: 9 | Registrato il: 10/03/2011
| Città: ANCONA | Età: 48 | Utente Junior | EXCEL 2007 | | OFFLINE |
|
| 04/05/2017 12:32 | |
Probabilmente mi sono espresso male..ogni riga del database da Excel deve generare un file txt.Tanti txt quante sono le righe da Excel. . MS Excel 2007 |
| | Post: 3.845 | Registrato il: 13/03/2012
| Città: LIVORNO | Età: 78 | Utente Master | 2010 | | OFFLINE | |
|
| 04/05/2017 12:40 | |
ti auguro che altri utenti ti capiscano
----------
Win 10 - Excel 2010
allega un file di esempio, guadagnerai tempo tu e lo farai risparmiare a chi ti aiuta |
| | Post: 10 | Registrato il: 10/03/2011
| Città: ANCONA | Età: 48 | Utente Junior | EXCEL 2007 | | OFFLINE |
|
| 05/05/2017 08:50 | |
Provo a uppare un paio di screenshot,comunque ti ringrazio gia' per l'aiuto..Generare quel file in automatico mi e' stato gia' molto utile..Al limite potrebbe gia andar bene anche cosi'.. grazie ancora
[Edit]
Provo a riassumere piu' chiaramente,ho riordinato i dati sul file xls per provare a renderlo piu' chiaro:
Alla riga 40 i valori evidenziati(colonne K,M,O) sostituiscono rispettivamente i valori nella colonna “A”
La macro genera un file di testo con i dati che vanno dalla cella “A2” alla cella “A35”
Una volta generato,il file di testo dovrebbe rinominarsi come il valore alla cella A40
(in questo caso in 662-2.txt)
Il tutto dovrebbe ripetersi con lo stesso principio per le righe sottostanti
(in questo caso dalla riga 40 alla riga 51),generando 12 files
Grazie ancora per l'aiuto,e come anticipato poco fa,se non si riuscisse,mi hai gia' dato una gran mano..
Buona giornata
[Modificato da Isoladimann 05/05/2017 09:52] MS Excel 2007 |
|
|
|
|