Find Largest Number In A Range And Change Font To Bold
Jun 19, 2009
I need to create a macro that will examine a range of cells, for example D12:T12, find the cell with the largest number value in that range then set the font for that cell to bold (or red, or change the cell background color).
I'm trying to have a macro run to search a specific column (S) for a particular text value "y" and if true it will change the font to bold and the color to red for the entire row of the cell that contains the "y". the column is part of a data table that is constantly refreshed not sure if that makes a difference or not.
I have a large list of students (Col a,b) who do several sports (up to 10) each, which are arranged as sport name (Col c) followed by score (col d), repeated on pairs of columns for the other 9 sports.
I need a macro to find the 4 highest scoring sports for each student in turn and to highlight the score and sport cells. I have tried to find permutations using the LARGE function but I cannot see how I can do this.
I have huge sorting job in Excel.I have a excel file from each year.And I put these together to a huge excel file. And I need to track down the last activity if the customer is listed multiple times.I could just go through and delete the rows, but the last row.But, that takes a lot of time.
Format: Last activity (year only) - Customer number - Customer name
2010 - 1001 - Company A 2011 - 1001 - Company A 2012 - 1001 - Company A
how to create an if statement based on font properties.
I did a couple searches on "conditional formatting" but didn't find anything, and it seems like the only way would be through a macro, am i correct? I'd much rather be able to do this on a formula sheet if possible.
I am having some data running into 60 (C:BJ) columns and 200 rows. It is the record of dates query raised and answered with refernce to query number in the A coulmn. I have zero value as entry for the unused cells in this range due to some constraints. I need to find the smallest and the largest non-zero date in this range for analysis purpose. I plan to use the difference between these 2 dates to calculate turn around time for a query.
Problem is to find the smallest and the largest non zero date within range C6:BJ6 which would be used as input in the Networkdays formula.
I'm trying to find the largest number in a row and then have the column heading (text) as the result. I can find the largest number by using =max(numb1, numb2 ....) but then how do I get the heading of the column as the result. An example of what I want to happen is below
Red Green Blue Orange Yellow Result
2 4 3 6 1
[code]...
I anticipate an issue where 2 columns have the same largest number and not sure how to over come this either with multiple answers
I'm looking for a formula to enter within a particular cell which will return the largest number that appears within a range of cells, for example the range H:133 through L:136. If it's any easier, only one number will appear within the range, though it could appear in any cell within that range.
I am using this formula (Below) and it is working great. Only problem is that I want the client name to be be bold and font size 12, then I want it to highlight in Red. I also want the rows in colunm L to highlight in bright green.
Sub InputData() Dim varUserInput As Variant Dim LastRow As Integer
I have a set of data like below, I am trying to get a formula to look at a range i.e. May column and then select the highest number in that range but rather than returning the number returning the team name, is that possible? Not sure where to start...
I have a cell (lets say F4) with the formula "=A3" in it. In cell A3 is text that is partially italicized. I need a way for F4 to populate not only the text that is in A3 but also the font style.
I have attached an example file.. Basically I want the text in a range to change to red if one cell="Description".
Also, I want a cell's text to turn blue if it's corresponding data in the row says "Click on Title to Follow Link"
The example file explains it a lot better..
Thanks for the help.. Sorry if this may seem like a duplicate post but I was not able to get any of the examples I searched for to work that others have posted.. Also, maybe conditional formatting would be an option here but I could not get it to work as it will only meet the first condition that comes across thats true...
I have a spreadsheet that contains the 5 digit numbers in the rows and the columns respecstively. I'd like a formular or macro to change font color for each cell. If the combined value of the 5 rows are greater or less than the combined range 87030 and 87200, the 5 cells will be changed to Red. If:.........
I am working on a spreadsheet for work, and have managed to do everything I need to so far but I need to colour specific letter strings, certain colours within a range of cells (each letter string will only appear once on each sheet)
The strings I will be looking for vary depending on data entered so I will need to cell reference them
The strings that need colouring are in cells with other strings that must stay black (They cannot be separated from other strings due to the nature of the grid)
I need some strings red, some green, and some blue.
These changes should also apply to the whole workbook not just one sheet.
I have two conditions setup in Options>View - Zero Values.", "style="background: #FFFFFF;padding: 2px;font-size: 10px;width: 550px;"");' onmouseout='GAL_hidepopup();'>formatting.htm" target="_blank">conditional formatting. The first is setup for alternate row coloring with this formula inside Conditional Formatting:
Formula is = MOD(ROW(),2)
My Second Condition is
Cell Value is between $P$10 and $Q$10. This sets the font bold and a different color. The two cell values are two dates. I want to change the cells font color and bolding as long as the value is within that date range. It works fine, but for cells that are on the row that is colored the second condition doesn't apply for some reason.
the first time font.bold is set to true, it completes w/o error. The bolded line returns 'application defined or object defined error 1004'. Ive tried activating the new sheet immediately before setting bold (like the first time it gets set) but it still errors.
I am merging columns. Col B has all text in bold. Col C has all text in regular font. When I use ASAP to merge, the merged column comes out all bold. When I use a formula to merge the merged column comes out all regular. What I want is for the merged column to contain the bold text from Col B in bold, and the regular text from Col C in regular.
What I want is...
This is for service plan B: Take all data and transer to new server.
What I am getting is...
This is for service plan B:Take all data and transer to new server.
OR
This is for service plan B:Take all data and transer to new server.
I want to change the last 16 characters of a cell to bold and font color.
I have this code but doesn't work. make it a working one.
VB:
Private Sub CommandButton1_Click() Dim ctrRight As String ctrRight = Right(Sheets("Planning").Range("B35").Value, 16) MsgBox ctrRight Right(Sheets("Planning").Range("B35").Value, 16).Font.Color = RGB(51, 153, 102) Sheets("Planning").Range("B35").Font.Bold = True End Sub
Instead of bolding only the cells with an asterick in them it will bold every cell with text in it. I also would like to adapt this code to only search through column A but have not been able to figure it out.
Sub FindIt() Dim c As Range, firstaddress As String, ws As Worksheet, FindMe As String FindMe = "*" For Each ws In ThisWorkbook.Worksheets With ws.UsedRange Set c = .Find(FindMe, LookIn:=xlValues) If Not c Is Nothing Then firstaddress = c.Address Do c.Font.bold = True Set c = .FindNext(c) Loop While Not c Is Nothing And c.Address <> firstaddress End If End With Next ws End Sub
I am trying to write a macro in order to find the largest value in a column in one worksheet, and copy and paste that value into a different workbook. I have found a code similar to what I am looking for and tweaked it, but it needs a few more adjustments. The code below opens the file I want it to, and pastes data into the correct workbook and worksheet, but I would like it to be able to paste in the next empty cell in Row 3, instead of just in the cell "C3". Also i would like for the program to find the largest numeric value in column C, instead of using an if last row statement, as this current program does not always give me the output I am looking for.
VB:
Dim wsMaster As Worksheet, wbDATA As Workbook Dim NextRow As Long, LastRow As Long