Bold Selected Text In A Column
Jan 30, 2007
Every week I have a worksheet compiled with large range of data, being input after many meetings done. The action-owner Names in open/close brackets are among the long text input in one Column (there are not more than 50 rows of data).
My problem is that in the Column every time I have to manually Bold-face the owner names in the cells that have their names, pressing F2 and Bold. Examples: ...(Wilfred)... or ...(Jacky/Joseph)... Can someone please help me with a code, say I can list out a fixed list of selected text and such code will be able to have these selected text (which is names in this case) in the cells bold-faced.
View 7 Replies
ADVERTISEMENT
Sep 16, 2012
I'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].....
View 4 Replies
View Related
Jan 23, 2010
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 Related
Nov 12, 2009
How can I change the format ie. Bold Text in one coloumn if the the data in another column is checked.
Basically, want the text in corresponding row of column "B2:B124" to be bold if the check box in the perspective row is checked?
View 9 Replies
View Related
Jun 8, 2008
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.
View 9 Replies
View Related
Mar 20, 2008
I want to bold each row where the text in column A contains "Total". I've tried the following but I can't get it to work.
For i = 1 To Cells(Rows.Count, 1).End(xlUp).Row
If Cells(i, 1) = "&Total&" Then
Rows(i).Select
Selection.Font.Bold = True
End If
Next i
View 9 Replies
View Related
Apr 10, 2009
I have 2 columns: Locations (Column A) & Dates (Column B).
I want to find the most recent date for a selected Location (stored in $G$1).
currently I have in C2: =If($A2=$G$1,$B2,"") copied down the column to the end of data (currently C153). Then in C1: =Max(C$2:C$153).
I also have in D2: =If($C2<$C$1,$C2,"") copied down to D153, and in D1: =Max(D$2:D$153) to find the 2nd most recent date.
Is there some way to condense this into just 2 cells?
See attached file for example (note the columns are currently sorted by date, but that is not always the case).
View 14 Replies
View Related
Jan 26, 2010
Attached is a sample sheet with nine columns. Column D includes a name, but in many cases it is preceeded by: 'TO', 'BY', or 'OF' and a space which I need to remove (if they exist), leaving just the name. Please note that sometimes just the name exists so nothing needs to be done. I believe that in a jet sql querie I can use something like:
View 7 Replies
View Related
Sep 22, 2006
I’ve got a little problem with the text to column function.
I’ve got in column A critarias and if it is for example L it should run a surtain text to column code.
With Range("A1:A65536")
. AutoFilter Field:=1, Criteria1:="L"
Range("B1").Select
Selection.End(xlDown).Select
Range(Selection, Selection.End(xlDown)).TextToColumnS Destination:=Range("B2"), DataType:=xlFixedWidth, FieldInfo:= Array(Array(0, 1), Array(21, 1), Array(60, 1))
End With
With the Auto Filter some rows between 2 until 7624 are shown. But unfortunately the text to column code is used for every row between 2 and 7624. Does anyone know how to avoid it?
View 3 Replies
View Related
Apr 15, 2013
Anyways, the issue is that when I have some cells selected then use the text-to-columns, it works fine.. but when I select an entire column, it "acts a fool"...
I made this video to show the effect on my computer.
View 14 Replies
View Related
Feb 3, 2014
Heres the code:
I'm having trouble with the With statement near the bottom for the active sheet, effectively the row search. (Would be great if the font can be changed to red as well as text "Withdrawn").
Option Explicit
Private Sub CommandButton1_Click()
Dim search As String 'stringy
Dim ws As Worksheet 'worksheety
Dim Answer As String 'answery
Dim r As Range 'rangey
search = Range("b7").Text 'texty
Dim cell As Range
cell = Range("4:10")
Application.EnableEvents = True
[Code] .......
View 1 Replies
View Related
Oct 18, 2008
when the largest number in column B the hotel in column A should be in bold.
So in excel language IF(Number in B Is Max display corresponding hotel in column A as BOLD. But I can't figure out how to do this.
You can see here on the image:
additionalimage.gif
View 4 Replies
View Related
May 20, 2008
I have a worksheet on which the data is already grouped. At the top of each group is a row that contains only the group name. Since the rest of that row is blank, I want to use a blank cell on that row as a reference, then copy the group name to a newly created column, then fill that column down to the next group.
The goal is to create a column that contains the group name, rather than just having the group name as a " header" at the top of each group.
View 5 Replies
View Related
Jul 11, 2012
Software: Excel 2010, Windows 7
What is the VBA code for inserting text in all column B-cells of multiple selected rows?
I am creating a worksheet with a table containing various data related to orders of various materials (this is more or less data gathering from an older, paper-based 'system'). This table spans, columnwise, from A to D and expands downwards as more orders are added. The information in each column is: A=order number, B=type of material and C=material specs. and D=additional comments.
I've set it up so that the only thing I really have to do is to insert the type of material in the cells of column B, and the rest will sort itself out. Instead of having to insert a new row for each new entry and manually typing in the name of the material (these entries are often done in the midst of already existing data), I created several similar, macroed buttons for the different types of materials we use. These macros work by selecting the row of the currently active cell, inserting a new row and then add the name of the material in the column B-cell of this new row. What I am having trouble doing though, is to get the text-entry to work for a selection of multiple cells.
As an example, lets say that I would like to add 5 orders of "Grade A Steel" in the middle of the table - in the row above row 8. With the macro I currently have I can select cell B5, click the macro, and a new row will be inserted with "Grade A Steel" in column B of this new row. This action could be performed 5 times over, but would be easier if I could just mark a range of 5 cells, say B8:B12, click the macro and get the text/data inserted the column B-cells of all 5 of the new rows. So far I've been able to create a macro that inserts multiple new rows, but I've only been successful in filling the column B-cell in the first row leaving the 4 below empty.
View 8 Replies
View Related
Jul 25, 2014
I am using this code to hide or unhide rows of text on another sheet:
VB:
Sub ProcessSheet1ChangeOnCellJ7(ByVal Target As Range)
Dim sAddress As String
Dim sValue As String
'Get the address of the cell that changed without '$' signs
sAddress = Target.Address(False, False)
[Code]....
When the "Not Pursuing" list box option is selected (in cell "J7" or "J8" in Sheet 1) I need to add (or over-write) "Not Pursuing" to the range of cells in column "B" (in the "Tasks" sheet), but only for that particular Goal, meaning a limited range of cells in column "B". If the "Pursuing - Show All Tasks" option is selected for a Goal then these same cells need to be blank so that the appropriate person can enter their name into the cell.
The purpose for adding "Not Pursuing" automatically to these yellow highlighted cells is that it will facilitate filtering of tasks by individual in the "Tasks" sheet..
Again I have tried several times to upload a sample file and am unable to, which I know makes it more difficult to solve. (Is there some common mistake people make? I know it's an allowed format and is very small in file size....)
Code solution can be entered directly beneath:
VB:
If Target.Value = "Not Pursuing" Then
ActiveWorkbook.Sheets("Tasks").Rows("29:29").EntireRow.Hidden = False
ActiveWorkbook.Sheets("Tasks").Rows("30:48").EntireRow.Hidden = True
View 1 Replies
View Related
Oct 7, 2013
I have an Excel sheet with 2 columns : Date and TextColumn
The TextColumn column contains in each cell text such as this :
Title1
TextLine1
TextLine2
Title2
TextLine3
TextLine4
....
I need to split each line as follows : Each title (in bold and on a new line) and the text who follows should be placed in a new row, copying the date in each new row created.
View 1 Replies
View Related
Jan 28, 2014
I'm using the code snippet below to add text and apply formatting to a cell within a given sheet.
[Code] .....
I'm now trying to amend this so, the word "All" is in bold text and I've recorded the a macro, and have the following:
[Code] ....
The problem is, is that when I try to amalgamate the two, I'm unable to get this to work.
View 8 Replies
View Related
Apr 25, 2008
i'm trying to write a macro that does the same thing as the bold button. Click once and the text is bold, click again and it un-bolds.
View 14 Replies
View Related
May 25, 2009
I need to figure out how to make certain text bold in a comment using vba. I'm making it so it adds a comment that looks like this:
View 7 Replies
View Related
May 22, 2014
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] ....
View 5 Replies
View Related
Jul 22, 2008
I have a sheet full of names, addresses and phone numbers in one cell like this
Albert Young 16 teststreer 12C..................7888-6338
The name Albert Young is bold. The thing is I would like to split the cell putting the names in another colomn. Then it would be ideal to split the addresses and phone numbers as well. But I have no idea how to split any of these. I scanned this from a phone book, the dots are different on each row.
View 9 Replies
View Related
Dec 31, 2008
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 Related
Jul 1, 2004
I have a spreadsheet with a pivot table in it. Column "G" has all of the data in it I need to abbreviate, problem is, I only want the values in BOLD face, and there are 3-5 rows seperating each boldfaced item. I would have to manually copy-paste each bold value into a new, 'clean' column ( column "I", or in a new sheet/workbook, it doesn't matter), and lather-rinse-repeat for the next 700+ rows. It sucks. No, it really does. I stumbled upon this website which is seemingly the utopia for excel macro and programming problems, so is there anyone out there that might take the time to walk me through it...?
View 9 Replies
View Related
Apr 8, 2007
I 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.
View 3 Replies
View Related
Dec 14, 2007
I'm not too sure if this will be really easy difficult or really difficult but I want to write some code that compares the value of two strings, and any characters that arent in string 2 will be return formatted in bold. For example, if String1 was "The Quick Brown Fox" and String2 was "The Quick Yellow Fox jumped over the lazy dog", String2 would then be returned as "The Quick Yellow Fox jumped over the lazy dog".
View 9 Replies
View Related
Feb 29, 2008
I've got a messagebox in my VBA code and I would like to bold the title of the filename that I've stored in a variable. My message box code (even though you probably don't need to see it) is as follows:
MsgBox ("There has been error. Please check the file - " & strFile & " and make sure there are no #REF errors." & vbCrLf _
& "If there are, correct the errors, save the workbook and regenerate the report. If the error still persists, reboot your machine and try again.")
Is this possible, and if so, how would I go about bolding the strFile variable?
View 2 Replies
View Related
Feb 18, 2010
i have some code where i need to make the text bold but not sure how to go about it
the formula is
View 3 Replies
View Related
Jan 16, 2012
I have a spreadsheet with rows of cells which are either blank or have text in them.
Is there an easy way to write a formula which will make the cells which have text in them bold and make the cell colour grey. But if the cell is blank keep the cell white.
View 3 Replies
View Related
Jul 23, 2012
Can Excel format text in a formula?
i.e.: =if(R25>6"This is Simple test", "This is the other part part of the test")
and then underline the word "Simple" or to have the word "other" bold.
View 4 Replies
View Related
Sep 13, 2012
I have a data example
Cell A1 which contain text I.E = "Words"
I have link B1 To cell A1 I.E = A1
Now what I want is I want the last two words or any alphabet between alphabet
to be bold
W O R D
Example
WORD or WORD
Any alphabet between word to be bold upon my requirement.
Instead of linking that cell to another cell , i want any value when entered into that cell.
That alphabet automatically becomes bold as this will not be requiring linking to that cell
View 4 Replies
View Related
