I have created a column chart and am now trying to change the colour of one
of the bars. Here is the code I am using:
With chtChart
ActiveChart.SeriesCollection(1).Points(2).Select
With Selection.Interior
.ColorIndex = 3
.Pattern = xlSolid
End With
End With
I'm attempting to write a code that will change the colour of a series in a chart based on the name of each series. i.e. I have Roads, Water and Rail as three of my series names. can i somehow assign the colours yellow, blue and red to these series using macro code.
View 5 Replies View RelatedI have a spread sheet with various tick boxes, that when ticked calculate an accumulative percentage in a cell. This cell is the basis of my graph. e.g. if the cell displays 80% - the chart with show 80% - simple.
however, I want to write a vba code that changes the fill colour of the chart depending on the percentage.
i.e. if the percentage data = 0-49% I wish the chart to display as red. 50-69% - yellow and 70%+ = green.
I have a stacked area chart located on its own individual worksheet. I would like to use VBA to apply colours to individual series based on the name of that series. I have applied the following code which I found on the following help forum, changing it slightly to fit my needs: http://www.ozgrid.com/forum/showthread.php?t=91381
View 3 Replies View RelatedI would like it to loop through all the charts on the "Graphs" sheet.
It works well but gives a "Run-time error '1004'" Application-defined or object-defined error afterward that I would like to get rid off.
VB:
Sub Colour_Chart_working()
Dim rngColors As Range
Dim rngCell As Range
[Code].....
I have a problem relating to a bar chart that I just can't get around. I have Excel 2003. My problem is this. I have created an attendance record sheet for members of a club. The sheet records attendances for two separate events which occur a week apart every month. The names of the members are shown vertically in one column. Multiple parallel columns then follow in which members' attendances are recorded. At the top of the sheet, at the head of each attendance column, are two headings, one on top of the other. The first of these is the date, and the second is the attendance rate shown as a percentage. I can generate a bar chart alright from these two headings. My problem is that I want some way of showing the two different events every month as two different colours, event one in red and event two in blue, so that they will stand out. So far the chart will only let me show everything in one colour.
View 9 Replies View RelatedI have a bar chart which compares two columns of data. the data in one column is fixed to 100. the data in the other column varies. a third column states whether each entry is "A" or "M". Is there a way to include the A or M on the bar chart? Perhaps by having a set colour whether the data is A or M?
View 1 Replies View RelatedHow do i conditionally colour chart data points. This is an example of my data from which the chart is created from.
Salesman A 10
Salesman B 10
US Total 20
Salesman C 20
Salesman D 10
Philipines Total 30
When the chart is created, i would like the country total data points to be in orange while the rest of the data points should remain in white. I tried this code and it returned me an error.
ActiveChart.SeriesCollection("Average of Margin").Points("ID Total").Select
With Selection.Interior
.ColorIndex = 36
.Pattern = xlSolid
End With
I also tried the online F1 help it told me to use Points(Index). However i do not want to refer to the ponint with an index as the number of salesman or country could change. Therefore changing the index points.
How do I write a bar chart which reads the format of a cell instead of the content? ie I want to count how many cells in each column are amber. Amber cells have already been decided by conditional formatting.
See demo attached : bar chart demo.xlsx
I am using a bar graph and would like conditional formatting for a series collection. So if the series collection is greater than 30%, the single entry (not the whole series) would turn red. I have attached an image of what I currently have. There is a data validation list at the top which tells the graph what series to use, so the data is always changing.
I hope this all makes sense. Basically, if an entry is above 30%, I want the single entry in the series to turn red.
I want to draw a chart in Excel, in X axis Dates and in Y axis some other data. The dates which fall Saturday and Sunday will show in RED colour. Other dates will show in default colour.
View 7 Replies View Relatedcondition: the cell in row K and row L can only have value 0 or 1
if cell in the column K & columb L = 1
then both cell is green colour
if cell in the column k column L
then both cell is red colour?
taking example if k1=L1 =1 then is both green colour
if k1 =1 and L1 = 0 then both are red colour
I want to use a macro to change attributes of a series in a chart. Unbelievably, if the series has been pasted into the chart from another chart, and although the macro can address the series and even return values (eg name) correctly, the selection simply cycles to one of the original series on the chart.
View 3 Replies View RelatedI have developed a profit loss sheet for the office I work for. What i need is to have either cells change colour or the numbers in the cell change colour depening on the value in the cell.
What I was thinking is if the number is over 15% of the sale price the cell or number should be green, if the number is under 15% it should be black, and if its below 0% it will be red.
I am using Excel 2007. One of my worksheets has a dark border around some cells. Instead of being blue the lines are black. I used the right click and format cells option but it does not work.
View 10 Replies View RelatedI have this code but is not working, i need to make an ajustment to this as well as at present it will only change colour to 1 cell but i need it to format the whole line, this is what i have so far
View 5 Replies View RelatedI dont have that great knowledge in Excel but i wanted to try and run a
macro in an IF formula but realised that was not possible. I have now got a
formula that gives a value in a cell when i want the whole row to turn to
red, but im not sure how i can get a macro that will change the whole row to
red when that cell shows a value. Can anyone help on this matter?
I am tyring to do conditional formatting whereby if anything is entered in a cell i want the colour to change to say yellow and if nothing is entered just to leave blank.
View 9 Replies View RelatedI'm looking for some code to change a cell's fill colour
eg. by selecting an individual cell in a range, say A1, the colour of a cell, say K1, in a corresponding range changes to yellow
or if I select multiple cells, say A1:A9, the colour of cells K1:K9 change to yellow
the VBA to change to colour of a shape based upon the value in a cell?
e.g. if cell "a1" = 10 then colour circle red
I want to change the font colour in row J7:J299 if there is perticular word say "Double" in row J.
How can you change the colour of a cell (A1) using that number
eg
1=red2=orange3=white4=light blue5=Blue12345
OR
Make the cell with numbers above 0 go red and all cells with numbers below 0 go blue
I have been trying to make it so that an autoshape changes colour according to the value of a particular cell but every time I run the macro the shape is black and I cannot work out why. The code is -
Private Sub CommandButton1_Click()
Dim X As Integer
X = Range("H5").Value
With Sheets("Sheet 1").Shapes("Rectangle 1").Select
Select Case X
Case Is > 0:
Selection.ShapeRange.Fill.ForeColor.RGB = 2
Case Is < 0:
Selection.ShapeRange.Fill.ForeColor.RGB = 3
Case Else:
Selection.ShapeRange.Fill.ForeColor.RGB = 1
End Select
End With
UserForm2.Hide
End Sub
The company I work for has its own set of standard colours to be used in all documents. I've set the colours up in the colour palette using the below sub (x's are actually numbers):
Sub SetCompanyColours()
ActiveWorkbook.Colors(9) = RGB(x, x, x)
ActiveWorkbook.Colors(46) = RGB(x, x, x)
ActiveWorkbook.Colors(12) = RGB(x, x, x)
ActiveWorkbook.Colors(10) = RGB(x, x, x)
ActiveWorkbook.Colors(14) = RGB(x, x, x)
ActiveWorkbook.Colors(5) = RGB(x, x, x)
ActiveWorkbook.Colors(47) = RGB(x, x, x)
ActiveWorkbook.Colors(16) = RGB(x, x, x)
End Sub
I want to distribute this round to my workmates. Problem is that, if they set the colours in the workbook using the above sub, the workbook colours will be all wrong when clients open them on their computer. How do I get around this. I have thought about programmatically copying the sub into the open event of the activeworkbook. I've looked through this website, http://www.cpearson.com/excel/vbe.htm, but it doesn't explain how to copy code to the workbook events part of a vba project, only to a new module
I want to change the back ground colour of each row until G column when there is a text in the first cell. I have attached the excel that I want the background colour to be. Like suppose, F1 is the details of family 1, F2 is for family 2. I want each family to be coloured. The rows are not fixed for each family. If F1 details are coloured green, Fr is orange, F3 is green and F4 is orange again. And the number F1, F2, F3, F4 and so on are not ordered in ascending. They can be random. But I want the colour coding to be the same as what I have shown in the excel. I have so many rows like that. How do I do that using excel. I have tried conditional formatting. But it doesn't work.
View 2 Replies View RelatedI need to see easily if my cell is giving a value by using a SUM. This is so I can see if the SUM has been taken off or overridden by typing in a number.
View 4 Replies View RelatedIf A1 contains 'good' then row A = red
I need an entire row to change colour if a particular cell in that row contains one particular word.
I'm creating a simple spreadsheet totalling units of alcohol up. Is it possible to change the colour of the fornt when different values are reached? For example if a total of under 8 units is reached this is displayed in green, if over 8 the figure is shown in red.
View 4 Replies View RelatedIn cell A1 I have revenue projected & B1 I have actual revenue if the date in B1 is less than the date in A1, I would like B1 to change colour.
View 5 Replies View RelatedI am making a little Formula 1 Grand Prix spreadsheet, and would like to know how do i enter a number into a cell and the cell changes colour.
[Code] .....
So if i type when of these in a cell i want to to change to the colour corresponding to the chart.