Excel 2003
I have two columns of Data:
Column A Origin
Column B Destination
Each column contains:
KANSAS CITY MO 25300 RICHMOND CA 11300
I would like to strip out the 5-digit code
My worksheet is named "data"
I import data from another program in order to evaluate it. Unfortunately, one of the fields I need contains copyright data, however, it has been very inconsistently entered into the database. For example, sometimes the data appears "c1999." or "-1999" or "" or "[1999]" or even "19?" and also sometimes "1999, 1990" and many other variations on that. I discovered the link in the excel help file about extracting numbers from alphanumeric strings, but my situation is still too variable for it to apply; that file didn't take into account that alphanumeric strings don't always lump numbers and letters together. I was able to correct a few things, but my command of excel isn't knowledgeable enough to really come up with something effective.
Some ideas I had that I don't know how to implement: is there a way to strip non-numerical characters from an alphanumeric string? (I've been doing some find/replaces to get rid of some of it, but that is obviously not very efficient when I have to repeat this process daily.) Perhaps then I could just detect the first 4 numbers of the string somehow. However, that doesn't solve the problem of when a wild card is used as in "199?" or "20?" etc.
Bottom line, I just need to grab the first four numbers that appear in the string (but NOT additional numbers that occur after a wild card or a space if the year was not completed in 4 numbers; in that case I'd just be happy with a null value).
I've been doing this with a formula so far. My only experience with macros has been in simply recording them, not actually writing them, but I'll give anything a try.
I am using the code below that I got off of these forums to email a particular sheet in my workbook, but I need to strip all of the VBA code and the command button from the sheet being sent.
View 14 Replies View RelatedI have a range of cells where I need to strip out the numbers using a formula, is this possible?
E.g.
The data is:
110205 Contract Revenues
110215 Job Revenue
110802 Consumables
This would need to be:
Contract Revenues
Job Revenue
Consumables
formula to strip apostrophe for lookup formula to recognize text as a number.
View 9 Replies View RelatedI know ASAP has a feature to do this but I need the code in a bigger macro that I wrote.
EX: -1 needs to be 1
how to strip the time from a date formated field using "=INT()". At the moment this works fine for me but I wonder if there is a possibility to strip the day form the datefield as well.
View 10 Replies View RelatedI have a spreadsheet which has a "User Description" column. In this column, most users have data that looks similar to this:
APPLICATION - john.smith@mycompany.com
APPWEB - jane-doe@somecompany.com
APPWEB - john_doe@othercompany.com
APPLICATION - TP - paul@acompany.com
APP/APPWeb/DEV - paulsm@thecompany.com
There are also cells in this column which literally have a sentence long description, but those are not my focus. What I need to do is find a way to strip out the e-mail address found in the examples above and copy them into a new cell (the same row for the corresponding user). I don't know where to begin for this.
what is the differance between a multi page control and a tab strip control
View 4 Replies View RelatedHow can I strip out a name from a cell, see example below, I would need to remove the number and flip the name.
example:
Column A = Column B results
Blow/Joe 123456 = Joe Blow
Johnson/Mike 898930 = Mike Johnson
Mama/Joe 293810 = Joe Mama
Smith/John 389301 = John Smith
I've a column of data as below:
ROACH (#21)
SHARK (#11)
SHARK (#13)
UNICORN (#26)
ROACH (#20)
TRIGGER (#09)
UNICORN (#06)
UNICORN (#09)
UNICORN (#11)
VIMBA (#03)
VIMBA (#04)
TRIGGER (#06)
ROACH (#07)
ROACH (#08)
ROACH (#10), UNICORN (#24)
What I need to do it to strip off all the characters after the first space.
I assume I can use FIND and then LEFT, but how to I put this into a Macro?
What are the differences/advantages to these 2 controls in a User Form?
I have already seen that the tab strip doesn't seem to toggle b/t pages, as a frame I placed remained on both "tabs" (I am wondering what it does if you can't toggle).
I have a problem with a spreadsheet my colleague at work has designed. He has entered all the names into it as Mrs A Jones, Mr P Smith, Mrs S Pilkington-Smyth etc. I need to sort these into Alpha order using just the surname. macro or a formula to count backwards until I get a space and then strip this off to allow me to sort it.
View 2 Replies View RelatedI have just done a vba project of striping chars (QOOO1=) from each cell
and then sorting the records on column6/question6
however i have been able to do this and display results in second worksheet(Results2)
I feel there is a better way to do it and display the results on same worksheet
Could anyone take a look at the file and help.
IMPORTANT:Place curse on "Results2" worksheet and run the macro:Pres
Do not run the macro on main sheet all data will be lost and will have to download again.
File:[url]
Exported data in PDF and converted to Excel worksheet and some of the data contains a space in the year.
Example: 2/6/2 014 2:49 PM.
I used the =INT(A1) to strip the time off. Worked wonderfully. However when I need to sort by ascending/descending date , it does not put in order due to this extra space. Is there a formula out there that I can use to delete the space? All of the data doesnt appear this way. I am sure it is due to the conversion.
I want to strip only the leading set of numbers from a string. Trailing numbers should stay.
Logic rule would be:
1) Find first Alpha character
2) Remove all numbers prior to this position
Code:
Original string Desired string
42114DEP DEP
050114OP2OP2
0514OPOP
050214BKCKSBKCKS
05214CKCK
0502CKSCKS
050214CKS-3CKS-3
050214CKSACKSA
050214OPOP
50214PSCASH1PSCASH1
050214PSCKSPSCKS
0502SALES SALES
I need VBA to remove more than 3 blank spaces after the city & replace them with a comma & one blank. For example:
All in one column AB starting with row 7 I have:
Johnson City (13 Blank Spaces) NC 75503 (1 to 3 spaces after state & is OK)
Jacksonville (10 blank spaces) Fl 23854
Henderson (12 blank spaces) NH 28363 (12 blank spaces)
etc
I need all in one column AC starting with row 7:
Johnson City, NC 75503 (,space before state, same space after state ok)
Jacksonville, FL 23854
Henderson, NH 28363
etc
Is there an Excel function that can strip a specificed unwanted character from a text string to leave all the other characters excluding the unwanted one?
e.g. if the original text strings were (in separate cells within a workbook):
C-2C-9C-9-XA-10A-10-BA-10-XA-8N-7-D
The function would strip the "-" to leave:
C2
C9
C9X
A10
A10B
A10X
A8
N7D ...etc.
I have one hundred rows of data and within that there are some records which are the same and they will always be in pairs - identifiable by a cell with the same ref common to both records. how to strip out the records that are not part of a pair? I would like remove all of the non pairs and move them to another sheet.
View 2 Replies View RelatedIt's a linked post from:
[url]
I managed to do the combine the row if column B matches. However column D(quantity, number value), i want the quantity to add-up if column B matches. Any idea how do I modify the code below to do that?
for example:
TDG-**002 Tuna Cheese Pizza Bar (KG) KG 30
TDG-**002 Tuna Cheese Pizza Bar (MG) MG 30
TDG-**002 Tuna Cheese Pizza Bar (KG) KG 30
will combine to become
TDG-**002 Tuna Cheese Pizza Bar (KG) KG 60
I have a macro running this code to strip out unwanted formulas and formatting.
Sub Quote_Wrapup()
'To stop screen flicker
Application.ScreenUpdating = False
Range("CDandC").ClearContents
Range("qdata5,qdata6").Font.ColorIndex = 2
'To delete delivery address lines if 1st line empty
If IsEmpty(Range("deliver_line1")) _
Then Sheets(1).Range("deliver_rows").EntireRow.Delete
'No End If required as only one action as a result of the If
Range("Item_Nos").SpecialCells(xlCellTypeBlanks).EntireRow.Delete
Columns("A:E") = Columns("A:E").Value .........................
A spreadsheet based on my template has been sent to me because the macro won't run properly. When I try to run the macro I get a Runtime Error '1004' Method 'Range' of object '_Global' failed on the following line. Columns("A:E") = Columns("A:E").Value.
I'm trying to set up a stocktake sheet for one of the business' I work for. We use a letter = number cost pricing code on our products. ie: H=1, A=2, R=3, D=4, T=5, O=6, G=7, U=8, E=9, S=0. I would like to have 4 columns where A contains the qty, B the alphabetical cost code, C the deciphered numeric per each amount and C being the total price (ie column A x C).
View 11 Replies View RelatedI tried to show pictures according to numbers code in my list on the sheet 2, during the xploring of web i saw some examples with vlookup and data validation functions.
View 5 Replies View RelatedI have a code that opens another WB, and gather data from it. most of the lines look like this:
HTML Code:
wb.Sheets("Data").Range("K" & Rows.Count).End(xlUp).Offset(1) = wb2.Sheets(1).Range("M49").Value
However i need it to gather the sum: M49+M50, how can i do this without importing both values and then adding them in a 3rd column, like i am currently doing.
Product Group Arg.Braz.Mex.Peru
Red paint Paint5324
Blue paintPaint5684
WallpaperWallpaper6585
LampsFurniture 4631
ChairsFurniture 1645
Green paintPaint1356
SofasFurniture 3358
SUM(Paint,Argentina)SUM(Paint,Brazil)SUM(Paint,Mexico)SUM(Paint,Peru)
SUM(Wallpaper,Argentina)SUM(Wallpaper,Brazil)SUM(Wallpaper,Mexico)SUM(Wallpaper,Peru)
SUM(Furniture,Argentina)SUM(Furniture,Brazil)SUM(Furniture,Mexico)SUM(Furniture,Peru)
I am trying to work out VBA code or another way in Excel to find a solution for this problem - I need to be able to sum up the values that I have posted below - so for SUM(Paint,Argentina), this would be the sum of the red paint, blue paint and green paint values under the Argentina heading, that are all categorised into the 'Paint' group. The same follows for all the other categories. I was trying to use 'Defined Names' to group the categories together, and so would then do =Sum(Paint). However this was not allowing me to sum by each country, and the 'Create from Selection' naming tool was not naming all of the values for Paint (blue paint, red paint, etc.) under the paint category.
This is an incredibly simplified version of the data I am actually dealing with - I am doing this for 70 country columns and 250 rows of product categories.
Please refer to attached sheet.
I have numbers in column A thru G.
I need unique numbers from this list in column J as shown.
Im trying to make some code to go through a list of numbers, and pick the next highest number from the one entered in a form. Then I need to do some processing with that number (i need to create a worksheet with that number as the name, and place that number in a few cells on that worksheet, and the main worksheet, but thats all stuff i think i can do).
View 14 Replies View RelatedHow to write code to produce 17 rows of 0s, then 17 rows of 1s ....all the way up to 120. So that would be 2040 rows altogether. It takes forever to do it manually.
View 5 Replies View RelatedThe below code looks in a certain column and deletes rows based on values less than the entered value in the input window. The problem with the code below is that it does not remove rows that have negative numbers. There is the possibility of a negative number being in the column so I would like to have that removed as well.
What would the code look like to add to the current code to remove the rows that have negative numbers? -1, -2, etc.
Sub Delete_Part_Input()
Dim Qty As Integer, i As Integer, ans As Variant
Qty = Application.InputBox("What total quantities would you like to delete? Note: This is the value located in the C column.", Type:=1)
If Qty = 0 Then Exit Sub
ans = MsgBox("All totals with a quantity of " & Qty & _
" or less will be deleted." & vbCrLf & vbCrLf & _.............
Hey Have a spreadsheet with about 150 worksheets in.
In Column B of each worksheet is a list of packages
e.g.
Value Added Processing
Business Viability
Environment
Climate Change
I need to add into that other cells to further divide those packages so it will end up looking like
Value Added Processing
GA001
GA003
Business Viability
GA005
GA032
GA065
Environment
GA023
Climate Change
GA030
GA029
I have a separate worksheet which has the 37 different package types along ROW A from Column A to Column AH, then going down underneath each of the heading is the various code numbers as shown above.
Has anyone got a VBA code which will allow excel to search the worksheets, find the package name and then replace it with the package name but also insert the code numbers below it.