Appunti su Visual Basic for Application

Il problema

Tutti gli utenti di computer in ambiente Microsoft e non utilizzano per la produttività personale delle applicazioni di “office automation” per scrivere testi, elaborare fogli elettronici, presentazioni e altro.
Tutti però non usano le funzionalità avanzate del programma che conoscono. Ciò avviene per vari motivi alcuni dei più significativi sono:
1-Personalizzazione spinta dei documenti complessa e spesso non ben documentata:
2-Prerequisiti richiesti per la conoscenza e la costruzione di vere e proprie applicazioni custom in ambiente office sono la conoscenza del linguaggio di programmazione supportati dalla particolare applicazione;
3-La manipolazione di poche informazioni di qualsiasi tipo;
Per l’ambiente Microsoft Office indipendentemente dalla versione utilizzata il linguaggio di programmazione supportato è il VisualBasicforApplication versione ridotta del linguaggio Visual Basic ben noto per la piattaforma Microsoft.
Attraverso questo codice è possibile creare macro ovvero veri e propri frammenti di codice VisualBasic che permettono di eseguire dei compiti personalizzati nel documento in cui vengono scritte.
Per imparare a scrivere le macro è necessario conoscere almeno in modo minimale i fondamenti per la programmazione strutturata e un minimo di conoscenza sulla programmazione ad oggetti,

Ambiente di sviluppo Visual Basic for Application

L’ambiente di sviluppo di Visual Basic for Application si può attivare nel Menù Strumenti – Macro – Visual Basic Editor dell’applicazione in cui si lavora.

La colonna di sinistra visualizza il documento aperto sul quale opera la macro. Nel nostro caso parleremo in modo più approfondito di Microsoft Excel. Laddove la colonna di sinistra non fosse visibile basterà attivare il menù Visualizza – Gestione Progetti.
E’ utile notare che il riquadro gestione progetti si divide nell’insieme dei documenti aperti nella applicazione e nelle relative proprietà degli stessi.
In particolare un file di Excel contiene una cartella di lavoro e tre fogli di lavoro. Ognuno di questi oggetti viene nominato in modo diverso nella gestione progetti di VBA.
Questo concetto è legato anche al fatto che nella strutturazione della cartella di lavoro ThisWorkbook contiene i tre fogli.
Come prima prova apriamo il codice relativo a foglio1 cliccando due volte su foglio1 e scriviamo:

Sub cambia_nome()
Foglio1.Name = "Bilancio"
End Sub

In questo caso questa semplice macro cambia il nome al foglio1. Abbiamo richiamato una proprietà dell’oggetto foglio di Excel e abbiamo rinominato mediante programma in “Bilancio”.
Da questa prima macro alcuni spunti:
Sub indica l’inizio di un programma con un nume assegnato dall’utente; End Sub termina il programma.
All’interno del costrutto Sub .. End Sub inseriamo le istruzioni di programma.
Complichiamo un po’ la macro e proviamo a chiedere all’utente il nome del foglio il codice da scrivere è:

Sub cambia_nome()
Foglio1.Name = Inputbox(“Dammi il nome del foglio”)
End Sub

In questo caso viene chiesto all’utente mediante una finestra di dialogo e digitiamo il nome del foglio che vogliamo dare.
Abbiamo introdotto

Appunti su Visual Basic for Application

Il problema

Tutti gli utenti di computer in ambiente Microsoft e non utilizzano per la produttività personale delle applicazioni di “office automation” per scrivere testi, elaborare fogli elettronici, presentazioni e altro.
Tutti però non usano le funzionalità avanzate del programma che conoscono. Ciò avviene per vari motivi alcuni dei più significativi sono:
1-Personalizzazione spinta dei documenti complessa e spesso non ben documentata:
2-Prerequisiti richiesti per la conoscenza e la costruzione di vere e proprie applicazioni custom in ambiente office sono la conoscenza del linguaggio di programmazione supportati dalla particolare applicazione;
3-La manipolazione di poche informazioni di qualsiasi tipo;
Per l’ambiente Microsoft Office indipendentemente dalla versione utilizzata il linguaggio di programmazione supportato è il VisualBasicforApplication versione ridotta del linguaggio Visual Basic ben noto per la piattaforma Microsoft.
Attraverso questo codice è possibile creare macro ovvero veri e propri frammenti di codice VisualBasic che permettono di eseguire dei compiti personalizzati nel documento in cui vengono scritte.
Per imparare a scrivere le macro è necessario conoscere almeno in modo minimale i fondamenti per la programmazione strutturata e un minimo di conoscenza sulla programmazione ad oggetti,

Ambiente di sviluppo Visual Basic for Application

L’ambiente di sviluppo di Visual Basic for Application si può attivare nel Menù Strumenti – Macro – Visual Basic Editor dell’applicazione in cui si lavora.

La colonna di sinistra visualizza il documento aperto sul quale opera la macro. Nel nostro caso parleremo in modo più approfondito di Microsoft Excel. Laddove la colonna di sinistra non fosse visibile basterà attivare il menù Visualizza – Gestione Progetti.
E’ utile notare che il riquadro gestione progetti si divide nell’insieme dei documenti aperti nella applicazione e nelle relative proprietà degli stessi.
In particolare un file di Excel contiene una cartella di lavoro e tre fogli di lavoro. Ognuno di questi oggetti viene nominato in modo diverso nella gestione progetti di VBA.
Questo concetto è legato anche al fatto che nella strutturazione della cartella di lavoro ThisWorkbook contiene i tre fogli.
Come prima prova apriamo il codice relativo a foglio1 cliccando due volte su foglio1 e scriviamo:

Sub cambia_nome()
Foglio1.Name = "Bilancio"
End Sub

In questo caso questa semplice macro cambia il nome al foglio1. Abbiamo richiamato una proprietà dell’oggetto foglio di Excel e abbiamo rinominato mediante programma in “Bilancio”.
Da questa prima macro alcuni spunti:
Sub indica l’inizio di un programma con un nume assegnato dall’utente; End Sub termina il programma.
All’interno del costrutto Sub .. End Sub inseriamo le istruzioni di programma.
Complichiamo un po’ la macro e proviamo a chiedere all’utente il nome del foglio il codice da scrivere è:

Sub cambia_nome()
Foglio1.Name = Inputbox(“Dammi il nome del foglio”)
End Sub

In questo caso viene chiesto all’utente mediante una finestra di dialogo e digitiamo il nome del foglio che vogliamo dare.
Abbiamo introdotto l’istruzione Inputbox che permette di richiedere tramite finestra di dialogo il nome del foglio e in generale un Input.
Se vogliamo inserire dei dati nel foglio1 basterà scrivere

Sub cambia_nome_inserisci()
Foglio1.Name = Inputbox(“Dammi il nome del foglio”)
Cells(1,1)=inputbox(“Dammi il nome”)
Cells(1,2)=inputbox(“Dammi il cognome”)
Cells(1,3)=inputbox(“Dammi il reddito”)
End Sub

L’esecuzione di questa nuova macro

Non tiene conto dei formati opportuni che si devono definire. La proprietà cells intercetta la cella con coordinate riga colonna.
La forma corretta è:

Nome_foglio.Cells(Riga,Colonna)=valore
Si noti l’assenza del nome del foglio nella nostra macro possibile poiché stiamo operando nella macro all’interno della porzione di foglio1. Se invece scriviamo un modulo allora si dovrà citare anche il nome del foglio.

Impostare le proprietà di cella

Come è ovvio anche Cells è un oggetto che ha delle proprietà.
La proprietà Numberformat permette di impostare il contenuto delle celle ai formati opportuni,
Ad esempio

Cells(1, 3).NumberFormat = "€ 0,00"

Questa istruzione aggiunta alla macro permette dalla cella C1 di impostare il formato Valuta Euro.
La proprietà per inserire testo deve essere:

Cells(1,1).NumberFormat = “ @".

Gestione dell’Input e Output mediante finestra di dialogo

Abbiamo visto che per la gestione dell’input si possono utilizzare le finestre di dialogo nel che si richiama in VBA mediante l’istruzione
Input Box(“messaggio”, “titolo della finestra”, “valore predefinito” )
Ove titolo rappresenta il titolo da visualizzare nella finestra e valore predefinito il valore che sarà dato come input.
Per l’output si può utilizzare la Msgbox che ha una sintassi similare

Stringa=Msgbox(“messaggio”,tipo finestra,”titolo”)

dove stringa è un valore ove catturare l’output, tipo rappresenta il tipo di finestra di dialogo:

VbOkfinestra Ok, Annulla;
vbaboutfinestra OK.

Solo per citare alcuni esempi.
Vediamo come utilizzare la Message Box.

Sub cambia_nome_inserisci()
Foglio1.Name = InputBox("Dammi il nome del foglio", "Domanda ?", "contabile")
Cells(1, 1) = InputBox("Dammi il nome")
Cells(1, 2) = InputBox("Dammi il cognome")
Cells(1, 3) = InputBox("Dammi il reddito")
Cells(1, 3).NumberFormat = "€ 0,00"
stringa = MsgBox("Reddito e anagrafica", vbabout, "messaggio")
End Sub

Ecco il listato macro che permette di visualizzare dopo una serie di operazioni un messaggio.

Salvataggio con nome della cartella via macro

Per salvare una cartella di lavoro basterà nella macro aggiungere
ThisWorkbook.SaveAs ("es.xls")
dove come detto prima ThisWorkBook è la cartella di lavoro, mentre all’interno della proprietà SaveAs è indicato il nome del file senza specificare però la cartella di destinazione. In questo caso Excel salverà il lavoro nella cartella predefinita dell’applicazione.