martedì 2 settembre 2008

VBA Excel: Aggiungere un nuovo foglio di Excel

Questo frammento di codice illustra come aggiungere un nuovo foglio di lavoro di Microsoft Excel 2007 tramite il linguaggio Visual Basic Application.

Dim wrkPagina As Worksheet
Set wrkPagina = ActiveWorkbook.Worksheets.Add()
wrkPagina.Name = "Nuovo Foglio"

4 commenti:

Fabri ha detto...

ho usato questo codiceper aggiungere un nuovo foglio e funziona senza problemi,
Solo una domanda...
Finora per scrivere per esempio "ciao" nella cella A1 del foglio 2 bastava dare il comando
Foglio2.Cells(1, 1) = "ciao"

Io ho usato il codice postato ossia:

Dim wrkPagina As Worksheet
Set wrkPagina = ActiveWorkbook.Worksheets.Add()
wrkPagina.Name = "Foglio4"

a questo punto se provo a inserire una stringa o un numero in una cella del foglio4 con il comando

Foglio4.Cells(1, 1) = "ciao"

mi da il seguente errore:

Errore di run time 424
Necessario Oggetto

Non ho una grande esperienza con questo programma e magari si tratta di una cosa banale ma non riesco proprio a venirne fuori.
Grazie in anticipo per l'attenzione

Emanuele ha detto...

Ciao, visto che utilizzi un oggetto di tipo worksheet, utilizza quello.
Quindi dopo aver impostato il nome fai
wrkPagina.Cells(1, 1) = "ciao"
anzichè foglio4.cells(1,1) = "ciao"
Ciao e buona programmazione.

ciro83 ha detto...

Qual è il codice da usare per aggiungere un nuovo foglio in un altro file excel (e non nella cartella attiva)?

Emanuele ha detto...

Ciao Ciro83, devi creare un oggetto di tipo Excel, e dall'oggetto appena creato instanziare un oggetto di tipo worksheet.
Ciao Emanuele