Corso VBA Excel ITA - 116 - Progetto gestionale - Aggiungere ed eliminare prodotti

[@francescosedita6938]

Buona Pasqua

[@NickTheGeek]

Grazie altrettanto a te.

[@mauriziobertagna3095]

Ciao Nick, sempre molto interessanti i tuoi video. Anch'io avrei un suggerimento che è molto marginale e probabilmente solo estetico; aggiungerei alla txt Descrizione, l'inserzione automatica della prima lettera maiuscola che grammaticamente è sempre appropriata. Private Sub txtDescrizione_Change() If txtDescrizione "" Then txtDescrizione = StrConv(txtDescrizione, vbProperCase) End Sub Un saluto e una Buona Pasqua a te

[@NickTheGeek]

Ciao Maurizio. Sono d'accordo sulla prima lettera maiuscola, ma se mi ricordo bene il vbProperCase mette la maiuscola ad ogni nuova parola, quindi per la descrizione lascerei che sia l'utente a occuparsene. Grazie per gli auguri e buona Pasqua anche a te.

[@mauriziobertagna3095]

@@NickTheGeek Hai ragione, a me funzionava bene perché mettevo sempre o la parola test oppure prova e funzionava benissimo, ma effettivamente mettendole entrambe, vengono scritte tutte maiuscole. Come vedi ho ancora molto da imparare! Ma ce la farò! Ciao e grazie ancora.

[@NickTheGeek]

Gran parte del lavoro di programmazione consiste nel fare test, purtroppo non si può mai dare niente per scontato, e me ne sono accorto in prima persona sviluppando questo progettino finale! Però la tua idea è buona, utilizzerei quindi le funzioni Left e Right per scrivere maiuscola solo la prima lettera della TextBox: Private Sub txtDescrizione_Change() If txtDescrizione.Value "" Then txtDescrizione.Value = UCase(Left(txtDescrizione.Value, 1)) & LCase(Right(txtDescrizione.Value, Len(txtDescrizione.Value) - 1)) End Sub In pratica concateno la prima lettera scritta in maiuscolo e tutto il resto scritto in minuscolo; per il LCase uso la funzione Right utilizzando come secondo parametro la lunghezza della stringa meno uno, in modo da prendere tutto tranne la prima lettera.

[@mauriziobertagna3095]

@@NickTheGeek Grazie mille, sempre molto disponibile. Ciao

[@luciopollicita360]

Ciao Nick. Suggerimento: dopo aver disabilitato un prodotto ed aver fatto la modifica dei due campi nella listbox ("Fine validità" e "Attivo") penso che sarebbe opportuno disattivare i pulsanti "Gestisci prodotto" e "Elimina prodotto" dato che rimane evidenziata la riga del prodotto ormai "eliminato". Comunque sempre interessanti ed appassionanti i tuoi video. Complimenti. Ciao

[@NickTheGeek]

Ciao Lucio, grazie per i complimenti e per il suggerimento. In effetti come l'ho fatto è incompleto, quindi o si disabilitano i tasti come hai detto tu, o si scarica e si ricarica direttamente la userform (Unload/Show), così si evita anche di modificare a mano i valori delle ultime 2 colonne della listbox.

[@luciopollicita360]

@@NickTheGeek Grande Nick. Buona Pasqua.

[@NickTheGeek]

Grazie, buona Pasqua a te.