Hi,I added a custom colour code taken from Microsoft however the colours seem to sometimes repeat themselves so you can't know if the colour is for issue x or issue y etc.What can be done to fix this?ThanksPrivate colorPalette As String() = {"Green", "Blue", "Red", "Orange", "Aqua", "Teal", "Gold", "RoyalBlue", "MistyRose", "LightGreen", "LemonChiffon", "LightSteelBlue", "#F1E7D6", "#E16C56", "#CFBA9B"} Private count As Integer = 0 Private mapping As New System.Collections.Hashtable() Public Function GetColor(ByVal groupingValue As String) As String If mapping.ContainsKey(groupingValue) Then Return mapping(groupingValue) End If Dim c As String = colorPalette(count Mod colorPalette.Length) count = count + 1 mapping.Add(groupingValue, c) Return c End Function
Whisky-my beloved dog who died suddenly on the 29/06/06-I miss u so much.