Una famiglia di sistemi di gestione per database relazionali di Microsoft progettati per semplificare l'uso.
Ciao forse basta per ogni campo nelle proprietà formato inserire > e qualsiasi testo verrà convertito automaticamente in maiuscolo.
Questo browser non è più supportato.
Esegui l'aggiornamento a Microsoft Edge per sfruttare i vantaggi di funzionalità più recenti, aggiornamenti della sicurezza e supporto tecnico.
Win 10
Access '13
buongiorno,
nel mio DB ho una maschera dove inserire i dati ma gli utenti non tengono conto di scrivere tutti con caratteri maiuscoli i dati e così all'interno della tabella A mi ritrovo il nome e il cognome nelle combinazioni più svariate.
è possibile creare da codice al momento di salvare l'informazione nella tabella trasformarlo tutto in maiuscolo?
saluti
Ivan
Una famiglia di sistemi di gestione per database relazionali di Microsoft progettati per semplificare l'uso.
Domanda bloccata. Questa domanda è stata eseguita dalla community del supporto tecnico Microsoft. È possibile votare se è utile, ma non è possibile aggiungere commenti o risposte o seguire la domanda.
Ciao forse basta per ogni campo nelle proprietà formato inserire > e qualsiasi testo verrà convertito automaticamente in maiuscolo.
Domenico hai detto relativo alla funzione UCase():
"così risolvi solo la prima parola nel campo.
Immagina un Cognome o un Nome composto da più parole avresti sola la prima parola con l'iniziale maiuscola."
non è assolutamente vero, basta provare.
La funzione UCase() è molto più semplice in quanto basta passargli il testo da convertire in maiuscolo, non sservono altri parametri.
Ciao,
così risolvi solo la prima parola nel campo.
Immagina un Cognome o un Nome composto da più parole avresti sola la prima parola con l'iniziale maiuscola.
La strConv ti "maiuscola" tutte le parole nel campo.
Inoltre immagina un cognome del tipo D'Andrea
la presenza dell'apostrofo tutto si complica ulteriormente e in questo caso potresti usare
Me.Cognome = Replace(StrConv(Replace(Me.Cognome, "'", "' "), vbProperCase), "' ", "'")
Ciao Mimmo
ho risolto così:
Private Sub NomeCasellaTesto_Lost_Focus()
If NomeCasellaTesto.Text <> "" Then NomeCasellaTesto.Text = UCase(NomeCasellaTesto.Text)
end sub
Ciao Ivan,
guarda la funzione strconv con i diversi parametri.
Mimmo