ComboBox con controllo dati.

Salve, un piccolo aiutino per favore,
Nel File allegato, nel foglio1 ho una tabella che si popola dall'UserForm2, mentre nel foglio2 tramite la UserForm1 con una ComboBox
devo inserire il Valore della Combo nella colonna 8...
ho realizzato una routine che mi trova la cella vuota, me la seleziona e mi inserisce il valore della Combo, ma non capisco perchè mi va in errore, dopo che mi inserisce comunque il valore, e poi vorrei che appena seleziono il valore dalla Combo, una routine mi controlli e mi segnalasse con un MSGBox che il valore esiste già.
Spero di essere stato chiaro.
Grazie cmq.
G.

Buona giornata, @Leccese62;
ho dato uno sguardo al Tuo File e, relativamente a "UserForm1", ho riscontrato alcune incongruenze.
Cercando di attivarlo tramite il Pulsante "Inserisce Contratto" UserForm1 non viene attivato in quanto il Codice VBA "Trova_Celle_Localita" cerca una Cella vuota nel Range.
- Cells(8,3), Cells(8,30)
In questo Range non ci sono Celle Vuote:
987654321 8400012456 789456123 123456789 741852963 x x x x x x x x x x x x x x x x x x x x x x x
Qundi no si attiverà mai.

Supponiamo di togliere la "x" in Cella "H8"; a questo punto UserForm1 si attiva e il cursore si posiziona in Cella "H8".

Ora, veniamo al problema che lamenti.
Questo dipende dall'Evento:
- CommandButton2_Click
Questo Evento si occupa di:
- Copiare il N° del Contratto selezionato nella Cella attiva
- Azzerare il contenuto di ComboBox1, TextBox1, TextBox2, TextBox3, TextBox4
- Chiudere UserForm1 (UserForm1.Hide)
Il problema che genera l'errore è proprio nell'azzeramento di ComboBox1; questo attiva l'evento "ComboBox1_Change" che, non trovando alcun Valore nelle Colonne di ComboBox1, genera l'errore '381'

Quello che mi permetto di consigliarti è di modicare l'Evento ComboBox1_Change in"


Dovrebbe funzionare.



A disposizione.

Buon fine settimana.

Giuseppe

ciao a tutti
prendo 2 piccioni con una fava e

primo saluto Giuseppe



secondo, per Leccese,
segnalo di essere ancora in attesa di riscontro a QUESTA discussione.

Saluti,
Frank

Buon pomrriggio, Frank;
un caro saluto.

Per il mancato riscontro, bastava dire che la soluzine proposta non rispecchiava la richiesta, nessun problema, @Leccese62 è già andato a popolare il "nutrito elenco" degli utenti (u minuscolo!) che, considerando Forum non come una piattaforma di confronto ma come uno strumento gratuito per risolvere i loro piccoli problemi, in futuro non meriteneranno un mio ulteriole intervento.


Buon Fine settimana, Frank, Spero tutto bene.

Giuseppe

Ringrazio Giuseppe, per l'aiuto, ancora non ho avuto tempo di verificare, ma sicuramente è la soluzione giusta...
Ci tengo poi a precisare a Frank, che il sottoscritto, non sfrutta affatto il Forum per la soluzione dei Piccoli problemi, anzi è proprio il contrario, in altri Forum di diversi applicativi.
Se il Sig. Frank si è sentito leso per quello che si aspettava e che non è arrivato, dovrebbe imparare ad avere SOLO un pò di pazienza e capire che probabilmente la gente oltre che a divertirsi con Excel e le formule potrebbe anche fare altro nella vita.
Il Forum è un momento to di Discussione e di confronto, che "dovrebbe" aiutare tutti a crescere, anche mentalmente, ma a quanto pare, questa qualità non è per tutti.
Le conoscenze di Giuseppe hanno fatto in modo che io capissi il mio Errore, e quindi di crescere, indipendentemente dal postare un progetto finito, dove difficilmente uno riesce a capire il funzionamento di una Routine senza le dovute Spiegazioni.
Probabilmente in questo Forum sarò un utente con la (u) minuscola, ma io nella vita sono un uomo con la (U) maiuscola, e non un Leone da tastiera...
A Presto

Leccese62, 25/04/2020 15:12:

---

Probabilmente in questo Forum sarò un utente con la (u) minuscola, ma io nella vita sono un uomo con la (U) maiuscola, e non un Leone da tastiera...
A Presto

---

Complimenti!!!

Caro il mio Leccese,
un uomo con la U, avrebbe risposto educatamente e prima, che gli venisse
sollecitato......

Io ho solo segnalato che non avevo e non ho tutt'ora,
ancora ricevuto risposta.

tanimon, 25/04/2020 11:51:

---

ciao a tutti
prendo 2 piccioni con una fava e

primo saluto Giuseppe

secondo, per Leccese,
segnalo di essere ancora in attesa di riscontro a QUESTA discussione.

Saluti,
Frank

---

Ti segnalo che non sono stato io ad innervosirti e ti invito a leggere con attenzione!

Leccese62, 25/04/2020 15:12:

---

Ci tengo poi a precisare a Frank, che il sottoscritto, non sfrutta affatto il Forum per la soluzione dei Piccoli problemi, anzi è proprio il contrario, in altri Forum di diversi applicativi.

---

GiuseppeMN, 25/04/2020 13:28:

---

@Leccese62 è già andato a popolare il "nutrito elenco" degli utenti (u minuscolo!) che, considerando Forum non come una piattaforma di confronto ma come uno strumento gratuito per risolvere i loro piccoli problemi, in futuro non meriteneranno un mio ulteriole intervento.

---

Io invece,
sono una gazzella da tastiera ed ho parecchio da fare nella vita, non per ultimo quello di scappare il più lontano possibile dai Leoni come te, che in quanto Leoni hanno la coda, e chissà di cosa è fatta.....

Leccese62, 25/04/2020 15:12:

---

A Presto

---

ADDIO!!!!