Using Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) I can execute code when values in the cell change, but it can't check if the foreground or background color changes. What event can detect this? If no event can, is there any way at all?
Found this, I will look into this loop: Capturing cell color change in VBA
How to detect a change in a spreadsheet, but how do i etermine on which cell the change happened?
Basically, I need something like this, if in the range of b1:b30 a cell is changed by the user, let say B??, then change or modify (via a subroutine) cell A??.
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
'
' detect which cell in the range b1:b30 changed
' then modify the cell to the right (or left) of the changed cell
'
End Sub
Is there a way to detect a change of pages in a Multipage form, i.e. is there a change event that is triggered when a user goes from page 1 to page 2? If there is, what does the code look like?
View 5 Replies View RelatedIn my Excel 2003 worksheet, I need the row color to automatically change to blue (color 5) (bgcolor = #0000FF) - when the user changes the text from VALID to INVALID in the range: B3:B65000.
For example:
Cell B5 contains the text: VALID
When the user changes the text in the field to read: INVALID - then I need the row range: A5:W5 to change to the color blue.
I would like to be able to change the color of a cell in V4:AB31 and have the formula in AM10:AM13 automatically calculate the new result. As it is now the user has to press Ctrl ALT f9 for the formula to recalculate.
View 7 Replies View RelatedI have two columns. The first one (A) contains cells that have different Fill colors. The second column (B) contains text adjacent to the colored cells. I am trying to change the color of the text in the second column (B) to the corresponding color in the adjacent cell in the first column (A). I don't think conditional formating works well in this situation. I believe the solution would be some sort of macro.
View 3 Replies View RelatedI have font color white in blank cells in column E and I (from row 5 to row 245) so the visitors will not see the text. If any of these cells become yellow (color code is 6), the font color will become black so visitors can see the text alot far better than white. I've tried this code myself after this post but nothing happen
View 4 Replies View RelatedI have various row cells in column (F) filled with the color Green. And corresponding text in Column G. How can I change the text of that particular row to white.
i.e.: if any cell in column F is Green, change the text color of that row in Column G to white?
an event macro to change the font colour of a cell whose value changes as a result of a calculation.
View 9 Replies View RelatedI have a drop down sub pasted to worksheet:
Private Sub ComboBox1_Change()
ComboBox1.List = Array(100, 200, 300, 400)
If Range("I11").Value < Range("N11").Value Then
If Sheets("Profile").Range("K18").Value < ComboBox1.Value Then
Range("I11").Interior.ColorIndex = 2
Else
Range("I11").Interior.ColorIndex = 3
End If
End If
End Sub
I want it to change the cell color on drop down change. How can I modify things to have the change in drop down selection?
What I would like to do is to have the color of a tab change as the dependant upon the value of one or more cells.
View 9 Replies View RelatedTry to find a way to automatically change the color of a row, based in changing the name in column A.
I tried conditional formatting but the name (or dates) in column A are not the same (always other and other).
I failed to adapt any VBA CODE (found in GOOGLE) because column A varies a lot.
Annex a photo and an excel example.
EXAMPLE FORUM HELP.jpg
EXAMPLE 1.xlsx
What formula do i use if i want the text in cell A1 to change to red if any entry is made in cell B1.
View 2 Replies View RelatedI am having some color problems. From A2:AB2000 I have different fill colors for cells all over the place. The only color I need is the color purple which I believe is the color “39”.
So basically all cells except the cells with the color purple change to white from A2:AB2000. I would like to add this code to the macro I have already created.
I have a given som (general) range where I would like a function to change the background color of every second row in a visual basic function.
One could of course just loop through it and use the mod function, but I think there has to be something quicker.
I know about conditional formatting, but it is something I need to use over and over again on Ranges that will differ in size so I would like it to be a function I can just run as part of a sub.
I keep recording this macro, but the problem I run into is that the active sheet is always the specific name of the sheet. I need a general name so that the macro will work on any given sheet. On the sheet I am viewing, I simply want to change the tab color to black using a macro.
View 2 Replies View RelatedI'm trying to create a spreadsheet with columns a, b, c, and d. "a" always has a value and I want columns c and d to change to a's color when they are given values. if "b" has a value when the data for c and d is entered, i want them to take b's color instead. The part I don't know how to do is that if i decide to give "b" a value, I don't want "c" or "d" to change colors if they already have values. e.g. if only a has a value when i give one to c, c will take a's color, but then if i give b a value then d, i want d to take b's color and c to retain a's color.
View 14 Replies View RelatedI'm trying to put together a script which changes the color of the row in columns A:AE if any cell in the Range B7:B400 has the value of 'No'. If it has the value of 'Yes' I would like it to Exit Sub.
I've put together the code below to try an create this function, but I'm running into a few problems.
Code:
If Intersect(Target, Range("B7:B400")) Is Nothing Then Exit Sub
If Selection.Cells.Count > 1 Then Exit Sub
If Target "No" Then[code]....
When the value of any cell in Range B7:B400 is 'Yes' the row changes to grey, if I enter 'No' it removes all cell shading from the row, and I'm not very clear on what changes I need to make.
I am in need of a way to change the color of text in a cell to red if that cell contains a dollar sign ($) and if it dosen't contain a dollar sign ($) for the text to be black. I want this to happen automatically without having to run a macro, is this possible?
View 9 Replies View RelatedI've got some spread sheets that I send out. People fill them out and send them back to me. The only problem is that I dont know which cells they've changed and which cells they've left. Is thier a way to tell VB to change the color of a cell if the value has changed
View 9 Replies View RelatedI have to check a cell to see if ti has a date in it, if so , then i have to check the current date to another cell, if the current date is greater then that cell i want to change the color of the cell
When I click on a button I would like an option to cancel a row range of cells by turning the writing red with a cross through it.
So if I wanted to cancel a certain row of data I would click on a button, enter the range of cells to cancel and then this would turn all of the writing in the cells to red colour with a strike through the words.
try explaning this again....Also conditional formatting will not work...
Looking for a formula in excel to do this---
I have a lottery numbers system in the 3 digit and 4 digit
numbers...In row A we have the 3 digit that were drawn about
3000 ---3 digit numbers and in row C we have also 3000 numbers
for the 4 digit ....All we need to do is Highlight All the
even numbers and make them RED font---in the 3 and 4 digit rows...
Is there a way to do that?????
A--row-----C--row
123---------4429--make the 2red in the 3 digit row and 442red
in the 4 digit row.
033---------5579--nothing in this row
229---------2200---etc....
I would like to address this:
If cell in column1 is filled (.Interior.ColorIndex = 15) then font color is 0 in any cell of that row.
(right now the color is red and I cannot change this at the source but will have to add a sheet change event maybe)
i need to add this in a macro that i previously created
here is what i need, i hope its clear for everyone to understand
I want to be able to change a color of a row to purple if a cell is greater than 5 days
so basically what i need is something like this
IF BQ1 has the data "APPROVED" and data in BP1 is 01/04/10 and BN1 is blank and if BN1 is blank after 5 days of BP1 then the color of this row changes to purple
I use the "custom header&footer", and I want to to change the color of font, but I don't finde this choice!
View 9 Replies View RelatedI need to change the color of that part of the excel that shows the name of the worksheet(the location where it's writeen "Plan 1"[I don't know what's the name in english]). How can I do that?
View 8 Replies View RelatedI want to change the row color after the value in one of the cells equals a certain value. What is the best/easiest way to accomplish this?
View 9 Replies View RelatedI have a workbook with multiple sheets and a different number of command buttons per sheet. How can I create a loop to color these command buttons? I have been successful at changing the size of the command buttons but not the color. The commandbutton is grouped with a chart.
Dim grp As Shape
stp = ThisWorkbook.Sheets.Count
strt = stp - 2
For a = strt To stp
b = 0
For Each grp In Sheets(a).Shapes
Sheets(a).Activate
Range("A1").Select
grp.Select
Selection.ShapeRange.GroupItems(6).Top = 100 'works
Selection.ShapeRange.GroupItems(6).BackColor = vbBlack 'doesn't work
Next grp
Next a
I've made this function to know the value of the color of the cell:
Function WhatColor(rango As Range)
Condicional = rango.FormatConditions.Count
If Condicional > 0 Then
WhatColor = rango.FormatConditions(1).Interior.ColorIndex
Else
WhatColor = rango.Interior.ColorIndex
End If
End Function
and its works, but when I change the color via conditional formatting, the value is not update, I have to go to the cell, press F2 and hit enter to get the value updated, I mean, I need to do a kind of refresh to get the value of the conditinal format.
