copia incolla codice vba

descrizione delle fasi operative per uso di codice e immagine fornite
per creare programma vba
(attivando le brevi e semplici presentazioni fornite, appare il messaggio che avvisa l'utente
di eventuali possibili pericoli , trattandosi di file creati con vba su powerpoint
ma dotati di estensione .exe: è sempre possibile invece copiare e incollare
il codice fornito e usarlo come sotto indicato).

codice fornito , da copiare e incollare (vedi anche immagine per descrizione oggetti da creare)

Private Sub attivare_Click()
Dim n, quadrato, cubo As Integer
n = numero1 'inserire numero in casella numero1
quadrato = n * n ' calcolare il quadrato di n
cubo = quadrato * n 'calcolare il cubo di n
Rem visualizzare i risultati nella listbox stampa
stampa.AddItem ("numero= " & n & " quadrato= " & quadrato & " cubo = " & cubo)
End Sub

nel codice si vede che sono presenti tre oggetti:pulsante(attivare),textbox(numero1)
listbox(stampa):vanno creati e modificati da utente ,come sotto indicato
due etichette(label) appaiono nella immagine(vanno create e volendo modificate)
ma non compaiono nel codice (sono solo fonte di informazione per utente)

1-aprire PowerPoint
2-Inserisci nuova diapositiva
3-selezionare diapositva vuota
4-eliminare la prima comparsa
5-selezionare Visual Basic Editor
6-inserisci Userform:appare form
7-visualizza-casella strumenti
8-creare oggetti richiesti:es.
  1 pulsante:commandbutton1
  3 label1
  1 listbox1
  1 casella di testo textbox1
9-possibile inserire testo in pulsante,label
  formattare (dimensionare, colore ecc.agendo
  su proprietà)
10-visualizza codice:incollare codice copiato
   (confrontare nomi e oggetti presenti nella
    immagine fornita e nel codice:apportare
    eventuali necessarie modifiche)
11-esegui-esegui sub-userform
12-salvare presentazione con nome.ppt 

9-possibile inserire testo in pulsante,label
formattare (dimensionare, colore ecc.agendo su proprietà)

10-visualizza codice:incollare codice copiato
(confrontare nomi e oggetti presenti nella
immagine fornita e nel codice:apportare eventuali necessarie modifiche)

11-esegui-esegui sub-userform

per vedere programma attivato legenda.ppt