L'Oggetto Userform

Storico discussioni

Oggetti UserForm di Magicshark
Eh già, sono ancora io. Stavolta ho letto attentamente la guida, ma non ho trovato soluzione. Ho costruito alcuni UserForm assegnando loro dei nomi (es: FrmStart). In quasi tutti questi UserForm sono presenti i pulsanti Indietro e Avanti che permettono di spostarsi tra i vari UserForm. Vorrei cambiare in maniera dinamica il form che fanno partire i pulsanti di Avanti e Indietro. Ho pensato allora di dichiarare

Public FrmForward As UserForm

come variabile generica a cui assegnare tramite script diversi UserForm per poter poi scrivere nei pulsanti

FrmForward.Show

Il Problema è che non riesco a linkare la variabile all'oggetto userForm. Ho provato con

Set FrmFroward =
Set FrmFroward = New
FrmFroward =
Dim FrmFroward As New

Ma niente da fare. Che dite?

di Mauro
Da quello che capisco tu vuoi assegnare delle Userform che hai creato ad una variabile oggetto Userform? Mi è oscuro il motivo. Ad ogni modo:
L'oggetto UserForm è un tipo di dati Object. È possibile dichiarare variabili come tipo UserForm prima di impostare le variabili su un'istanza di un tipo di UserForm dichiarato in fase di progettazione. In modo analogo, è possibile passare un argomento a una routine come tipo UserForm. È possibile creare più istanze di form nel codice utilizzando la parola chiave New in istruzioni Dim, Set e Static.
Quindi dopo avere creato una Userform di nome Form1, in un modulo di codice inserisci:
Sub prova()
Dim prova As UserForm
Set prova = New Form1
End Sub

Cognolato Studio © 2005