Buon Giorno a Tutti mi chiamo Maurizio , Vi scrivo in quanto vorrei risolvere questo problemino , il Discorso e questo :
Sù di un Foglio di Excel ho Creato un tracciato che va dalla cella ( A5 ) alla Cella ( M16 ) all'interno di ogni Cella ho inserito dei Numeri che si Ripetono tra di loro e che non superano mai il Numero 16 .
Per qui in questo tracciato ci potranno essere Tre ( 10 ) come Sette ( 2 ) ecc...!
Ora io Per trovare le Suddette Corrisondenze ho inserito all'interno di un pulsante questo Codice :
If Range("N1").Value = "1" Then
Range("M1").FormulaR1C1 = "A5:M16"
c = Formula & "=Testo(A5:M16,""1"")=""A"""
End If
For Each c In Range("A5:M16")
If c = Range("N1") Then c.Interior.ColorIndex = 6
Next c
Che non dice altro che il Numero che Imposto nella Cella N1 si Debba trovare tali corispondenze all'interno del mio tracciato e le Evidenzi di Giallo ; E fino a qui nulla di problematico .
Ora il mio problema stà in questo : io Vorrei che ad ogni cella Trovata con il mio Numero da me Voluto e inserito nella cella ( N1 ) Venga tramutata in una Lettera Pre Definita da me , come ad Esempio :
Sè io nella Cella ( N1 ) immettio il Numero 5 , e con il mio Programmino vado a Selezionare tutti i Numeri 5 che sono all'interno del mio tracciato ; Questi cinque Numeri Dovrebbero a sua Volta tramutarsi nella lettara ( A ) o ( B ) che sia !
E possibile tutto ciò , Sperando Vivamente di Essere stato abbastanza chiaro , Vi porgo come sempre i miei più Sinceri saluti da A. Maurizio