I'm not sure how this could be done though i'm pretty sure its going to require some VBA instead of conditional formatting. I would like cell B2 to have background colour red for 10 seconds after cell A1 is edited. So every time A1 is edited B2 will change colour for 10 seconds and then back to original formating.
View 4 RepliesHere is what I am trying to do in lay terms:
If A2 and B2 on Sheet("Master") are not highlighted, copy and paste them into Cell A3 and B3 on Sheet("Job List - Numeric"). Do this up to Row 50 on Sheet("Job List - Numeric"). Once Row 50 is filled, jump to pasting to D3 and E3 on Sheet("Job List - Numeric") and continue up to Row 50 and so on....
I need to do this on one sheet in numerical order based upon Column A and another sheet in alphabetical order based upon Column B.
Here is what I have in code so far:
Sub Final()
Application.ScreenUpdating = False
Dim c As Integer
Dim x As Integer
For Row = 2 To 145
Range(ActiveCell, Cells(ActiveCell.Row, ActiveCell.Column + 1)).Select
[Code] .......
Basically I am trying to work out the impact of a limited time offer (say 6 months) which offers customers a discount on their phone bill for a period of time (say 12 months).
I'm getting stuck on the formula (if there is one!?) which takes into account the fact the build up and then roll off of customers - i.e. in month 14 the customers that signed up in the first 2 months will no longer benefit from the discount. I have attached a spreadsheet which hopefully illustrates this a bit better!
Marginal revenue.xlsx
This code help me in typing the date and time in any cell of column (B) automatically just in case I enter somthing in any adjacent cell of column (A)
View 6 Replies View RelatedI have one excel file which I plan to send to other person. But I need this file to be openable/valid by this person just 20 days after first opening of the file.
After 20 days this person will not be able to open the file any more.
im using a vba macro to open a workbook and bring values into specified cells in the current workbook.... however when i do this its changing the cell formatting and then the info is coming up as dates instead of how it should look, is there a way to stop this? here is my code....
Dim wb As Workbook
Application.ScreenUpdating = False ' turn off the screen updating
'On Error GoTo error1
Dim RunNum As String
RunNum = Range("N9").Value
Set wb = Workbooks.Open("X:FrontEndChip FabFacet CoatingFinished Eddy Runs" & RunNum & ".csv")
With ThisWorkbook.Worksheets("Sheet2")
.Range("C3").Value = wb.Worksheets(RunNum).Range("C3").Value 'run#
.Range("G3").Value = wb.Worksheets(RunNum).Range("G3").Value 'Date
.Range("J3").Value = wb.Worksheets(RunNum).Range("J3").Value 'Operator(s)..................
NOTE* the info being read into the worksheet looks like this 12-2 or 10-1 or 12-12 but if it would stay as TEXT like i have it set to instead of changing itself to date format it would work just fine
I have an area of a spreadsheet that I want to "disappear" when a particular option button is selected. I can make the text go away, but part of that area has cells that are formatted differently than the surrounding cells. I would like to change the cell background color, text color, and border setting. How would the syntax read?
View 5 Replies View RelatedHow to copy and paste conditional formatting with our changing the cell values. My first row of data starts in row 4 and here is what I have in D4
If D4 is less than or equal to AA4, AW4, BS4, CO4 then it will highlight D4
Now I want to copy that format and paste it for all rows in column D. The problem I'm having though is when I paste the formula it doesn't change to match the row I'm on. For example, when I paste it in D5 this is what I get
If D5 is less than or equal to AA4, AW4, BS4, CO4 then it will highlight D5
How do I paste it so that it will update to show AA5, AW5, BS5, and CO5. I want to be able to do this for 500 rows.
I have an Excel 2003 spreadsheet used to calculate doses of medication. The value of several cells will depend on what optionbuttons the user selects.
I have entered the first two lines of code below w/o a problem to make certain calculations that are displayed in the specified cells.
I then tried to make an additional calculation to display in cell 6,9, but it always triggers a "Application-defined or object-defined error". For troubleshooting purposes, I moved that line of code directly under the other two lines of similar code that I know work, and simplified the problem line to just arbitrarily set the value of the cell to a value of 2 (instead of the actual formula); it still triggers the error.
I am trying to chart data from a single cell that is changing over time. The cell is linked to another software program that provides its value. I would like to be able to chart the changes in its value either every time it changes or on some time interval (i.e. every 3 minutes).
View 9 Replies View RelatedCan i put into the cells B38-AF38, that would display the sum of B20:AF20 + B24:AF24 + B28:AF28 + B32:AF32 +B36:AF36 in a h:mm format.
When imputing the data into a cell in a h:mm format, I need it to display in that cell and formula bar the h:mm format without having to put an apostrophe in front of "h" or ":mm" value. Once complete, this form is going to go to other trainers to use on their computers and I dont think they would remember to keep putting an apostrophe before the data.
Example:
B20= 1:15 (1h15m) NOT 1:15:00 AM
B24= :30 (30min)
B28= :45 (45min)
B32= 1:45 (1h45m) NOT 1:45:00 AM
B38= 4:15 (4h15min)
I have attached a copy of the form for better clarification.
It doesnt seem to be complicated, but it's certainly a lot more than I thought.
I'm a average excel user, i know my way around it and kow common and basic formulee, VB isnt a strong point, but i am willing to attemp anything for this, let me explain
Lets say in colum A I have a list of items, in colum B i have a check box, currently the check box is red, if i tpye a x it turns green due to conditional formating. That works fine...onto the problem...
Lets say in colum A i have my items but they are repeated...eg A1, A145, A166, A122 are all the same item, what i want is regardless of where i place the x each check box under coloum B either gets a X and turns green, or just turns green, i dont mind...
I dont think conditional formatting can cut this, though i may be wrong. Ive tried to use the IF function under condtional formatting but ran into problems...
I have a spreadsheet that uses VB macros to calculate sums of cells based on the font color of the numbers inside. It used to be fairly easy going through each cell and "classifying" them by color, so that my macros can go ahead and sum the numbers in each respective color's cell... but now I have a huge amount of numbers and would like to automate the process somewhat. Here's an example using the A and B columns:
flight $400
hotel $150
hotel $130
meal $20
meal $15
flight $350
I tried using conditional formatting to automatically change the color of the adjacent cells based on the presence of a keyword such as "flight" or "hotel", but this change is only cosmetic, and doesn't actually change the font color (it is still the default black, hence why my color-summing macros won't work!).
I'm including a sample macro for what I use to color-sum my cells, but what I am looking to automate the color-coding process based on looking for keywords as explained above in my example. Here is one of the working color-summing macros (for red, in this case) if you'd like to use it as a reference:
Function SumRed(SelectedCells As Range)
' Adds the values of the cells where the font colour is red(3).
Dim Cell As Object
Dim x As Double
[Code] ...........
I have a Macro 'Timenow' to give current time in a Cell of MS Excel, but then it changes all Cell values of sheet where the macro was used.
Sub Timenow()
'
' Timenow Macro
' Keyboard Shortcut: Ctrl+b
ActiveCell.FormulaR1C1 = "=NOW()"
Selection.NumberFormat = "h:mm"
Range("F5").Select
End Sub
Even assigning value to variable does not work:
Sub Timenow()
' Timenow Macro
' Keyboard Shortcut: Ctrl+b
Dim TN As String
TN = Format("=now()", "h:mm")
ActiveCell.Value = TN
End Sub
how to restrict the macro to change the value of current/active cell only without effecting other cell values?
I am looking too limit a cell too only contain 5 or 7 characters.
I can limit too one length, i.e. just 7, using the data validation function.
I understand the following code finds and selects the last empty cell in column A
Range("A65536").End(xlUp).Offset(1, 0).Select
I am looking for a way to find last empty cell withing a specifice range of cells in column A. Example, I want to loop through from A6 to A16, find the last empty cell and fill it up.
formatting the date and time together in one cell. I copy the date and time from another program and I'm pasting it into a single cell within Excell. This is was the date and time looks like from the other program. 2013-09-03 03:20:30.0 I need it to look like this in Excel in a single cell. September 3, 2013 3:20 AM
View 4 Replies View RelatedIn A1 I have 35 min elapsed time and need to change it to time as a portion of an hour. It reads the 35 min as TIME, therefore I am currently using
=IF(A1>=0.5,A1-0.5,A1)*24. Output is .58, which is perfect.
(output column formatted as a number)
Likewise 3:28 becomes 3.47.
I would like to use Conditional Formatting to format a cell depending whether it past a certain time, such as 3:45 PM. Naturally, entering the time as the condition does not work. Is there a way to do this?
View 5 Replies View RelatedI am using the following formula on Excel 2010 in conditional formatting
=$D5=VLOOKUP($B5,'Approved Master OLD'!$B:$BC,3,0)=FALSE
However I am trying to apply this to a whole column but the numbers are not (D5,B5) moving down (to D6,B6), When I use the format painter it is taking too long as I can only merge conditional formatting on one cell at a time and I have 30 colums and 390 rows to apply this formatting to.
We have a spreadsheet that is sent to a manager weekly. The manager takes the sheets from 30+ individuals and copies all into a single workbook that is then distributed to a very large audience and reviewed weekly. In this workbook, I have created drop downs with conditional formatting - Low = Green, Medium = Yellow, Critical = Red. On the original workbook, this formatting works great, however, after the manager consolidates and redistributes all worksheets the Green shows Gray, Yellow is OK and Red shows Black.
View 2 Replies View RelatedThere is a table [A8 TO D60] and a column alongside, where the months of the year are listed. In a particular independent cell, the name of any month can be chosen and entered.
The table rows preceding the chosen month, have to be shaded. When a different month is chosen, the shading should now cover the new set of rows preceding this different month and so on.
My VBA code should post the formula "=IF($B6=""Store URL"",TRUE,FALSE)" into the conditional formatting formula box but everytime it pastes something different, such as "=IF($B11="Store URL",TRUE,FALSE)"
The full code is:
Sheet1.Select
Set ConditionalFormattingRange = ActiveSheet.Range("B6:F505")
ConditionalFormattingRange.FormatConditions.delete
[Code].....
This may have been answered on here but can not seem to find it. My situation is I have values in A1,A2 & A3 that are like counter reading so the value is always changing. What I am looking to do is change the cell color if one of the values is over 500 from the other two values. Say A1 is 3000, A2 is 3250 and A3 is 3500. I would like the cell for A3 to change color.
View 2 Replies View RelatedI've been given some data and the date column is formatted as 'general'. If I amend it to the date format I prefer and click ok nothing changes. If I then click in the cell and press enter it changes the format to what I want. Is there anyway of refreshing all the cells so the format change takes effect?
I can achieve what i'm after by using find and replace to change '2012' to '2012' and '2013' to '2013' but i'd be interested to know whether there is a more recognised solution?
I have an array that refers to a range of values:
Dim vtimeheader As Variant
vtimeheader = Worksheets("output").Range("e4:xfd4").Value
(1) I now want to delete all values in the array
(2) I want to apply the format "General" to all the cells in the array
I would like to change the number format of a cell in function of the value of another cell. For example, if A1=1, then I would like the cell A2 to be displayed as a percentage. If A1=2, then would like the cell A2 to be displayed as a number.
View 4 Replies View RelatedLook at spreadsheet, calculating time off.
My problems are in columns (k) total amount of days off, (l) weekday days off, and (m) weekend days off
Columns n & o are the results that my employers computer delivers on that amount of time off!
I have provided at the end off my spreadsheet data, some info on the rules that govern how this is calculated.
I am trying to enter 00:00:00.031, but it is changing it to 00:00.0. Can someone please tell me how to stop it from doing that?
View 9 Replies View RelatedI have a horizontal bar chart in which some of the bars represent positive values and others represent negative values.
How to format the bars so the "positive" bars are shaded in one colour and "negative" bars in another colour? I'd prefer not to change the bar colour manually as the values change frequently.