io sto usando excel e cercavo si usare visualbasic6 per poter risolvere questo problema creando una macro
ho una lista di nomi nel foglio excel, precisamente nella colonna A.
per ogni nome contenuto nelle celle della colonna A, ho bisogno di creare un file.bmp vuoto che posso poi salvare in un folder c:\folder
ma ogni file creato deve avere il nome che c'era nella cella.
fino ad ora ho partorito questo codice sotto, ma in tal modo creo solo il file specifico esempio.bmp, mentre vorrei avere il nome che compare nella cella A1, A2, A3 ecc..quindi tanti files quante le celle che ci sono nella colonna A, tutti con il nome di ogni cella della colonna A
Sub creafile()
Dim OggFile, origine, OggTextStream
origine = "C:\Documents and Settings\dati\Desktop\esempio.bmp"
Set fso = CreateObject("Scripting.FileSystemObject")
fso.CreateTextFile (origine)
Set OggFile = fso.GetFile(origine)
Set OggTextStream = OggFile.OpenAsTextStream(1)
End Sub
|