Macro Cambio font nelle celle
Hai un problema con Excel? 
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.
Vuoi Approfondire?