Macro To Search Cells For Specific Text Segment
May 28, 2009
Im sure this has been addressed before but i need a macro that would act like a "Contains" function. I have Column B that has user comments. These are sentences like "I have a billing issue" or "My item is damaged". My goal search these for keywords and then have a value (category) populate in Column C
Heres an example. the Category is Damaged Goods: Keywords associated with it are "broke" "broken" "replacement" "damaged" "not working"
Another category is Billing: keywords include "bill" "credit" "account"
I need a macro that will search all the comments and if "broken" (for example) is found anywhere within the comment, the value "damaged goods" will be populated in the same row, column C
View 3 Replies
ADVERTISEMENT
Mar 21, 2013
I'm building an inventory report based upon a daily report downloaded from a website. The downloaded report changes from day-to-day. All of the data I need remains there, but the location of the columns changes, with the exception of "BOL". I need to sort all of this data in a macro. I have most of my macro figured out, but I'm having trouble with one "sort". I need the data to be sorted FIRST by whether or not the 4th column contains "Clear" or "Dyed". I have the next two sorts already coded, based on SPOT vs Contract and then numerically by column A. But I cannot find macro coding or an excel formula (either would work) that reliably searches the 2nd column for the word "Clear". I have tried different combinations of IFERROR, FIND, SEARCH, IF, ISNUM, etc. in hopes of writing a new adjacent column containing the values "Clear" and "Dyed". I have found many combinations that work if I search only the correct cell. But when I extend the range to search through ~26 cells in one row, they all fail. Below is a (small) example of what I start with and what I want to end with. I've also included my current relevant Sorting code in my macro.
FinPro
Sup
Veh
1Dn
2Cn
2Dn
Bio
Injec
[code]....
View 5 Replies
View Related
Jun 30, 2014
I need a macro, or a formula that can identify if the words in the Words Column (Column A) is contained in Title Column (Column B). If it is, It displays as "Yes". If not, display as "No".
Case is not sensitive.
Words
Title
Displayed?
Christmas
Coworker has chronic hiccups
Yes
Excel
I Love Excel
Yes
Cartman
I Like Turtles
No
Ninja
Oh Christmas Tree
Yes
Tiger
Case of the Mondays
No
Chronic
Cute Monkeys
No
View 4 Replies
View Related
Oct 5, 2009
I am trying to write a macro to search a column for a specific text string which when found, will copy the whole row the string is in. Once this row has been copied, I then want the macro to activate a new sheet and search for the next available empty row to paste the data. Once this has been done, go back to the original sheet and find the next cell in the original column with the specified text string and repeat until the range has been satisfied. Below is the script I have that sort of works.
View 5 Replies
View Related
Nov 8, 2013
I would like to select all cells in column A that begin with the text "SP". Some cells will be contiguous but others will not. For instance in one case, I would like the macro to select cells with the text "SP" which would result in cells A1, A2, A3, A10, A15 being selected. I am working on building a macro that will then do other things to these cells/rows so this is the first step.
The below code will select the first cell with "SP". How would I alter this code to only search Column A and select multiple cells? or totally different code.
Code:
Sub test()
Dim r As RangeSet
r = Cells.Find(what:="SP", LookIn:=xlValues, lookat:=xlWhole)
If Not r Is Nothing Then r.Select
End Sub
View 7 Replies
View Related
Dec 30, 2011
how to work macros or VBA
I have a workbook with multiple sheets named by month and year that I use to keep track of loans I work with at a bank. In these sheets I have info such as:
Column B = due date
Column D = loan# A
Column E = loan# B
Column F = status
Column H = followup needed
(Columns A,C, and G aren't important for the current need)
What I am trying to do is create a main sheet (TRACKER) that all I will have to do is press a macro button and it will pull info for each loan that is in a pending status.
I need a macro that will search column F (Status) on all sheets and find each instance of "Pending" and once that is done, copy rows B,D,E, and H in each "Pending" instance and copy them to their designated area on my TRACKER sheet. After that is done I need it to continue to the next "pending" instance and do the same on the next available line on my TRACKER sheet.
The overall goal would be that everyday I can press the macro and it will repopulate the sheet with the current pending items (as each day I will change pending status' to complete and no longer need to track it the next day).
I already have the tracker sheet set up and ready to go with the spaces as follows:
Column G&H = Merged cells where due date will need to go
Column I&J = Merged cells where loan# A will need to go
Column K&L = Merged cells where loan# B will need to go
Column M thru S = Merged cells where followup needed will need to go
View 9 Replies
View Related
Mar 19, 2007
I need to find a word in a column, ie. "JAN" in col D (only first found is enough, not all instances) and then display message that "January has been updated", if not found, display message "this month has not been updated". The word "Jan" will be stored in a cell, so I need the code that could pick up the contents of that cell and lookup the col D (in another sheet, ie. "MthMaster") for that word.
View 9 Replies
View Related
Dec 3, 2009
I have a text such as:
fdfs&s_kwcid
sfsd&s_kwcid=dfsads
&dfsdaf&dsafdsf&s_kwcid=
fdsf&dasfsdf&s_kwcid=dsfasfsdf
I want to do is search for "&s_kwcid" or anything containing "&s_kwcid" and replace it with blank. So above would then read:
fdfs
sfsd
&dfsdaf&dsafdsf
fdsf&dasfsdf
I tried =IF(SUM(COUNTIF(E2,{"&s_kwcid*"}))=1,E2,"") but it didn't work. I tried auto filtering, and using contains &s_kwcid* but it didn't filter out results, but find &s_kwcid did find results for text anywhere in string, so I know the problem is there.
View 5 Replies
View Related
Dec 10, 2013
I would like to search a specific text, ex "Change" on all column C on all existing sheets and copy all rows and collect into one Sheet.
View 5 Replies
View Related
Jan 2, 2009
I cannot find Excel files that contain specific strings. For example, if I create a new file, and in the first cell type in "123456". Then save the file to the folder c:Temp Then in Windows Explorer, right-click on C:Temp and select "Search . . ." Then under "A word or phrase in the file", type in: 123456
It will NOT find the file! It will find a txt file or a doc file, but not xls files.
I thought maybe it fails because that is a number. But I have hundreds of Excel files with Integer numbers stored in "General" format cells and I desperately need to be able to search them to see which files contain certain numbers. It all started with some files that were sent to me - they work PERFECTLY for searching cells for numbers. So strange - yet if I open the file then save it . . . no changes or edits at all, just Open and Save. . . then the search fails for all numbers in that file. This is so perplexing that I have placed 2 zip Sample files on my website for you to Download: http://www.infocellar.com/Samples.zip
Unzip the two files to any folder. One is named "Sample-Works.xls" - Then do a Windows Search for any number in the file, here is one to try that is in the two files: 174026 And it will list "Sample-Works.xls" but it will NOT list "Sample-Fails.xls", even though BOTH FILES ARE IDENTICAL! I copied the same file twice and then named them. The only difference is that I opened the file Sample-Fails.xls and then immediately Saved it, which as I stated earlier, makes it fail all Searches from that point forward.
View 5 Replies
View Related
May 7, 2008
I have a column with values like this
SW SW SW CO CO PD MDM
I use this line of code to determine the text
Set rFound = Sheets("ProductCount").Rows(14). Find(What:=sProduct, LookIn:=xlValues, SearchOrder:=xlByRows, SearchDirection:=xlNext)
ProdRow = rFound.Column
where sProduct contains values such as SW , CO. Now, when I use rFound to query SW, it finde me this first occuring SW. I have this inside a for loop. When it goes and queries again, it should get me the next occuring SW, not the first SW that it searched for me.
View 3 Replies
View Related
Feb 19, 2008
I got a directory with several xls-files.
I want in an new excel file to search automatically for all strings (11 till 48) in all files this particular directory.
All the strings (11-48) are being placed on this new file in worksheet 1.
View 9 Replies
View Related
Oct 5, 2008
I have a column of values of peoples initials and I want to cound how many times one persons initials occur in those cells. I can do this if the cells just contain one person i.e. "CH" or "DH" but if the cell has two or more peoples initials i.e. "CD DH" I can't do it as it only matches the exact search criteria.
How can I total the numebr of times a required set of initials appears in a specific column of cells? Not bothered is it requires a macro or a formulae, just can't seem to figure this one out.
View 9 Replies
View Related
Mar 22, 2013
I am trying to create a VBA to:
1. Search workbook for a specific values and then to color that cell with a corresponding color.
2. Search workbook for a specific values and then color other cells underneath (the next 3 merged rows after the cell containing the value) with a corresponding color.
View 3 Replies
View Related
Oct 3, 2012
Need macro to search approx 1000+ xls files in folder/directory for common text string "see reference" and then output the file number which is located in cell A1 to new spreadsheet for each file the text "see reference" is found.
View 2 Replies
View Related
Jul 13, 2014
Copy paste specific column with specific heading using macros. Roll No
Name
1
John
2
Abdul
3
Baig
1
I Want the Macro to find the column with heading "Name"
2
Copy the list from Name till the last Cell that is B1048576
3
Paste in Sheet2 Cell A1(Please see result in Sheet2)
View 1 Replies
View Related
Nov 7, 2008
I have a protected template and unprotected source worksheets - - - what I would like to happen is for the macro to start and if the source worksheet cell B3 equals "Report Total" then stop - otherwise copy template worksheet then copy 6 specific cells from the source to paste values to specific cells on the newly created worksheet (B_ to C7, D_ to I7, E_ to C9, F_ to K9, A_ to C11, M_ to K11 and then K13=F13-30)
After that then start all over again unless the next rows cell (B4, B5, B6, . . .) is "Report Total" then stop - - - the row count could be from one to a couple hundred.
Here is what I have so far but I know that with each copy the name will change and as it goes down the source file each row will change and I also need help with that.
Sheets("ee template").Copy After:=Sheets(3)
ActiveSheet.Unprotect
Selection.ClearContents
Range("I7").Select
Selection.ClearContents
Range("C7").Select
Sheets("source").Select
ActiveCell.Offset(0, -11).Range("A1").Select
View 9 Replies
View Related
Jan 30, 2014
Any method to determine the number of instances a value ("4" for example) appears next to a specific value ("x" for example). I don't have a workbook; I'm just looking for any formula that can search for specific values and find the total number of instances that an adjoining cell contains data.
View 14 Replies
View Related
Jun 23, 2009
I want to create 3 command buttons (active X) on a worksheet to toggle between showing rows which only contain the below text in column L (range L9:L30) and showing all rows containg the options (However, I also have some blank rows in this range and i always want them to remain hidden.)
My text options are:
High
Medium
Low α
The text arrives in the cells via a VLOOKUP
Is the chinese text a problem? i can't type it into VB.
I've been using the following macro to hide and unhide rows with a command button in the same sheet:
Private Sub CommandButton1_Click()
Toggle_Hide_Unhide
End Sub
Sub Toggle_Hide_Unhide()
Dim rngCell As Range
Dim TakeAction As Boolean
If ActiveSheet.CommandButton1.Caption = "Hide" Then
TakeAction = True
ActiveSheet.CommandButton1.Caption = "UnHide"
Else
TakeAction = False
ActiveSheet.CommandButton1.Caption = "Hide"
End If
For Each rngCell In ActiveSheet.Range("I9:I30")
With rngCell
If .Value = 2 Then .EntireRow.Hidden = TakeAction
End With
Next rngCell
End Sub
View 9 Replies
View Related
Dec 17, 2013
I've 2 columns in Sheet1 (data base) whit text in first is names of keys i.e. A1,P14,M18 and in the second column I have where is the key. So I'm looking for macro which will be searching for a key from first column, but in the search result will be place where is this key (the text in second column).
View 4 Replies
View Related
May 25, 2007
I have one sheet and i want to compare the first word in the column "D". If the first word of D2, is the same than the first word of D3, i want to copy to another sheet and after the copy, insert 2 blank rows... if it's different, i want to copy and insert 3 blank rows
Maybe it's better to attach the file. In the first sheet, you'll see a little part of the real sheet, and the second sheet is the example of what results i want to obtain with code...
View 6 Replies
View Related
May 12, 2014
I want to search within cells A4:F25 for "B71 - Brown" and show the number that is in the cell below this text. If there is multiple cells with "B71 - Brown" I would like the cell to show the total.
So for example,If the formula was looking for "B71 - Brown" in the cell it would show 8136. (A13+A21+D25+E17). If i changed it to "Lavender" it would show 2380. (C5)
Also this data is linked from several other sheets and the values i search for will change and will need to update.
View 1 Replies
View Related
May 5, 2009
Search multiple cells for certain string and then replace the text of the entire cell with new text. For example the text may contain:
"A Chestnut Leather Satchel Binocular Case "They'll Fight Over When You're Dead" (Binocularcase-SL-CH)"
I want to search for SL-CH and once that is found I want to replace the contents of the entire cell with the following: Satchel Chestnut (SL-CH)
View 4 Replies
View Related
Jan 9, 2009
I have a spreadsheet containing several names. I want a formula or macro that will search a string of text within the cell. If the text exists within the cell, I need a code to populate. For example,
In cell E2, search for a phrase anywhere in the cell that contains "COM". In cell H2 look for the exact phrase "ASB". When "COM" is found in E2 and "ASB" is found in H2, in cell U2 return the value "COM ASBTVL".
In my case, E2 may not contain "COM", it may contain "DEN" instead. In that case, if E2 contains "COM", and if "H2" contains "SVC", then in U2 populate "COM APPSVC"
I'm guessing in my code I will need to list a set of criteria that will search row by row and return certain values when finding the text I specify.
Would a macro be best for this? Does anyone know how I would put that together?
View 11 Replies
View Related
Sep 14, 2008
I'm trying to search through multiple worksheets (that are closed) to see if a value in cell B12 (of every worksheet) matches a value in a seperate worksheet (which is in a seperate workbook)
View 14 Replies
View Related
Aug 18, 2014
I need to create a formula that searches the first table and autofills the second based on the teacher name. So when Mr. M is listed in column e, all the data to the right automatically appears on the second sheet.
View 3 Replies
View Related
Jan 30, 2014
I am trying to get a code which searches each row for a keyword, and then assigns a value to it depending on what group of keywords it is.
For example, if the Name or Comment mentions certain fruit keywords, I want it to assign the value: "Fruit", and if it mentions certain vegetable keywords, I want to assign it "Vegetables", and if it is unrelated to either, I want to keep it blank. If the name/comment mentions both fruit and vegetables then I want it to say "Error".
Since the keywords I am using are mostly two letters, I want the search to only search for the two letters on its own, and not as part of a sentence. e.g. if the key word is ED, I don't want it to return a value for "I rested". Instead, I want it to stay blank.
i.e. I want the code to take information from column A and B, and assign a value based on the keywords in column D and E. As an example:
A B C
Name Comment Value
V1 Eating vegetables are good for you Vegetable
null lock out of ep. Fruit
S-1 It is JUST
Fruit-sp Error
D E
Fruit Vegetable
EP SW
KG SP
ST CM
BV LP
The formula I used so far is this: where C3 is the first value
C3=IF(OR(ISNUMBER(LOOKUP(100,SEARCH(Sheet1!$D$2:$D$6,A3))),ISNUMBER(LOOKUP(100,SEARCH(Sheet1!$D$2:$D$6,B3)))),"Fruit","")&IF(OR(ISNUMBER(LOOKUP(100,SEARCH(Sheet1!$E$2:$E$6,A3))),ISNUMBER(LOOKUP(100,SEARCH($E$2:$E$6,B3)))),"Vegetable","")
In columns D and E I put a leading and trailing space between each word to only search for the keywords themselves, and not as part of a word. (e.g. ST is correct instead of haSTe).
This formula seems to work only for 60% of the information, problems occur when the keyword is at the end of comment sentence: the value is blank. e.g. in row B4 of the table I made above my formula returns a blank.
View 1 Replies
View Related
Apr 1, 2014
I have a report that runs, and it shows users that are in different groups. Within each group are primary users, and sometimes secondary users. Attached is a spreadsheet showing an example of the report in "A7:A52"
What I want to do is have a macro scan column A, and if a group is found, create what I have made in the rest of the spreadsheet (CD6 and below). I manually filled in the data for group 1, and would like it to continue off to the right in the same format.
There are some areas that dont have groups, such as there might be group 1, group 2, and then nothing till group 10 (as shown in the example)
View 12 Replies
View Related
Jan 1, 2008
msoShapeBevel results in a shape with 5 sections. How can I color top and bottom in one color, left and right in another and the center in a third color/or blank?
Sub test()
Worksheets(3).Shapes.AddShape msoShapeBevel, 50, 50, 100, 200
End Sub
View 6 Replies
View Related
Jul 29, 2014
I have a list of about 600 addresses that need to be reformatted with a space following X character and need to be in all caps. This would be the more tedious way because I would still need to search the other file to make sure the text itself is correct. I saw on a different forum that this line would work in adding a space
(=REPLACE(A1,5,1,MID(A1,5,1)&" ")) but I need to add two spaces and adjust the location of the space so that it is following the first string of text.
The other approach could be to set up a formula or macro that searches the other file with a section of the original text and replaces that string.
View 3 Replies
View Related
