I'm looking for some code to loop through some rows of text and then if the text contains / replace that with a space. My code is below:
Code:
do until intdemandrow = 1
If InStr(Range(cells(intdemandrow, 1).Value, "/") Then
replace(cells(intdemandrow, 1).value, "/", " ")
intdemandrow = intdemandrow - 1
end if
loop
I have 4 columns in which is text combined with numbers (Lorem ipsum dolor sit amet t-shirt LPW01-B consectetur adipiscing.) I need to search every column and cells in them for a word/string which is written in R2 and replace the word in every cell by the word in S2
So for example, in R2 is "t-shirt" and in S2 is "potato"
The program finds the entry: "Lorem ipsum dolor sit amet t-shirt LPW01-B consectetur adipiscing." and replace it with "Lorem ipsum dolor sit amet potato LPW01-B consectetur adipiscing."
P.S.: I am having a trouble with uploading the file directy here, so here's a link: [URL]
I am trying to be able to input a value in column A and the string of text in column B will be affected by the value that I put in Column A. And i want to be able to do this with multiple rows with multiple values. Example:
My string of text in column B remains the same until the value of Column A changes. The find/replace will overwrite the "" in the string. This is my string of text in Column B: "^cCHT;all;;t;g;F1;F1;;all;;t;g;F2;F2;;all;;"
A1 value = "ABC"
Resulting Text in B1 = "^cCHT;all;;t;g;F1;F1ABC;;all;;t;g;F2;F2ABC;;all;;"
A2 value = "XYZ"
Resulting Text in B2 = "^cCHT;all;;t;g;F1;F1XYZ;;all;;t;g;F2;F2XYZ;;all;;"
I know that I can accomplish this by creating a button but I was wondering if there is a more automated way like a formula in a cell or something.
I have a query in a text file.
Select * from
table1 where
a = %d
and b in ('%d','%d')
and values in excel:
value1
value2
value3
I want to open the file and replace the first %d with value1 and second %d with value2 and third %d with value3.
So finally my output should be:
Select * from
table1 where
a = value1
and b in ('value2','value3')
I have a sheet with data on it. In column 5 I have adate range and I would like to delete and values which have "01/01/1900". Currently I have created a loop but for some reason it does nothing. I can use the find option and it picks up the cells with the ones on. For some reason it seems that it cant find them cells.
The code is as follows
Sub jdate()
rowcn = 8
target_sheet = "Status Report"
Do
'status_flag = 0
If Sheets(target_sheet).Cells(rowcn, 5) = "01/01/1900" Then
Sheets(target_sheet).Cells(rowcn, 5) = ""
End If
rowcn = rowcn + 1
Loop While Sheets(target_sheet).Cells(rowcn, 1) > 0
End Sub
[Code] .....
Trying to repeat a 550 or so character statement with a find/replace however I am getting type mismatch errors. When I use a smaller message in the "replace" it works.
I need it to post a message exactly as long as what I have in there. How do I get it to work?
I was tasked with looking through a 10,000 row by 20 column spreadsheet for 628 different ID Codes and replacing them with their Descriptions. The ID Codes could appear individually in any of these cells (200,000 cells!).
The list of ID's and Descriptions hardly ever changes, so I decided to create the two-dimensional array as part of the find-replace macro shown below (only a few lines of each dimension are shown).
My question isn't related to that (although if you can suggest a better alternative please do). The main "work" of the macro is the loop at the end of the array declarations, which essentially loops through all 628 ID codes in array dimension 1 and does a Find-ReplaceAll with its corresponding Description from array dimesion 2.
This task, manually, could take days. My macro has whittled the task down to 2.5 minutes on a 5-year-old laptop, but I was hoping one of the gurus might suggest an even better method than 628 loop iterations. If not, so be it, the end users will appreciate what I've done and then have to find something to do with their "free time."
How do you replace a string in a Formula within a cell or several cells?
For example:
=SUM(Sales[Monthly])
find and replace Monthly with Quarterly
I created a vba procedure for a particular job but within that procedure I need to perform another task. I've been trying to come up with a regular expression but to no avail. I'm looking to loop through a range of cells for any string where there isn't a space before and after a hyphen. When occurance is matched, then replace with spaces. One exception to the rule would be if data is contained within parentheses, then ignore. There could be zero occurances in string to many.
ie.
abc - def ==> ok, s/b skipped
abc - def (nnn-mmmm ooo) ==> ok, s/b skipped
abc-def (nnn-mmmm ooo) ==> abc - def (nnn-mmmm ooo)
abc- def (nnn-mmmm ooo) ==> abc - def (nnn-mmmm ooo)
abc -def (nnn-mmmm ooo) ==> abc - def (nnn-mmmm ooo)
abc-def ==> abc - def
abc- def ==> abc - def
abc -def ==> abc - def
I am looking for a piece of code and can locate the range of a specified string, and replace it with something else. For example, I need to find string "AA" and replace that with "BB", can this be achieved with VBA code?
View 5 Replies View RelatedI have an Excel workbook that i need to loop through all rows searching for a certain string we can call "Totals". There are more than one, and i need to grab the values from each at an offset in the same row, different column, to total at the bottom. I have tried a few things unsuccessfully. The code below is just my first step to try to find the row, i know there are problems as i am unfamiliar with the different properties of a given variable.
Function FindRow(szName) As Integer
nFoundRow = 0
For nRow = 0 To Worksheets("Totals").Columns(nCol).Rows.Count
If StrComp(Worksheets("Totals").Cells(1, nRow), szName) = 0 Then
nFoundRow = nRow
End If
Next nRow
FindRow = nFoundRow
End Function
Sub Totals()
nCol = FindRow("Totals")
ActiveCell.Select = nCol
MsgBox (nCol.Value)
End Sub
provide a vba script to replace characters from a string.
I have the following script which has the cell address as the string and want to remove the dollar signs.
Code:
Dim C1 as string
C1 = ActiveCell.Address
With C1
.Replace "$", "", xlPart
End With
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.
I am looking to replace the space in between numbers and letters in a text string. The number of entries varies with each row.
Example of the entries in the column I need to reformat. Each entry is in a new row.
Code:
10 SSS
24 MNL
17 HLG 18 LTN
17 CBG 17 HLG 15 HIL 15 thn 22 ALV
17 ELP 34 HLG 15 HIL18 THN 10 TTL
What I am looking to achieve:
Code:
10-SSS
24-MNL
17-HLG 18-LTN
17-CBG 17-HLG 15-HIL 15-thn 22-ALV
17-ELP 34-HLG 15-HIL 18-THN 10-TTL
I am working on modifying this code (below) that I found here: VB Macro to search webpage for text string
Code:
Option Explicit
Public stResultstr As String
Sub SearchForString()
Dim rngURL As Range
Dim cll As Range
Dim stCheck As String
Dim xmlHttp As Object
[Code]...
So right now I have the script prompt you for a URL range, then it asks you for what you want to search for, and I have it set to return the next 10 characters from that found point.
You can see here:
Code:
If InStr(1, stResult, stCheck, vbBinaryCompare) > intt Then
intt = InStr(1, stResult, stCheck, vbBinaryCompare) + Len(stCheck)
I began to create something to identify the last position of the found item because next I want to loop it to find the next occurance of the same thing and return the next 10 characters after it in the next cell to the right in that same row:
Code:
cll.Offset(, 1).Value = stResultstr
Again, what I want to do here is find and parse out every occurence of a string (inputbox) found on a web page url in column A. The parse occurrences will go to the right in cells C though ? for row N.
I have an existing Cash Flow Report that has a column of abbreviated/shortened (WBS Element) title where each cell contains a unique three lettered/numbered amount of characters (Example: 200). These three abbreviated character cells are specific and relate to their full/longer (SAP WBS Element) title (Example: WBS DWRRI-BW066-200).
In my attached excel model (Find, Locate, and Align WBS Elements to Cash Flow Report.xlsx), I need a formula for the, "Cash Flow Report WBS Elements" sheet in cells B3 thru B11 that will look at the abbreviated three lettered/numbered (WBS Element) titles in cells C3 thru C11, then search and recognize its unique counterpart contained in the, "SAP WBS Elements Export" sheet and return this full/longer (SAP WBS Element) title to the, "Cash Flow Report WBS Elements" sheet in cells B3 thru. B11, just to the left of its abbreviated/shortened (WBS Element) title.
I have an existing Cash Flow Report for my work that has a column of abbreviated/shortened (WBS Element) titles where each cell contains unique three lettered/numbered characters (Example: 200). These three abbreviated character cells are specific and relate to their full/longer (SAP WBS Elements) titles (Example: WBS DWRRI-BW066-200).
In my attached excel model (Find, Locate, and Align WBS Elements to Cash Flow Report.xlsx), I need a formula for the, "Cash Flow Report WBS Elements" sheet in cells B3 thru B11 that will look at the abbreviated three lettered/numbered (WBS Element) titles in cells C3 thru C11, then search and recognize its unique counterpart contained in the, "SAP WBS Elements Export" sheet and return this full/longer (SAP WBA Element) title to the, "Cash Flow Report WBS Elements" sheet in cells B3 thru B11, just to the left of its abbreviated/shortened (WBS Element) title.
Find, Locate, and Align WBS Elements to Cash Flow Report.xlsx
I am trying to find specific text throughout an excel document (2007) and replace it with the same text but in italics. I tried using the options/format function and selecting italics for the "replace" text but it replaces the entire cell text in italics instead.
View 5 Replies View RelatedI have a worksheet with several columns. I need a formula to search column D only and each time a specific location is identified to replace that location with alternate text. Example (ORIGNAL TEXT):
Column Dtext to text help.xlsx
BIRD
FISH
DOG
BAT
BUG
I need to search that listing and each time the word BIRD is mentioned have it replaced with FEATHERS and each time DOG is listed have it replaced with TAILS Final result would look like:
FEATHERS
FISH
TAILS
BAT
BUG
All other text should stay the same and replacement text should appear in the cell of the text it is replacing. This is a sheet used by multiple people several times a day and so the Find/Replace option really won't work.
Have working on this for at least 6 months and it just isn't going to happen for me. I thought I could use a Conditional format, but that is producing no results either.
I am having trouble getting my IF statement to test if the cell contains the text "sale" return "X" if not "Y". I need it to search through the text string in that cell and find a certain word, and if it finds that word, retrn a value. I am really having difficulty with is what symbol or function do I use for the logical test? (i.e. =, <>, MATCH, INDEX?)
View 4 Replies View Relateddeveloping a formula that will apply data from one cell to a block of text in another.
Here is what I need to do.
1. I want to insert the data in A1 of the attachment to the block of text in B1.
I can do this manually but I have to do this 10,000 times so I need a formula that I can apply.
I want to find strikethrough text and replace it with blanks. In my sheet there are cells that contain both strikethrough and normal text. I tried using the 'Find and replace' tool, specifying the format. I've attached a picture with the settings from the Replace window.
The problem is that Excel finds the cells that contain strikethrough text, but replaces with blank ALL the cell content. I would like to replace only the strikethrough text from the cell and leave the normal text as it is!
I work at a club. I've got a spreadsheet sent to me from another club we do business with. On it are charges from their club to ours that list the charge and associated member number.
I'm trying to use the text to columns feature to separate the member number from the other data in the column so I can sort by member number making it easier for us to bill our members.
Here is a sample of the data:
"Beach Club Bar,b500"
"Beach Club Bar,s200"
"Beach Club Bar,a150"
When I try to use text to columns what happens using the comma as a deliminator, everything including and after the comma disappears.
Thinking that maybe I needed a space between the comma and the member number (in the first line b500 is the member number) I tried to use find and replace to replace , with , and a space after it. This also resulted in all of the data including and after the comma disappearing. I'm sure I'm missing something here.
I tried copying the data into a separate spreadsheet. Tried changing it to text or general.
I typed in the exact data as you see it and tried the text to column function and it worked perfectly. What could be hidden in the data in that column that's causing this?
I need some vba coding which will find and replace text on a worksheet. This would normally be straight-forward, however some text needs to be replaced by text which already occurs in the worksheet, and without it changing as well (if Find/Replace can perform two Find/Replaces at the same time???).
Here is the detail and what I am trying to accomplish: I have two worksheets each with a table of data.Worksheet 1 has a lookup table with three columns of data (column a and b are lists, with c being a formulated column which is dependent on the user selecting either column a name or column b name). I have done this easily enough using data validation on cell $C$1.Worksheet 2 has a user input table which column 3 is a dropdown validation using the named range "UsedName" from Worksheet 1.
I want the selected dropdown names to automatically change when the user changes Old Name to New Name (and vis-versa) on Worksheet 1.The list of values in the data validation dropdown list change well enough, but not any of the existing returned values. When I tried to use vba coding to Find & Replace, I run into issues because (Substanital and Important) are used in both instances, but at different levels with different matched names Important/Relevant.
Worksheet 1
A B C D
1 Cell with dropdown list New Names
2 (Old Names, New Names)
3
4 Old Names New Names Names Level
5 Equal Equivalent Equivalent 1
6 Dominant Critical Critical 2
7 Important Substantial Substantial 3
8 Substantial Major Major 4
9 Relevant Important Important 5
10 Minor Irrelevant Irrelevant 6
formula for column C =IF($C$1="Used Names", A5, B5)
column C is name ranged "Names
Worksheet 2
(Worksheet 2 has another table which has various data. One column which is a drop down list being pulled from Worksheet 1)
A B C D
1 Bob 25% Critical 19
2 Frank 60% Important 33
3 Ellen 40% Substantial 5
4 Ellen G 20% Substantial 12
5 Gary 55% Equivalent 100
6 Jo 50% Major 8
7 Peter 40% Important 22
8 Kim 12% Equivalent 30
9 Shelley 75% Substantial 15
10 John 75% Critical 90
so I want column C to automatically change from these New Names to the corresponding Old Name of the same level. So Critical would become Dominant, Important would become Relevant and Substantial would become Important.
I'm having this problem whereby a few cells in my work contain empty texts. An empty text is represented textually in VBA with a pair of double quotation marks with nothing inside (I think).
This means that the cells don't display anything visible, but are not blank/empty.
So what happens is that formulas such as ISBLANK(), COUNTA(), etc. are returning unexpected results.
I have values in row A and I have values in row C. I want to create a loop to look up xxx and replace it with the values consecutively in row C. Look at example for a better Idea. I found a way to find and replace, but I not sure how to use it with qoutes. I was thinking maybe I dont even need row A and just supply a list and excel could have the chunk of data in the code itself.
View 2 Replies View RelatedHere is the situation:
- Large block of text in one cell (1000+ words).
- I use the Find & Replace function (from the top menu) to find a specific word that may appear several times within the cell.
- Excel "highlights" the cell... but not the word specifically so I have to read all the text to find that word throughout the cell.
I have a column of invoice numbers, formatted as text, some of which have first character "0" & last character "C" e.g. "012345C". I want to get rid of the "C" leaving e.g. "012345".
I have tried Find "C" / Replace " " with the undesirable result being that the leading "0" disappears too. Find "5C" replace "5" gives the same.
How do I use an Excel formula to find which (if any) multiple sets, each of up to 50 words, exist in a series of rows of a spreadsheet - if set A has one or more words found in a searched cell.
A positive result will return a specific value in the designated result cell. If none of the words in Set A is found in the searched cell, the formulae will repeat the test for the words in Set B, and so on.
After all 50 sets of words have been tested, the formula will move to the next cell in the searched column.
New words will be added to the sets of words continually as required.
Multiple words within sets are included in double quotes. Within each set of words there will be some n-tuples of words (i.e. 24 adjacent words) that contain one or more of the words in the set, but for which the formula will be required to return a negative result. Example: Set A = word 1, word2, word 3, "word1 word2 word3". (The words within a set could also be each entered in separate columns, as opposed to all included in a single cell.) The single column of text to be searched is about 10,000 rows.
I am wanting to use the above in a spreadsheet that contains data downloaded from a series of bank accounts to automatically allocate items of expenditure to one of 20 or so different categories of expenditure.
The formula will search the description field to find words that are used in the in the downloaded files from the various accounts to describe each transaction.
If a word describing travel expenditure (e.g. hotel, "holiday inn" but not "holiday travel") is found in the description of an expenditure item - the item cost will be allocated to the TRAVEL EXPENDITURE column, which is one of 20 or so different categories of expenditure.
Happy to consider a different solution if the task can be done better a different way.
Tried using a combination of INDEX/SEARCH/IF in Excel, but was not able to get a correct result. PS I am using Excel 2011 for Mac - which does not allow macros, so the solution needs to be entirely formula based.
I'm looking to identify a keyword in a string and then replace that string with just the keyword.
The string is a product description. The keyword is a product group. The keyword can showup in any position in the string.
I can't post the actual data do to confidentiality requirements. but here's an example.
description
qty
price
keywords
code
green grapes bunch
1
2.5
[Code] .......