Attivare 2 userform

Hai un problema con Excel?

Nuova discussione

Attivare 2 userform
di Patri (utente non iscritto) data: 24/09/2015 00:07:33
Ciao a tutti,
sono molto principiante su VBA ! Ho provato a creare un file Excel con due Userform distinte, attivate con due pulsanti diversi. La prima si apre benissimo invece la seconda non si visualizza ma addirittura blocca il file stesso tanto che devo forzarne la chiusura. Non capisco e non sono capace di risolvere il problema !
Potete cortesemente aiutarmi ?
Grazie mille in anticipo,
Patrizia

Prima Userform (funziona), attivazione con pulsante:
Sub InputDati_Click()
    Sheets("Records").Visible = True
    Sheets("Records").Select
    Range("A1").Select
Load frmInputdati
frmInputdati.Show
End Sub

Seconda Userform (NON funziona), attivazione con altro pulsante:
Sub Giroconto_Click()
    Sheets("Records").Visible = True
    Sheets("Records").Select
    Range("A1").Select
Load frmGiroconto
frmGiroconto.Show
End Sub

Le userform iniziano ambedue con:

Sub Userform_Initialize()
Load frmInputdati
etc.

Sub Userform_Initialize()
Load frmGiroconto 
etc.

di Albatros54 data: 24/09/2015 06:40:01
prova ad eliminare la riga di codice sotto

Sub Userform_Initialize()
Load frmInputdati <<======Elimina
etc.

Sub Userform_Initialize()
Load frmGiroconto <<======Elimina
etc.

attivare 2 userform
di Patri (utente non iscritto) data: 24/09/2015 09:59:49
Grazie mille per la risposta.
Ho inserito l'istruzione Load in più, spinta dalla "disperazione" ma anche in precedenza la seconda Userform non si attivava.
Vorrei allegare il file ma non so come si fa.
Grazie per un ulteriore aiuto che vorrete darmi.
Buona giornata, Patrizia
di Albatros54 data: 24/09/2015 11:07:19
in alto a DX allega file.
Ciao
Albatros
di Ste.cla (utente non iscritto) data: 24/09/2015 13:05:35
Ciao, non sono un grandissimo esperto, ma quando mi è capitato di dover legare userform a comandi, nel codice attivato dal comando, scrivevo semplicemente nomeuserform.show, senza fare il load. Forse basta questo. Se no vai in visual basic e prova a debuggare il codice del secondo comando... così vedi qual'è la riga di codice che lo manda in blocco.

Spero di esserti stato utile.

Stefano
Attivare 2 userform
di Patri (utente non iscritto) data: 24/09/2015 14:43:07
Grazie a entrambi per l'attenzione !
Ho allegato il file.
Nel foglio Cmdroom (Command Room), il pulsante Input Dati funziona benissimo, quando clicco il pulsante Giroconto, tutto il file si blocca.
Ovviamente nel file i valori esposti sono fittizi !!
Poche risate... per favore quando leggerete i codici, come dicevo sono molto principiante e alcune istruzioni le ho trovate su Internet.
Comunque mi sono divertita molto a costruire il file e mi piace molto studiare il VBA.
Grazie ancora per l'aiuto che mi darete e spero che il file, concettualmente, vi piaccia.
Patrizia
di Cucù data: 24/09/2015 15:40:29
funziona tutto perfettamente
hai impostato i valori Top e Left della tua userform al di fuori dello schermo...percui viene caricata ma tu non la vedi
prova a inserire top = 1 e left = 1 e vedrai!
Cucù
di Albatros54 data: 24/09/2015 15:57:17
forse è meglio che setta la proprieta , StartUpPosition,nella casella delle proprieta a a 1-CenterOwner.
Ciao
albatros54
di totygno71 data: 24/09/2015 16:34:15
@ albatros
Perché é meglio?
di Cucù data: 24/09/2015 17:52:23
@Albatros
il mio suggerimento era per far capire dove fosse l'errore, ovvio che poi ognuno sceglie la posizione che più gli aggrada!
Cucù
di Albatros54 data: 24/09/2015 18:29:59
Perchè lasciando nella finestra delle proprieta StartUpPosition su manual e impostando il valore Top =1 Width =1
la userform si presenta come una striscia a Sx dello schermo.
Lasciando i valori di Top=-1513,5 e Width =504,75 e settando StartUpPositon su CenterOwner, la userform si visualizza
a centro dello schermo, ecco perchè ho consigliato questi parametri.
Ciao
Albatros54
di Cucù data: 24/09/2015 18:35:13
ehm...
io ho scritto
"prova a inserire top = 1 e left = 1 e vedrai!"
e non
"Top =1 Width =1 "
di Albatros54 data: 24/09/2015 18:38:07
Ho letto male Io

di scossa data: 24/09/2015 20:49:39
cit. Cucù: "funziona tutto perfettamente "

Io su quel "tutto" avrei qualche dubbio: basta provare a compilare il progetto per rendersi conto che non tutto è a posto (l'inesistente Me.txtNote, la doppia dichiarazione Dim newRow As Long, etc....)

scossa's web site

Se tu hai una mela, ed io ho una mela, e ce le scambiamo, allora tu ed io abbiamo sempre una mela per uno. Ma se tu hai un'idea, ed io ho un'idea, e ce le scambiamo, allora abbiamo entrambi due idee. (George Bernard Shaw)

di Cucù data: 24/09/2015 20:53:13
@ scossa
Il mio commento, ovviamente, era relativo solo al problema sollevato dall'utente... e non sono entrato nel merito di tutto il codice visto che non era richiesto.
Cucù
attivare 2 userform
di Patri (utente non iscritto) data: 25/09/2015 09:53:40
Grazie a tutti,
Ho cambiato i parametri e finalmente vedo la seconda Userform (grazie per la correzione) ma Scossa ha ragione, non funziona comunque.
Mi rendo conto che ho "pasticciato" copiando le istruzioni dalla prima Userform. Per il txtNote rimedio subito.
Ho inserito la doppia dichiarazione "Dim newRow As Long" perché la Userform Giroconto deve scrivere su due righe: prima riga Da Accounts etc., nuova riga A Accounts, etc.
Posso provare a creare due userform per il Giroconto, una che scrive Da Accounts e una che scrive A Accounts.
Ma ci potrebbe essere un'istruzione unica per utilizzare solo una Userform ?
Grazie a tutti per i suggerimenti... non vorrei essere però troppo "rompiscatole" !!
Patrizia
attivare 2 userform
di Patri (utente non iscritto) data: 25/09/2015 10:23:56
PS.: considerando il commento di Cucù "Il mio commento, ovviamente, era relativo solo al problema sollevato dall'utente... e non sono entrato nel merito di tutto il codice visto che non era richiesto", chiedo troppo se qualcuno potesse dare un'occhiata a tutto il codice e dirmi dove sbaglio ?
Grazie ancora tutti per la disponibilità,
Patrizia
di Cucù data: 25/09/2015 10:54:52
Io credo che il tuo problema relativo alle userform sia stato risolto quindi credo sia più corretto aprire una nuova discussione in cui specifichi quale è il tuo nuovo problema.
Cucù
Attivare 2 userform
di Patri (utente non iscritto) data: 25/09/2015 15:19:17
Su invito di Cucù ritengo risolto il problema della Userform che non veniva visualizzata.
Scusate, sono nuova del forum.
Se posso, apro una nuova discussione su come inserire due records con una sola userform.
Grazie a tutti.
Patrizia

Vuoi Approfondire?