Risultati da 1 a 20 di 20

Discussione: Formattazione celle con lettere maiuscole



  1. #1
    L'avatar di nick0573
    Clicca e Apri
    Data Registrazione
    Jun 2015
    LocalitÓ
    Pistoia
    EtÓ
    47
    Messaggi
    1290
    Versione Office
    Excel 2016
    Likes ricevuti
    25
    Likes dati
    19

    Formattazione celle con lettere maiuscole

    Ciao Ragazzi!!!!!

    Come posso formattare una cella, ad esempio in A1 che quando scrivo una lettera o una qualsiasi parola mi venga scritta sempre
    in maiuscolo

    Grazie!!!

  2. #2

    L'avatar di ges
    Clicca e Apri
    Data Registrazione
    Jun 2015
    LocalitÓ
    Como
    EtÓ
    54
    Messaggi
    10081
    Versione Office
    2011MAC 2016WIN
    Likes ricevuti
    2584
    Likes dati
    1554
    Se tu vuoi scrivere in A1 e quello che scrivi vuoi che si trasformi "automaticamente" non lo puoi fare con le formule ma solo con il VBA; se invece vuoi che quello che hai scritto in A1 si trasformi in maiuscolo in un'altra cella (es. B1) puoi usale in B1 la formula =MAIUSC(A1)

  3. #3
    L'avatar di nick0573
    Clicca e Apri
    Data Registrazione
    Jun 2015
    LocalitÓ
    Pistoia
    EtÓ
    47
    Messaggi
    1290
    Versione Office
    Excel 2016
    Likes ricevuti
    25
    Likes dati
    19
    Si la formula testo con la maiuscola la conosco

    ci vorrebbe una formula in Vba

    Grazie!!!!!!

  4. #4

    L'avatar di ges
    Clicca e Apri
    Data Registrazione
    Jun 2015
    LocalitÓ
    Como
    EtÓ
    54
    Messaggi
    10081
    Versione Office
    2011MAC 2016WIN
    Likes ricevuti
    2584
    Likes dati
    1554
    Ho trovato questo codice e pare che funziona (non Ŕ per˛ farina del mio sacco, non me ne intendo vba):

    Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Value = "" Then
    ExitSub
    Else
    Target.Value = UCase(Target.Value)
    EndIf
    EndSub



  5. #5
    L'avatar di nick0573
    Clicca e Apri
    Data Registrazione
    Jun 2015
    LocalitÓ
    Pistoia
    EtÓ
    47
    Messaggi
    1290
    Versione Office
    Excel 2016
    Likes ricevuti
    25
    Likes dati
    19
    scusa ignoranza mia ma come faccio a inserire questa formula in visual basic
    e sulle celle che voglio io???????????

  6. #6

    L'avatar di scossa
    Clicca e Apri
    Data Registrazione
    Jul 2015
    LocalitÓ
    Verona Provincia
    EtÓ
    58
    Messaggi
    1212
    Versione Office
    .
    Likes ricevuti
    457
    Likes dati
    0
    Citazione Originariamente Scritto da ges Visualizza Messaggio
    Ho trovato questo codice e pare che funziona (non Ŕ per˛ farina del mio sacco, non me ne intendo vba):
    Codice: 
    Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Value = "" Then
    ExitSub
    Else
    Target.Value = UCase(Target.Value)
    EndIf
    EndSub
    

    Attenzione, l'istruzione Target.Value = UCase(Target.Value) scatena nuovamente l'evento _Change() entrando in un loop ricorsivo (96 ricorsioni della sub di evento)

    Meglio, quindi, prima disabilitare gli eventi:

    Codice: 
    Private Sub Worksheet_Change(ByVal Target As Range)
    
    
      With Target
        If .Value <> "" Then
          Application.EnableEvents = False
          .Value = UCase(.Value)
          Application.EnableEvents = True
        End If
      End With
      
    End Sub
    Poi sarebbe anche il caso di stabilire se questa "conversione" deve essere applicata a tutte le celle o solo ad alcune (ad esempio solo una colonna od un "rettangolo" di celle ben preciso).
    Bye!
    scossa
    scossa's web site
    ___
    Se tu hai una mela, e 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)

  7. #7
    L'avatar di nick0573
    Clicca e Apri
    Data Registrazione
    Jun 2015
    LocalitÓ
    Pistoia
    EtÓ
    47
    Messaggi
    1290
    Versione Office
    Excel 2016
    Likes ricevuti
    25
    Likes dati
    19
    Solo alla riga B6:AF6

  8. #8

    L'avatar di ges
    Clicca e Apri
    Data Registrazione
    Jun 2015
    LocalitÓ
    Como
    EtÓ
    54
    Messaggi
    10081
    Versione Office
    2011MAC 2016WIN
    Likes ricevuti
    2584
    Likes dati
    1554
    Ecco scossa, guru di excel, ti ha dato le giuste dritte .... dovr˛ decidermi di imparare almeno qualcosa di questo codice! :256:

  9. #9

    L'avatar di scossa
    Clicca e Apri
    Data Registrazione
    Jul 2015
    LocalitÓ
    Verona Provincia
    EtÓ
    58
    Messaggi
    1212
    Versione Office
    .
    Likes ricevuti
    457
    Likes dati
    0
    Citazione Originariamente Scritto da nick0573 Visualizza Messaggio
    Solo alla riga B6:AF6
    Codice: 
    Private Sub Worksheet_Change(ByVal Target As Range)
    
    
      If Not Intersect(Target, Me.Range("B6:AF6")) Is Nothing Then
        With Target
          If .Value <> "" Then
            Application.EnableEvents = False
            .Value = UCase(.Value)
            Application.EnableEvents = True
          End If
        End With
      End If
      
    End Sub


    excel dove e come inserire il codice visual basic
    Ultima modifica fatta da:scossa; 24/07/15 alle 10:15 Motivo: dove inserire il codice
    Bye!
    scossa
    scossa's web site
    ___
    Se tu hai una mela, e 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)

  10. #10
    L'avatar di nick0573
    Clicca e Apri
    Data Registrazione
    Jun 2015
    LocalitÓ
    Pistoia
    EtÓ
    47
    Messaggi
    1290
    Versione Office
    Excel 2016
    Likes ricevuti
    25
    Likes dati
    19
    Sei esperto di macro Vba Scossa???
    perche senno ti dovrei chiedere un aiuto!!!!!!!!

  11. #11
    L'avatar di nick0573
    Clicca e Apri
    Data Registrazione
    Jun 2015
    LocalitÓ
    Pistoia
    EtÓ
    47
    Messaggi
    1290
    Versione Office
    Excel 2016
    Likes ricevuti
    25
    Likes dati
    19
    Ho provato ma non mi funziona la macro in Vba

  12. #12
    L'avatar di nick0573
    Clicca e Apri
    Data Registrazione
    Jun 2015
    LocalitÓ
    Pistoia
    EtÓ
    47
    Messaggi
    1290
    Versione Office
    Excel 2016
    Likes ricevuti
    25
    Likes dati
    19
    mi correggo ce lho fatta ha inserire la macro grazie scossa

    :87:_

  13. #13
    L'avatar di keope68
    Clicca e Apri
    Data Registrazione
    Feb 2017
    LocalitÓ
    italia
    Messaggi
    10
    Versione Office
    2007
    Likes ricevuti
    0
    Likes dati
    3

    Re: Formattazione celle con lettere maiuscole

    Buongiorno

    Ho inserito la macro in un foglio excel e funziona correttamente , ma se inserisco una riga intera nel foglio oppure elimino una riga intera mi genera un errore runtime 13 , come posso risolvere questo problema ?

    grazie

  14. #14

    L'avatar di alfrimpa
    Clicca e Apri
    Data Registrazione
    Dec 2015
    LocalitÓ
    Napoli
    EtÓ
    64
    Messaggi
    9786
    Versione Office
    2013
    Likes ricevuti
    1017
    Likes dati
    274

    Re: Formattazione celle con lettere maiuscole

    Keope68 perchÚ ti sei accodato ad una discussione che non c'entra nulla con il tuo problema?

    Apri una nuova discussione allegando il tuo file con la macro e spiega nei dettagli il problema.

    Poi, visto che sei nuovo, ti invito a dare un'attenta lettura del regolamento del forum e dare uno sguardo agli annunci dello Staff.
    Alfredo

    "Non esistono cose facili o difficili; esistono cose che si sanno e cose che non si sanno"

    "Solo due cose sono infinite: l'universo e la stupiditÓ umana; riguardo l'universo ho ancora dei dubbi" (Albert Einstein)

  15. #15
    L'avatar di Skappa
    Clicca e Apri
    Data Registrazione
    Feb 2018
    LocalitÓ
    Grosseto
    Messaggi
    52
    Versione Office
    2010
    Likes ricevuti
    1

    Re: Formattazione celle con lettere maiuscole

    Citazione Originariamente Scritto da scossa Visualizza Messaggio
    Codice: 
    Private Sub Worksheet_Change(ByVal Target As Range)
    
    
      If Not Intersect(Target, Me.Range("B6:AF6")) Is Nothing Then
        With Target
          If .Value <> "" Then
            Application.EnableEvents = False
            .Value = UCase(.Value)
            Application.EnableEvents = True
          End If
        End With
      End If
      
    End Sub


    excel dove e come inserire il codice visual basic
    Ho inserito il codice e funziona perfettamente ma nel momento in cui cancello il valore mi restituisce un errore di Debug.

    qualcuno ha suggerito di implementare quanto segue:

    Private Sub Worksheet_Change(ByVal Target As Range)

    If Target.Value = "" Then
    Exit Sub
    Else

    Target.Value = UCase(Target.Value) 'tutto maiuscolo
    'Target.Value = LCase(Target.Value) 'tutto minuscolo
    'Target.Value = Application.WorksheetFunction.Proper(Target.Value) 'iniziale maiuscola
    End If
    End Sub

    ma io non ci sono riuscito, non ne capisco granchŔ di VBA.

    Oltretutto c'Ŕ il modo di legare in modo dinamico il range dell'intervallo
    Me.Range("B6:AF6")? In modo che se venissero aggiunte delle righe al di sopra di tale intervallo il codice continui a funzionare sulle celle spostate. (E' forse il caso di aprire una nuova discussione per tale quesito?)

    Grazie

  16. #16
    L'avatar di Skappa
    Clicca e Apri
    Data Registrazione
    Feb 2018
    LocalitÓ
    Grosseto
    Messaggi
    52
    Versione Office
    2010
    Likes ricevuti
    1

    Re: Formattazione celle con lettere maiuscole

    Citazione Originariamente Scritto da scossa Visualizza Messaggio
    Codice: 
    Private Sub Worksheet_Change(ByVal Target As Range)
    
    
      If Not Intersect(Target, Me.Range("B6:AF6")) Is Nothing Then
        With Target
          If .Value <> "" Then
            Application.EnableEvents = False
            .Value = UCase(.Value)
            Application.EnableEvents = True
          End If
        End With
      End If
      
    End Sub


    excel dove e come inserire il codice visual basic
    Ho inserito il codice e funziona perfettamente ma nel momento in cui cancello il valore mi restituisce un errore di Debug.

    qualcuno ha suggerito di implementare quanto segue:

    Private Sub Worksheet_Change(ByVal Target As Range)

    If Target.Value = "" Then
    Exit Sub
    Else

    Target.Value = UCase(Target.Value) 'tutto maiuscolo
    'Target.Value = LCase(Target.Value) 'tutto minuscolo
    'Target.Value = Application.WorksheetFunction.Proper(Target.Value) 'iniziale maiuscola
    End If
    End Sub

    ma io non ci sono riuscito, non ne capisco granchŔ di VBA.

    Oltretutto c'Ŕ il modo di legare in modo dinamico il range dell'intervallo
    Me.Range("B6:AF6")? In modo che se venissero aggiunte delle righe al di sopra di tale intervallo il codice continui a funzionare sulle celle spostate. (E' forse il caso di aprire una nuova discussione per tale quesito?)

    Grazie

  17. #17
    L'avatar di gibra
    Clicca e Apri
    Data Registrazione
    Feb 2018
    LocalitÓ
    Vicenza - Italy
    Messaggi
    745
    Versione Office
    Office 2013 pro
    Likes ricevuti
    184
    Likes dati
    26

    Re: Formattazione celle con lettere maiuscole

    Questa discussione Ŕ diventata un porto di mare: tutti ci approdano la loro barca!

    Giorgio
    vbcorner.net

  18. #18

    L'avatar di alfrimpa
    Clicca e Apri
    Data Registrazione
    Dec 2015
    LocalitÓ
    Napoli
    EtÓ
    64
    Messaggi
    9786
    Versione Office
    2013
    Likes ricevuti
    1017
    Likes dati
    274

    Re: Formattazione celle con lettere maiuscole

    @Skappa

    E dire che te lo eri anche chiesto.

    Apri una nuova discussione con file e spiegazioni.
    Alfredo

    "Non esistono cose facili o difficili; esistono cose che si sanno e cose che non si sanno"

    "Solo due cose sono infinite: l'universo e la stupiditÓ umana; riguardo l'universo ho ancora dei dubbi" (Albert Einstein)

  19. #19
    L'avatar di locate
    Clicca e Apri
    Data Registrazione
    Oct 2016
    LocalitÓ
    locate varesino
    EtÓ
    70
    Messaggi
    248
    Versione Office
    excel 2007/13
    Likes ricevuti
    106
    Likes dati
    1

    Re: Formattazione celle con lettere maiuscole

    ciao

    ciao Alfredo dato che come detto e' diventato un porto di mare mettiamo anche una modifica alla sub() con righe variabili

    io per convenienza ho messo il riferimento di riga alla colonna A ma puo essere una qualsiasi colonna ZZ con una celle in linea
    a quella che dobbiamo trasformare
    in partenza ho valutato la cella A3 inserendo una ( x ) come riscontro dopo ho messo e tolto righe al di sopra di queste creando
    un riscontro di Row variabile

    allego file con inserita la sub()

    ciao da locate
    excel 2007/13
    File Allegati File Allegati

  20. #20
    L'avatar di Skappa
    Clicca e Apri
    Data Registrazione
    Feb 2018
    LocalitÓ
    Grosseto
    Messaggi
    52
    Versione Office
    2010
    Likes ricevuti
    1

    Re: Formattazione celle con lettere maiuscole

    Citazione Originariamente Scritto da locate Visualizza Messaggio
    ciao

    ciao Alfredo dato che come detto e' diventato un porto di mare mettiamo anche una modifica alla sub() con righe variabili

    io per convenienza ho messo il riferimento di riga alla colonna A ma puo essere una qualsiasi colonna ZZ con una celle in linea
    a quella che dobbiamo trasformare
    in partenza ho valutato la cella A3 inserendo una ( x ) come riscontro dopo ho messo e tolto righe al di sopra di queste creando
    un riscontro di Row variabile

    allego file con inserita la sub()

    ciao da locate
    excel 2007/13

    Hops... sorry se ho approdato nel porto sbagliato. Per fortuna anche su questo molo ho incontrato un buon uomo che ha avuto pietÓ di un povero vagabondo

    Grazie mille LOCATE la tua soluzione Ŕ perfetta e non restituisce alcun errore.

    ciao a tutti

Discussioni Simili

  1. Convalida dati con distinzione tra maiuscole e minuscole
    Di GabrieleJax nel forum Domande su Excel in generale
    Risposte: 3
    Ultimo Messaggio: 23/03/17, 11:09
  2. [Risolto] Cognome e Nome iniziali maiuscole
    Di Mammut65 nel forum Domande su Excel VBA e MACRO
    Risposte: 6
    Ultimo Messaggio: 11/11/16, 16:24
  3. formattazione condizionale su pi¨ celle
    Di filipp0 nel forum Domande su Excel in generale
    Risposte: 4
    Ultimo Messaggio: 27/01/16, 09:21
  4. formattazione condizionale a celle alterne
    Di Gianfranco55 nel forum Domande su Excel VBA e MACRO
    Risposte: 13
    Ultimo Messaggio: 12/12/15, 12:13
  5. Formattazione e protezione celle
    Di fabiocaffo nel forum Domande su Excel in generale
    Risposte: 4
    Ultimo Messaggio: 11/12/15, 14:28

Permessi di Scrittura

  • Tu non puoi inviare nuove discussioni
  • Tu non puoi inviare risposte
  • Tu non puoi inviare allegati
  • Tu non puoi modificare i tuoi messaggi
  •