Column B on the spredsheet gets the Part Description vaules, we copy and paste from Customers excel and unfortunatly some descriptions contain 3asteriks in a row (***) and I need to import this into Access later on and Access will not except asteriks. Find and replace doesnt seem to work like i hoped , it replaces everything in cell not just part of it . If someone has a Formula that will work that would be ok too, it does not have ot be VBA
EXAMPLE Part Descriptions:
RADIAL TIE DOWN LUG (4/500's) *** Formed
FINES V-PLOW/ SCRAPER MOUNT ANGLE; Rev. A ***Formed
Can you cut out part of a number and replace it in another cell. For example
A1 come in as ###+### and it will not always be a three digts all the time but I would like to keep the number in front of the "+" in A1 and the number behind the "+" into A2 cell.
I have a column of data with letters in each cell, no numerical, only alpha. Now, some of those cells contain the letters "adj sub" as part of the text string in each cell. "Adj sub" is always at the beginning of the text string. As an example, a cell will look like this - "adj sub mhm". I want to delete rows whose cell description does not contain "adj sub" as part of the text in the cell.
i'm excel macro now at the stage where i could already deleted duplicates data from column A to H. But i need to keep data in column J onwards.(column I i leave it blank to separate the data). currently i'm using these for deletion. (i put [] as i was unable to upload my question)
Delete_DuplicateReferences() Dim LLoop As Integer Dim LTestLoop As Integer Dim Lrows As Integer Dim LRange As String Dim LCnt As Integer 'Column values Dim LColA_1, LColB_1, LColC_1, LColD_1, LColE_1, LColF_1, LColG_1, LColH_1 As String Dim LColA_2, LColB_2, LColC_2, LColD_2, LColE_2, LColF_2, LColG_2, LColH_2 As String 'Test first 2000 rows in spreadsheet for duplicates (delete any duplicates found) Lrows = 2000.................
I am trying to delete part of a text string for a range of cells. The code I have so far deletes the first set of letters but is looking in every cell in the range.
Ideally I would like it to only look in the cells of col B where there is data then only delete the first 10 letters if the cell begins with "Service ID"
Sub DeleteServiceID() Dim c As Range For Each c In Range("B1:B1000") c.Value = Right(c.Value, 10) Next c End Sub
I am looking for a formula to delete information from the middle of a text string. I have ~ 1,000 lines of data. Each text string is composed of the same way. The data I am looking for is two parts of the string (1) all the text up to and including the first “%” character (2) the last six characters.
Raw Data CARDINAL HEALTH 5.5%13CARDINAL 5.513 CARDINAL HLTH 5.5 061513 UST BILL 0%09US TREAS BILL 0%09 UST BILL 0.0 092409 WORLD SAVINGS 4.125%09WORLD 4.125%09 WORLD SVGS 4.125 121509 JP MORGAN 5.375%12JP 5.375%12 JPMORGAN CHS5.375 100112
Desired Result CARDINAL HEALTH 5.5% 061513 UST BILL 0% 092409 WORLD SAVINGS 4.125% 121509 JP MORGAN 5.375% 100112
I am trying to move through the worksheets and delete all columns with "Accession" in contained in them. I have to do this with an external macro as the spreadsheet with the data is created from another program. I tried this and get an 'Object or With block variable not set' error and the debug highlights the Cells. Find line of the code.
Also, the number of columns could be variable within the spreadsheet as it is compiled by the other program.
Sub DelAccessionNum() Dim Wrkst As Worksheet For Each Wrkst In ActiveWorkbook.Worksheets Cells.Find(What:="Accession", After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _ xlPart, SearchOrder:=xlByRows, SearchDirection:=xlPrevious, MatchCase:=False _ , SearchFormat:=False).Activate On Error Goto Completed: Selection.EntireColumn.Delete Shift:=xlToLeft Completed: Next End Sub
I have data sets on multiple worksheets within a workbook (over 70). Based on the begining of a string, I need to count all instances with that begining, and if there are fewer than 12 instances, delete the entire row.
Data set example:
In this example, I need to count each instance of rows starting with 1/* - 9/*, and delete rows as mentioned. In other data sets the string might start Gi1/*, and so on. In the following code, if I do not loop, and only test against 1 value type, and ONLY run it once, it works. As soone as I try to loop through all possibilities, or run the macro a second time, it blanks out the entire worksheet, starting at row 3.
Dim c As Long c = Worksheets(i).Range("A" & Rows.Count).End(xlUp).Row With Range("A3:A" & c) If Application.WorksheetFunction.CountIf(Worksheets(i).Columns(1), "1/*") < 12 Then . AutoFilter field:=1, Criteria1:="1/*" .Offset(1).Resize(.Rows.Count - 1, 1).EntireRow.Delete .AutoFilter
I have also tried to concatenate a variable with my CountIf criteria, but that fails miserably.
so this gives a part number depending on what number is placed in O6. What I need to do know is look at 2 different cells and for each combination of numbers give a different part number. so if A1 is 2 and B1 is 3 give a certain result.
Is there any way to remove the first part of a string of text in a cell and save the second part?
The first part of the text string is a team code that has a variable number of numbers, capital letters and sometimes spaces. The second part of the text string is a variable number of words in a team name that all start with a capital letter and have lower case letters. Every line has a different team code and team name.
The original spreadsheet also has a column with just team code. Is there a way of using this column to "subtract" the team code from the text string to just leave the team name?
I have a sheet where i have many differently named areas (like state1_1 and state1_2) When I doubleclick on a cell then a macro should run with following criteria: 1) Macro will run if the doubleclicked cell is part of any range in the list. Here I mean that names of ranges which belong to that list start with word state (like state1_1 and state1_2). No other ranges should not be in that list. If the cell is not in the range that is part of the list, then nothing should happen.
I have a spreadsheet with 2 worksheets. On the first "active parts" I have a list of active part numbers and on the second "All Parts" I have all of the parts available.
I want to compare every part in the All Parts worksheet to see if the part number exists on the Active Parts sheet - if it's there, I would like it to return the value "Active" in column B in All Parts. I have a formula in column B in All Parts that seems to work for the first few, but as soon as it finds one that is active, the rest of the cells below all return "Active".
I have 2 basic parts to a Macro which need to be separated by a pause of 1 second, before proceeding to the next part of the macro. Then pause for 1 second, and loop.
Application.Wait is no good to me as the spreadsheet must remain live, editable, and receiving updates from an external program linked via DDE. Below is the ...
i have a column of data part number part text e.g 7w1,8b1 in the next column i want to write a function that will look at the other and dependant on whats in it place a word e.g. for 8b1 i need it to look at the "b" and enter beauvale if theres no "b" but a "w" enter wollaton, i have tried an if function and used "*b*" but it doesnt seem to like wildcards ....
These cells contain a time reference either in '09:30 - 16:30' format or just an 'AM/PM' format.
What I need to do is to populate column B with the part of the string that comes AFTER the times in the text (either in hh:mm format or AM/PM format)
Example 336 Data 2012 Classroom Induction 2012/08/28 09:30 - 16:30 data about this ------> data about this 336 Information about this 2013/04/04 09:00 - 13:00 Information 2 ------> Information 2 336 info CHS Suffolk 2013/05/07 PM DRC, BSE ------> DRC, BSE 364 information 2013/02/12 AM DRC, BSE ------> DRC, BSE
I cannot get this to work and cannot use Text To column as there is no character I can use to split it.
In one cell I have multiple value:09/16/2013, 09/16/2013, 09/16/2013, 10/15/2013
I want to use the first read which is 08/22/2013. Not always i have multiple dates in my table.This is part of code that I am working on.What I usually do, to get the last value when I have multiple reads is:
I have select the cell C1, the multiple reads(dates) are in the cell B1, so i need the last read(10/15/2013) ;i use this code:
ActiveCell.FormulaR1C1 = "=RIGHT(RC[-1],10)+1"
SO now I want use the same logic but i want to take the first read/date. Also here the cell from where I want to get the value is selected.
Above the multiple reads were in the cell B1 and cell C1 was selected before performing the code, now the code is in the cell B1 and B1 is also selected.
I tried to do ActiveCell.FormulaR1C1 = "=Left(RC[-1],10)" but I rich the value in the cell on left which is A1. I want this for tomorrow since I have something to present.
If I have some data in a cell (let's say D1) such as "m-3,s-2,xl-4", what formula can I use in say cell D2 so that if I find the characters "s-" in Cell D1, then it will return the value "2".
Similarly, in say in Cell D3, I would then want to use the same formula but modify it so that if the characters "xl-" are contained within Cell D1, the formula will return "4"
Just "upgraded" my Excel to the 2007 version. In the old Excel, I could superscript part of a cell by highlighting the part I want, then going to "Format" and "Superscript."
In Excel 2007, it doesn't work. Yes, I can highlight the part of the cell I want to superscript, I can right-click and select "format" and "Superscript", and it even then shows as superscripted in the cell. That is, until I hit enter or move to a new cell. Then the superscript is no longer there. The cell is in "general" number format.
By the way, it did work in another cell: mg/l3 (3 superscripted) works. 742 (2 superscripted) doesn't work.
I have to perform a v-lookup to return a value but the problem is the cell I am looking up begins with but does not exactly match the the data in the table.
For example I want to look up sheet 1 cell A1 which is "Compass" in the table in sheet 2 column A and then return the associated value in column B. It is referenced as "Compass Group" in the table so I do not get a value returned if I use the exact matching function of the vlookup (i.e. using "false") but if I use the approx it one (i.e. "true") then it returns "Compagnie" which is the name listed before "Compass Group".
Basically I want to perform a vlookup function using a cell that begins with but not exactly matches a sting of letters in a table.
