Macro Cambio font nelle celle



  • Macro - Cambio font nelle celle
    di Codename data: 26/04/2016 12:29:58

    Gentile comunità,
    scrivo a nome di un amico per ricevere, se possibile, il vostro aiuto per realizzare una macro in excel.
    Sostanzialmente è stato realizzato un'applicazione con excel, nella quale si possono inserire vari dati mediante delle finestre con bottoni.
    C'è una tabella in cui andranno messi dei dati standard, selezionati dall'utente che usa l'applicazione.
    In breve, per questione di "formattazione" e lettura dei caratteri nella tabella, come si scrive una macro che:

    - se inserisco dei caratteri singoli es:(1, 0, U, 2) me li inserisce in automatico in formato 10, cosi da essere leggermenti piu grandi e leggibili nella tabella;
    - se inserisco invece caratteri uniti es:(PAD, UMAP, SE) me li inserisce in automatico in formato 8, cosi entrano bene nelle caselle.

    Questo tipo di "controllo" dovrebbe essere automatico per tutte le caselle del foglio, con riconoscimento automatico di quello che sto inserendo.

    Vi ringrazio in anticipo per la disponibilità e mi scuso se sono stato prolisso.

    A presto



  • di patel data: 26/04/2016 12:52:27

    allega un file di esempio





  • di alfrimpa data: 26/04/2016 13:40:25

    In attesa del file di esempio la macro che vedi sotto (da inserire nel modulo del foglio interessato) potrebbe essere un'ipotesi di soluzione.

    Alfredo
     
    Private Sub Worksheet_Change(ByVal Target As Range)
    If Len(Target) = 1 Then
        Target.Font.Size = 8
        Else
        Target.Font.Size = 10
    End If
    End Sub
    






  • di Codename data: 26/04/2016 15:46:58

    Vi ringrazio per le risposte celeri, sto aspettando i file per mail cosi da poterli allegare. Per ora invio il codice di Alfredo per testarlo.

    Grazie ancora, vi farò sapere presto.



  • di alfrimpa data: 26/04/2016 15:51:38

    Ma hai provato la macro che ti ho scritto su un file vuoto?

    Se si funziona come ti aspetti oppure no?.

    Se funziona correttamente lo farà anche su tuo file.

    Alfredo





  • di Codename data: 26/04/2016 18:51:12

    Ciao Alfredo, ho provato il codice in un foglio vuoto e funziona perfettamente.

    Di nuovo grazie mille.