Finalmente ci sono riuscito...l'unica cosa ke nn riesco ad impostare è il colore della colonna mi spiego
Ho creato un array contenente dei colori, questi tramite una funzione casuale (ke nn so fare)devo mettere questi colori alle colonne delle tabelle....ho scritto un po di codice
Dim range As Range
Dim colori As String
colori = "Color;Aqua;Brown;Coral;Cyan;Green"
Dim arrayColori As Array
arrayColori = Split(colori, ";")
While color < UBound(arrayColori)
'e gli do un nome
range = sht.Cells(j + 2, i + 1)
range.Font.Bold = True
range.Font.Size = 10
range.Font.Color = arrayColori(i)
end while
l'unica cosa ke nn mi funziona è il codice range.Font.Color = arrayColori(i) che cmq io voglio prendere i colori in maniera casuale....
grazie e ciaooooo