maurogsc.eu
mauro gamberini


home ==> vbscript ==> Excel - Aprire e scrivere  su di un file di Excel

Excel - Aprire e scrivere su di un file di Excel

Situazione.
Vogliamo aprire un file di Excel e scrivere sul Foglio1.

Nota.
Il codice dell'esempio รจ scaricabile a questo link  in formato .zip a al suo interno trovate un file .vbs. Utilizzare gli esempi forniti o files di test per le vostre prove. Alcune indicazioni su come creare un file .vbs le trovate qui.

1 - Questo il codice che apre il file C:\Prova\mioFile.xls. Modificare percorso e nome del file con i vostri. Il codice scrive poi nelle celle A1 e B1 del Foglio1.

Dim objExcel
Dim objWorkbook
Dim objWorksheet
    
    Set objExcel = CreateObject("Excel.Application")
    Set objWorkbook = objExcel.Workbooks.Open("C:\mioFile.xls")
    Set objWorksheet = objWorkbook.Worksheets("Foglio1")
    
    objExcel.Visible = True
    
    With objWorksheet
        .Cells(1, 1).Value = "Pippo"
        .Cells(1, 2).Value = "Pluto"
    End With
     
    objExcel.Quit


Set objWorksheet = Nothing
Set objWorkbook = Nothing
Set objExcel = Nothing

Per ulteriori informazioni sui Vbscript utilizzate questo forum:
http://social.msdn.microsoft.com/Forums/it-IT/vbseiit/threads


Ultimo aggiornamento di questa pagina: 13/03/2013 - mauro gamberini