Extracting Numbers From Cells, Then Pasting Them Into Another Sheet?

Sep 1, 2009

Yes, I am a newbie to VBA. I've tried for hours now to come up with code to make this work, but no go.

Here's the situation:

There are a list of cells all in column A (row ? - ???) that have a string that needs to be searched to locate a number, and insert that particular number into a cell in another sheet, which is in another workbook.

These are actual examples:
*001 RJ 17 17 1,436 316 28 17 0 0 0 0 0 0
*042 RJ 39 39 215 215 0 39 0 0 0 0 0 0
*03A RJ 8 8 282 202 2 8 0 0 0 0 0 0


The numbers needed from these examples would be: 1,436
215
282
End results:Trip 001 = 1,436
Trip 042 = 215
Trip 03A = 282
FYI...The cell data always starts with *, and is followed by three characters we refer to as a Trip, then a space, and then RJ.
The column with the data is always "A", but the starting row may not always be the same. The rows continue down one by one, but there may not always be the same number of rows (each row used will ALWAYS start with an asterisk, though.)
The number that needs to be extracted is always between the 4th and 5th spaces - CHR$(32)'s.
The numbers, once found, then need to go in another sheet into one of the following cells - C28, C29, C30 or C31. Which cell the number goes into depends on which one of the cells, C28-C31, matches the three character Trip text shown after the *. There are currently 16 different sheets that need to be searched to find where the matching Trip number is. The sheet names do not change.
and yes, the people always enter everything shown in the example into one cell.

View 9 Replies


ADVERTISEMENT

Pasting The Sum Of Two Cells From One Sheet To One Cell In A Different Sheet

Nov 10, 2006

I'm trying to write very simple code that copies totals from one worksheet and pastes to a different worksheet. Normally, it is a one cell to one cell copy/paste. For instance, I want to copy the total found in cell "C4" in Worksheet "BalanceSheet" and paste it into cell "C14" in Worksheet "SpreadFinancials." I'm able to do this fine, and the code below is what I've been using.

Occasionally though I'm needing to sum up 2 cells in Worksheet "BalanceSheet" and only copy/paste the summed total into one cell in Worksheet "SpreadFinancials". For instance, I want to sum the totals found in cell C8 and C9 in Worksheet "BalanceSheet" and then paste that summed total into cell "C8" in Worksheet "SpreadFinancials". I'm looking for simple code that does this. Here's an example of what I've been doing so far for one cell to one cell copy/pastes:

Sub PopulateFinancials()
Sheets("BalanceSheet").Range("C4").Copy Sheets("SpreadFinancials").Range("C14")
Sheets("BalanceSheet").Range("D4").Copy Sheets("SpreadFinancials").Range("E14")
Sheets("BalanceSheet").Range("E4").Copy Sheets("SpreadFinancials").Range("G14")
End Sub

View 4 Replies View Related

Test And Sum The Same Range Of Cells In Each Sheet By Simply Coping And Pasting The Formula

Feb 2, 2010

On Sheet1, Row 2 I have my columns named January-December, which correspond to the names of the other 12 sheets in my workbook. I want to test and sum the same range of cells in each sheet by simply coping and pasting the formula. I am using INDIRECT and SUMPRODUCT, but is there a better way? It seems to have caused the sheet to run slowly. Perhaps it's just the amount of data. Here is an example of the formulas I am using:

=SUMPRODUCT((INDIRECT("'"&B2&"'!$B$3:$B$200")=$A$2)*(INDIRECT("'"&B2&"'!$C$3:$C$200")="Yes")*(INDIRE CT("'"&B2&"'!$E$3:$E$200")))

This gives me the intended result. B2 in this case is January. C2 is February and so forth.

View 3 Replies View Related

Extracting Numbers From Text And Turning The Numbers Into Rows Of Data

Feb 23, 2010

The format of the text in which I need to extract numbers is as follows:

23411268 - 23411270

Need to extract the following:

23411268
23411269
23411270

These numbers have to be listed in three seperate rows.

View 14 Replies View Related

Extracting Numbers From Alphanumeric Strings (unite The X Amount Of Numbers)

Aug 16, 2008

Is there a way either by VBA or manually (preferably both, if possible) to actually unite the X amount of numbers that are in a cell given the contents is alphanumeric? I'll give you the following examples to see if you can understand what I' referring to?

DATA output should be
asd67,h876 --------> 67876
2,3,ujdj5&34 -------> 23534
909k86m34 --------> 9098634

View 14 Replies View Related

Extracting Numbers From Alphanumeric Strings (strip Numbers?)

Aug 15, 2008

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.

View 9 Replies View Related

Extracting Numbers :: Pull Numbers From Another Column

Oct 24, 2007

I'm trying to pull some numbers from another column. I want to pull the numbers that have an X separating them like 7X125, 48X192, and 27X90.

Example:

FA, VF-2000-3-7X125-18-A, AFS
FA, VF-2350-48X192-6-RGB, FC
FA, VF-2020-27X90-18-A,RFI, FEX, ACP, 2IT

View 9 Replies View Related

Pasting Cells To Another Sheet If Another Cell = "yes"

Aug 14, 2008

I have started to actually write a few macros for myself and am doing ok ish. this one has stumped me. I would like all open sheets to be considered. if any cell on row 12 on any sheet is changed to "yes", i would like to have from the sheet it was changed on, the following cells copied (some update at intervals, so i would like them copied so they show what is in the cell at that time and then not change with the update)

the sheet name pasted into A144 of sheet 5

the cell from row 6 that is on the same column as the "yes" pasted into B144 of sheet 5

the cell from row 9 that is on the same column as the "yes" pasted into C144 of sheet 5

the cell from row 10 that is on the same column as the "yes" pasted into D144 of sheet 5

if another cell on any sheet is then changed to "yes", i want it to do the same as above, but paste it in row 145, then 146, etc so i end up with a log of those cells when a cell on row 12 = yes

View 12 Replies View Related

Pasting Only Numbers From A Cell

Aug 12, 2014

I have cells that include phone numbers emails and names and I just want to copy and paste the phone number, how do I do that ;?

View 3 Replies View Related

Numbers Not Pasting Right In The Cell?

Nov 25, 2013

I'm trying to paste the number 1-987654321 into cell A1. But when I click the cell onces then Ctrl+V to paste, it converts the number. It puts 1 into cell A1 and 987654321 into cell A2. I've tried changing the format of the cell to TEXT and GENERAL but that doesn't work. Now I can double click the cell and then paste and that works. My only issue with that is all the other data I'm pasting into the spreadsheet, I'm able to do so by only clicking once. This spreadsheet will be used by 20 people and I'm afraid that if they paste by click once in all the other cells and have to double click to paste in this cell, that it will cause confusion and a headache for me.

View 4 Replies View Related

Calculating Total Time In One Sheet And Pasting Results Automatically In Another Sheet

Apr 21, 2014

I have an excel workbook which requires us to enter the log details of some sites and then a report is generated using these logs (report attached) . [URL] .......

I want that excel should automatically identify the site and calculate its outage with the following formula:

Outage %age= Total Outage(min)/100.80
and add it in the respective column while identifying the outage.

e.g. if outage is of power then the calculated %age outage should be pasted in the power outage column in front of the respected site.

e.g. in the sheet attached above the first row in the first sheet states that SKU2326 was down for 50 mins

Now %age outage will be
Outage %age= 50/100.80
Outage %age=0.496

Now as the outage is related to power so this outage should go into power column in sheet number 3 labelled as "Network Total Up time Week#17"

Now the next time SKU2326 becomes down it should be added with this 50 mins and the outage calculated as presented above.

View 1 Replies View Related

Extracting Numbers

Feb 4, 2006

i need a formula to extract numbers.

if cell a1 is "3cash 5stock", i want to extract the number "3" to cell a2
and extract the number "5" to cell a3. the number in cash stock can vary
between 1 to 8 and vice versa.

View 14 Replies View Related

Pasting List Of Text And Numbers From MS Word

Jan 17, 2010

I have a very large list of top scorers for a sports team MS Word. The name and number of goals are both on the same line. Is there any possible way I can past them into Excel, so as they are pasted into 2 separate columns?

View 2 Replies View Related

Extracting Numbers With Letters

Aug 21, 2014

In column A I have the following numbers

13710
14782H
9827
14782
14206B

a formula that looks at this range of cells and returns only the cells that have a letter at the end. The letter range goes A to M

View 6 Replies View Related

Extracting Numbers From Text

Jun 13, 2009

I need to separate text information from a cell into 3 columns (W,9-8). The first letter I know how to extract. The problem is to extract the number in the middle (1 or 2 digit) between "," and "-" and also the last number. For the last number I could use right() function but the problem is that number could be 1 or 2 digits so I can not specify in advance so formula would have to extract the last number till "-". Anyone knows how to do this?

View 6 Replies View Related

Extracting Negative Numbers

Aug 17, 2009

I used this code to extract the value on the text: "11/09/09 backyard $400"

=IF(ISNUMBER(SEARCH("back",A4)),RIGHT(A4,LEN(A4)-FIND("$",A4))+0,"")

and return "400" but i've encountered a value which is negative (could be
-$400, or ($400); and i got an error of #value, could anyone resolve this problem?

View 6 Replies View Related

Extracting Numbers From Cell

Feb 24, 2009

I have a cell containing text and numbers not in same order.. how do I extract only the number out into a cell.

View 14 Replies View Related

Extracting Numbers A From String

Aug 25, 2009

I would like to extract the digits below in red. The variables are the digits in all of the sections vary from a minimum of one digit to the maximum of three digits.

111.222.333.444

View 2 Replies View Related

Extracting Numbers From Words

Feb 7, 2013

In cell a1 I have the following:

Distance: 515 meters

In cell B1 I just want the numbers and want a formula that will extract them from A1 so in cell B1 it reads 515

View 6 Replies View Related

Extracting Numbers From A Sentence

Mar 18, 2007

I play an online browser game and I've made a spreadsheet for tracking various aspects of the game.

I do okay with the simple formulas and can haphazardly get excel to do what I want it to do. But for a few things I want it to do, I've run into a wall...

Here is the first one:

In the game, I receive reports like this:


One of your fleets (Large Cargo:5 ) returns from [2:100:9] to Planet [2:101:13] . The fleet is delivering 58.679 Metal, 28.750 Crystal and 11.521 Deuterium.

I want to be able to copy that, and past it into A1. Easy enough, but here's the tricky part. I want excel to be able to automatically extract the numbers in front of metal, crystal, and deuterium into their own separate fieilds. So that in this instance B1 would display 58,670, C1 would display 28,750, and D1 would display 11,521.

The amounts can vary anywhere from 1 to 9,999,999 (but there will be no negative numbers), and in some cases the number would end in 0 (I've seen where that makes a difference in some formulas for some reason).

If it makes it easier, the copy/paste could be reduced to:


The fleet is delivering 58.679 Metal, 28.750 Crystal and 11.521 Deuterium.

View 9 Replies View Related

Extracting Certain Numbers From String

Feb 6, 2009

I have not managed to find exactly what I am looking for so far..

I have cells with a mix of numbers and strings and I would like to extract certain numbers only.

I.E.
123a bcd8
acbd 1234e

I would like to only extract the first instance of numbers - so in example 1 - 123 and in example 2 - 1234. I have found various methods of extracting all numbers such as:

Function ExtractNums(r As String) As String
'Creates and returns a reference for a regular expression object
With CreateObject("vbscript.regexp")
'Sets the pattern to be non-digits
.Pattern = "D"
'We want to find all matching non-digits
.Global = True
'Replace all non-digits with an empty string and return this value for the function
ExtractNums = .Replace(r, "")
End With
End Function

View 9 Replies View Related

Extracting Numbers And Text

Mar 6, 2009

I need help extracting numbers from text. In column A, I have a list containing entries like this:


0005 Nurseries — propagation and cultivation of nursery stock
0016 Orchards — citrus and deciduous fruits
0034(1) Poultry Raising
0034(2) Sheep Raising and Hog Farms
0035 Florists — cultivating or gardening

The list goes on for about 800 rows.

In column J, I have this forumula:

{=LEFT(A1,MATCH(2,1/ISNUMBER(MID(A1,ROW(A2:A100)-ROW(A1),1)*1)))}
It works great, except the result includes the left parenthesis: for example, J3 = "0034(1". Is there a way to obtain just the numeric value ("00341")?

Also, is there another formula I can use in column K that will do the opposite and extract only the text? For example: K1 = "Nurseries — propagation and cultivation of nursery stock" and K3 = "Poultry Raising".

View 9 Replies View Related

Extracting Numbers From Within Text

Apr 24, 2009

I'm usuing the below formula to extract numbers from within text and also dropping off any leading zeros.

Formula in B2 copied down.

Is there any other/better way? ...

View 11 Replies View Related

Extracting 3 Highest Numbers

Aug 1, 2009

I came up with a way to extract entire row corresponding to the highest number in L column and to post it in the different sheet.

I have 2 issues to solve though.

1. I need to extract only 13 ranges corresponding to the highest number in L column - ( A through M) - not entire row.

2. I need to do the same with the second and the third highest numbers of the same column L.

This is what I have so far:

Sub extract()
Dim first As Range
Set first = Range("L" & WorksheetFunction.Match(WorksheetFunction.Max(Columns("L")), Columns("L"), 0))
first.EntireRow.Select
Selection.Copy
Sheets("Result").Select
Range("A1").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
End Sub

View 9 Replies View Related

Extracting Only Numbers From Order #

Mar 5, 2010

If I have a column of order numbers like this:

PPD789963PPD789964PPD789965PPD789966PPD789967PPD789968PPD789969

How do I extract only the numbers so they look like this?

789963
789964
etc...

Left function?

View 13 Replies View Related

Pasting Data On First Blank Sheet On A Sheet

Jun 19, 2012

I have several sheets with one master sheet. I have a trigger on each sheets that manipulates the data on that particular sheet. Here is the code I'm using:

Code:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim r As Range
Dim cell As Range

Set r = Intersect(Target, Range("A:A"))

[Code] .....

Now the point where i put new code is where i want the information from that particular row, column a thru column m to be special pasted linked to the first blank row from the top down to be pasted starting over from Column B. so A1 would be pasted on B1. I ran the recorder and got this as the code ActiveSheet.

Paste Link:=True so i do i incorporate what i want.

View 2 Replies View Related

Copying Sheet Data And Pasting It To A New Sheet

Jun 28, 2006

I have multiple worksheets and I am looking to take specific information from those worksheets and paste them into a new one, thereby compiling the information.
The "C" column is populated with certain cells that say "Not Acceptable". This varies from sheet to sheet, but all in the C column. I'm looking for a code that will run through all the sheets, find the cells that say "Not Acceptable", copy that row of information it is in, and paste it onto a specific sheet that we'll call "Summary"

View 4 Replies View Related

Extracting Numbers From The Right Of An Alphabetical Tring

Dec 10, 2009

I have a list of items like this

aas12
aabc2
sw1234

I would like to be able to get 2 resulting columns containing just the string of alphanumerical characters and the numerical characters.....

View 4 Replies View Related

Extracting Numbers From Text And Then Adding Together

Oct 28, 2006

I am using Excel to collate the averages for my cricket team. All the players are listed in column A, followed by their scores for each individual game throughout the year and ending with a total runs column for the season.

My problem arises when I have to give an indication that a player scored runs but was "not out", which impacts on the overall averages because a player who is not out is credited with the runs scored but not charged with an innings. So a player who made 15 not out is credited with "15no" in my workbook.

As a simple example: Player's name (Barry Smith) appears in A1, then his five scores: 23, 15no, 35, 125no, 2 in cells A2:A6. SUM($A2:$A6) entered in A7 ignores the cells that also include text (the "nos") and gives me a total of 60. Is there a formula I can enter in A7 to disregard the "nos" and just read the digits in those cells to come up with the grand total of 200? The run totals can be 1, 2 or 3 digits and I can split the "no" from the number (i.e. "15 no" instead of "15no") if this makes things easier.

View 9 Replies View Related

Extracting Both Numbers And Text From A String

Jun 21, 2007

I have a woorkbook where I have a cell that has the following apperance:

12345678-ABCDEFG

The numbers can vary in length and as well as the text. What I am trying to do is to split this cell into to columns. Column 1 shows the account number, Column 2 should show the Text and the "-" sign should not be in any of the columns ie it should look something like this

Column1 Column2
12345678 ABCDEFG

I have found a useful function for the first part thanx to Mikerickson
URL:Extract Numerical Data

Function midNumber(inputStr As String) As Double
Dim i As Long
For i = 1 To Len(inputStr)
midNumber = CDbl(Val(Mid(inputStr, i)))
If midNumber <> 0 Then Exit Function
Next i
End Function

But how do i seperate the text and how do Crete a macro that would loop through some 2000 rows and create a column A and B from Column A?

View 3 Replies View Related







Copyrights 2005-15 www.BigResource.com, All rights reserved