Condividi:        

SCRIVERE FILE DI TESTO DA PIù SUB

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

SCRIVERE FILE DI TESTO DA PIù SUB

Postdi christianghz » 28/10/19 17:31

Ciao a tutti,
devo scrivere un file di testo compilando i campi da più sub.

Nella prima Sub creo il file di testo così:
Codice: Seleziona tutto
Set filesys = CreateObject("Scripting.FileSystemObject")
Set testfile = filesys.CreateTextFile("C:\Temp\" & "FileTesto" & " data creaz. " & Format(Now(), "dd-mm-yyyy") & " Ore " & Format(Time, "hh.mm.ss") & ".xml", True)


Nell'esecuzione delle varie Sub del progetto ho bisogno di aggiungere man mano righe al file, es
Codice: Seleziona tutto
testfile.WriteLine "<Versione>11</Versione>"



Solo che nelle altre Sub mi restituisce l'errore: impossibile trovare metodo o membro di dati.

Ho provato, dopo aver letto vari post relativi, a inserire questa dicitura nella sub iniziale
Codice: Seleziona tutto
Public testfile As FileSystemObject


Ma non ho risolto sapete aiutarmi?

Grazie
christianghz
Utente Senior
 
Post: 114
Iscritto il: 03/02/14 17:58

Sponsor
 

Re: SCRIVERE FILE DI TESTO DA PIù SUB

Postdi Anthony47 » 29/10/19 00:54

Se da piu' macro vuoi manipolare un file allora in ogni macro devi creare un "FileSystemObject" tramite cui poi accedi a un "TextStream".
Nel tuo codice FILESYS e' il FileSystemObject e TESTFILE e' il TextStream.

Potresti dichiarare filesys in testa al Modulo in cui poi inserisci tutte le macro:
Codice: Seleziona tutto
Dim FileSys As Object        'RIGOROSAMENTE IN TESTA AL MODULO

In questo modo l'oggetto sara' comune a tutte le macro DI QUEL MODULO.

Poi in ogni macro crei se necessario l'oggetto FileSystemObject con:
Codice: Seleziona tutto
If FileSys Is Nothing Then Set FileSys = CreateObject("Scripting.FileSystemObject")


Vedi se così "vai piu' lontano"...

Ciao
Avatar utente
Anthony47
Moderatore
 
Post: 19181
Iscritto il: 21/03/06 16:03
Località: Ivrea


Torna a Applicazioni Office Windows


Topic correlati a "SCRIVERE FILE DI TESTO DA PIù SUB":


Chi c’è in linea

Visitano il forum: Nessuno e 45 ospiti