Fill cell based on cell value
Use a worksheet change
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Application.Intersect(Target, Columns("B")) Is Nothing Then
Range("B1").Copy
Target.PasteSpecial (xlPasteFormats)
End If
End Sub
"Kesbutler" wrote:
I was wondering if there was a way to have column B automatically update as
data is updated? One week it might be less than and the next it might not.
"Kesbutler" wrote:
Thanks. Is there a way to have it automatically shade without having to
manually run the macro?
"Joel" wrote:
use paste special with format xlPasteFormats
Range("B1").Copy
Range("B1:B100").PasteSpecial(xlPasteFormats)
"Kesbutler" wrote:
I have a number in column A and a number in column B. If column B is less
than column A, I want to fill the cell with a color. I tried conditional
formatting but it won't let me apply the formatting to all the cells in
column B at one time, I have to do each cell individually. Is there a way
(macro, formula?) that I can apply this rule to the entire column?
Thanks!
|