I'm trying to create a VBA module that will update data. However, I need it to skip any updates to data that has been set by the user. For simplicity, the user changes will be bold. I've found the info on the site for a function for counting cells in a range that are bold. But really just need to know how to get format of the cell.
View 4 RepliesI have the following formula (taken from the web) in my spreadsheet which let me know if a cell have bold text or not. But when the cell has 'mingled' text, i.e. only partly bold, he gave a #VALUE error.
View 10 Replies View RelatedI 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 am trying to create a macro that if a value in a cell in column A is bold, then the value in the same row in column H is bold, then loop it to run on the rest of the worksheet.
View 9 Replies View RelatedHow do we run a macro if the selection is not bold and If bold then do nothing.
View 3 Replies View Relatedi am trying to write a small piece of vba
basically if the cell in column "0" is bold then bold colum "o"
and "m" this must loop to last data row of colum "O"
I want to have a function or macro that if cells have mingled bold text, that only the bold text shall remain in the cells, and all the rest of the text must be deleted.
View 4 Replies View RelatedThe text of the active cell's row should be displayed BOLD. In other words, My cursor is on row 8, then this whole row should be bold. Is this possible ?
View 5 Replies View RelatedI am trying to write some code that will look in an excel cell find if it contains the word that I am looking for and make it bold. I have written the following code so far
VB:
With Worksheets("Label Print").Cells(i, J)
.Characters(Start:=InStr(.Value, "Name"), Length:=Len("Name")).Font.Bold = True
End With
[COLOR=#3E3E3E][B][/B][/COLOR]
The issue is that if "Name" occurs twice (or more) in a cell it will highlight only the first.
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
I have the following code that I am using for a header row of an excel sheet
View 3 Replies View RelatedI'm trying to use the below vba code that was provided by another member. The code show work to bold any text that is found matching the text string provided.
Problem I'm having is that I get a 'Type mismatch' error when the code tries to run, as below:
Public Function Colorandbold()
'USE-COLOR AND BOLD TEXT STRINGS WITHIN TEXT EXCEL VBA
'BROUGHT TO YOU BY WWW.PROGRAMMINGLIBRARY.COM
'CREATED BY MARK SLOBODA
[Code].....
I am trying to bold specific text in a cell. I have found some language that will do this trick to a point. In addition to the word "Foxwood" I would like to bold 9 other specific words in 5 different sheets in this workbook. Is there a way to do this without the cumbersome task of repeating this language 5 times for the different sheets and 9 times for the additional words?
Dim startPos As Integer
Dim totalLen As Integer
Dim searchText As String
searchText = "Foxwood"
For Each cl In Sheets("Week1").Range("c3:c100")
[Code] ....
i have a worksheet which has a price list for parts, about 2500 rows. in the Column C i have a retail price and in Column D have -5% of the C. i need to add Column E -10% of CERTAIN items, the ones in BOLD Only, of Column D. and change the color of that cell, is there a easy way to do this. i have attached screen shot what i mean.
View 9 Replies View RelatedI have a question regarding the formatting of cell values. Is it possible to format particular value of each cell in to Bold and Colored?
For example in the below example for cells A1 to A5 contains some values.
I want the value BBBBB to be bold and with red color font.
Title
AAAAA BBBBB CCCCC
DDDDD BBBBB EEEEE
BBBBB GGGGG HHHHH
LLLLL AAAAA BBBBB
I'm looking for VBA function in excel that will look up for bold cells in K column and copy values at the and of worksheet.
Lets say that cells K23, K56, K123 is bold. Macro will copy that cells to the end of worksheet with formula:
=+K23
=+K56
=+K123
whether it is possible to have a formula determine whether a cell (say a5) is bolded or not? I know it is possible using a macro but in this case would prefer to use a formula.
View 5 Replies View RelatedI am creating a sheet with the cell information coming from different cells. I want to bold and/or underline a part of the cell to add clarity.
For e.g.
Cell A1 = "Trans X" (Name of the transaction);
Cell B1 = "System Y" (System where the transaction exists)
Cell C1 = "Type Z" (Type of transaction)
I want to create a cell which has
Newsheet.Cell (x,y) =
"Name: Trans X
System: System Y
Type: Type Z"
I created the String by reading and concatenating the values, but I am not sure how to add the formatting to a part of the string.
i have some code where i need to make the text bold but not sure how to go about it
the formula is
I have a formula that combines the the text of various cells.
Is there a way to automatically make part of the cell Bold - so in this case I want the Cell B13 to appear in bold.
See formula below:
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
LastRow = Cells(Rows.Count, "G").End(xlUp).Row + 1
varUserInput = InputBox("Enter client name:", _
"Client Name", "")
If varUserInput = "" Then Exit Sub
Range("G" & LastRow).Value = varUserInput
Range("G" & LastRow + 20).Value = "Total".......................
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.
View 3 Replies View RelatedCode that will turn the entire rows text bold and red if a cell in that row has the word.
New PO
Is it possible to search a worksheet that may contain different number of rows (from day to day) and for every instance of a word like "HOLD" is found in column "C" to Color that intire Row Red and also Bold the Row as well?
View 9 Replies View RelatedAs i navigate excel, I was wondering how to change the background or highlight (instead of bold border) the active cell?
View 3 Replies View RelatedI'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.
View 2 Replies View RelatedHere's an interesting one:
A1 contains a text string which is both bold and unbold (
B1 is blank
I need a macro which scans the cells with text and copies the BOLD portions of the text string into the adjacent cell.
Example:
A1
The sky is blue
Macro is run
B1
sky blue
I have a Userform that allows the user to input a country from a combobox which after clicking a button writes that data into Cell AH11 in the excel spreadsheet, what I need is for Cell AI11 to read what has been entered into Cell AH11, look up whether or not that country is on a list I have and enter a yes or a no if it is or it isn't on that list.
View 2 Replies View RelatedI want to write a function that goes out and reads a cell, waits a few seconds, then reads the cell again, since it is constantly changing. Then report back the difference between the two readings of the same cell. The following code does not work since t0 and t1 always come back the same value.
Code:
Function ReadTime(t)
t0 = t
DoEvents
Application.wait Now() + TimeValue("00:00:15")
t1 = t
ReadTime = t1 - t0
End Function
I am working on a spreadsheet where individuals must enter a value between 1 - 4 or n/a. I would like to include a formula for each question where if they enter a value between 1-4, this scores 1 and if they enter n/a this scores 0. Does anyone know a simple formula I could use, I have tried IF formulas but keep getting muddled.
View 2 Replies View Related