Copy Last Part Of Text And Paste To Next Column
Nov 15, 2012Example: A1, I go to school (001). I would like to copy only (001) and past to B1. like that and process to the last row of A1. or I would prefer manual last row.
View 9 RepliesExample: A1, I go to school (001). I would like to copy only (001) and past to B1. like that and process to the last row of A1. or I would prefer manual last row.
View 9 RepliesI have data that looks like this:
ADD ADD 5
ADD EMPTY 2
AGAINAGAIN26
AGAIN EMPTY17
AGAINBACK 1
ALL ALL 24
ALL EMPTY19
ALRIGHT FINE 1
ALRIGHT OKAY 2
ALRIGHT ALRIGHT3
ALRIGHTEMPTY3
ALRIGHTRIGHT1
I want it to look like this:
ADD ADD EMPTY
5 2
AGAINAGAINEMPTY BACK
26 17 1
ALL ALL EMPTY
24 19
ALRIGHTFINE OKAY ALRIGHTEMPTYRIGHT
1 2 3 3 1
i.e all the entries from column B that have the same thing in column A should be on a row together, with the number from column C under them.
If that's a bit hard then it would be OK if it looked like this:
ADD ADD 5
ADD EMPTY 2
AGAINAGAIN26
AGAIN EMPTY17
AGAINBACK 1
ALL ALL 24
ALL EMPTY19
ALRIGHT FINE 1
ALRIGHT OKAY 2
ALRIGHTALRIGHT3
ALRIGHTEMPTY3
ALRIGHTRIGHT1
test.xlsx
I want the VB Code to do the following;
For each row in Column C, if the text starts with "Calls from service no", it must extract the last word and paste it into corresponding row in Column A. So if the macro finds a cell in Column C starting with "Calls from service no..", then the last word (the last word will always be a number and is seperated with a space) of this cell must be pasted in cell A45. So it must continue for all occurances in Column C. Sample of text in cell = "Calls from service no 0431324345" and "Calls from service no 3242134254" etc.
I also require similar, but this time it must extract as shown below.
If text is found in Column C starting with "Local" or starting with "Long Distance" or starting with "Mobile", only this text, ie "Local" or "Long Distance" or "Mobile" must be pasted in Column B.
It can be 2 different macros that I can run.
Essentially, I have 2 Sheets:
"SheetWSS" = data to be copied
"SheetWSD" = destination of copied data.
Below is a sample of the data in "SheetWSS"
----------A------------------------B-------------------------C
1------Trade ID -------Description---------System no.
2--------579----------------Loan ---------------------- 7
3--------580----------------Deposit---------------------22
4--------702----------------Deposit--------------------- 11
5--------703----------------Loan ----------------------- 58
6--------732 ---------------Loan------------------------66
7--------733----------------Deposit-------------------- 99
etc...(no more than 10000)
Now, an explanation of the data:
1) I work for a small bank (CORP) that takes deposits and gives loan.
2) CORP books these trades using only system no. 7 and 11; other system nos. belong to customers.
3) When a single trade is booked, the 2 sides of the transaction is recorded (by Trade IDs) . E.g rows 2 and 3 relates to one trade. So if CORP loans money with system no.7 to CUSTB, who uses system no.22, it shows for CORP a loan and for CUSTB, a deposit.
4) Everyday, the data in "SheetWSS" is updated with a different number of rows from previous, but the number of columns remain the same.
So, here's what i'ld like the macro to do:
1) Go into Column C, find system no.7 and 11.
2) For each 7 and 11 found, Copy the next row . So if for e.g, system no.11 was found in C4, i want the ENTIRE ROW 5 to be copied.
3) Paste the entire next row in "SheetWSD" until we have a list of all opposing sides of the same transactions initiated by CORP.
My file is included with alot of cell in the following format:
aaaa. bbbbbbb (ccccccc)
I want to copy the first part (aaaa) into column A and to copy the second part (bbbbbbb) in column B. Both part can vary in length: in this case their length were 4 and 7 but basically they can have any length. How can i do this. See also the attached file.
Here's the situation (an example):
I have sheet1 that contains the following information
Column A Column B
company1 - book value 0,5
company1 - earnings 0.2
company1 - R&D 1111
company1 - total assets 200000
company2 - book value 2
company2 - earnings 333
company2 - total assets 12
So column B contains only numbers and note that for company 2 I do not have any numbers on R&D.
I have in sheet2 only once the company name. I would like now that if column a contains the text "book value" to have the value of column B pasted in sheet 2 column B. Same for earnings to be pasted in column C. R&D in column D and if R&D is not present for that company then the value should say something like unknown.
I have to sort list of thousands name (3000 names) and remove duplicates. My problem is majority of the names have their title (i.e) Prof. Dr. Ir. Sir. etc typed in, so I need to copy the title in different cell and have their name only. Here's what I expect:
Current List ----> Column A -->Column B
Drs. H. A. Andrew Boston, MRE. ----> Drs. H. --> Andrew Boston, MRE
Drs. H. Andrew Smith ----> Drs. H. --> Andrew Smith
H. Abd. Mohammed Junus ----> H. --> Abd. Mohammed Junus
Prof. DR. Jane Doe, MD ----> Prof. D --> Jane Doe, MD
Prof. DR. Ir. H. Randy Wong, MBA --->Prof. DR. Ir. H. -> Randy Wong, MBA
Dra. H. A. Karen Patel ----> Dra. H. --> Karen Patel
Drs. H. A. M. Kangkong ----> Drs. H. A. --> M. Kangkong
Prof. Drs. H. A. Kareem Saleh, Ph.D -> Prof. Drs. H. A. ->Kareem Saleh, Ph.D
Dra. Hj. Nina Schorder ----> Dra. Hj. --> Nina Schorder
Ir. Abdul Jabbar ----> Ir. --> Abdul Jabbar
I have column t6:t23 on sheet one that i want to copy and paste to the next available column in sheet2 but it has to start looking for the next available column starting at at row2 because row 1 has column header.
I know this can be done with (xltoright) just not sure how to do it
I need to put a part of a text from a column and place it in a new collumn. At this moment I use 2 columns and an extra sheet to solve this.
I have a collumn with a lot of data like:aaa-bc
bbb
abc-ba-bd
aa-bb
bbb-xx-yy
aa
abc-yy
klmn-zz
klmn-yy-ff
What I need is behind every cell a new cell with only the 1st part like:aaa
bbb
abc
aa
bbb
aa
abc
klmn
klmn
What I do now is use a new column with this formula:
[Code].....
And I made a translation table in which the 1st 4 characters are translated to what I want to see. In a 3d column I use
[Code]....
to get the results I need. Since I need to get results like this very often this method is very time consuming.
Is there a formula available I can use with only 1 new column?
see attached spreadsheet. In sheet 1 I would like to look up each word in column D, seeing if they are in column B at all. Note if the word "Jill" is in D and "jilly" in a surname in B I would like it to get picked up. I have highlighted manually those that would get picked up. Those that do get picked up I would like to be copied into column C as per sheet 2 (this is what I would like it to end up like). There is a very long winded way of doing this using a find function and 1 column per word but as the actual sheet i'm using has thousands of different words this isn't really viable!
View 8 Replies View RelatedI 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
copy/paste Every Sheet Single ( P Column ) and Paste to Notepad and take P1 As file name for note pad.
View 1 Replies View RelatedIs 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 want to copy and paste from one sheet to another based on column a using a macro copy button.
E.g. if column a value = apple then copy that row into the apple sheet.
i attach the testing2.xls attachment here. from the sheet 1 "original", how to copy from 1 column, column"B" and then paste to column "A" by clicking function "alt + enter" at the same row but different row in the same cell. Output result can refer to the sheet 2 "output".
View 4 Replies View RelatedIn sheet "diary" I have data in certain rows in column A8:C10000 that contains values if a certain condition is met. I need a vba to copy and past only non blank cells in column D8:F10000. I first wrote a formula with index but it takes too long to caculate.
View 9 Replies View RelatedOn sheet1 have multiple groups of cells with drop down lists all with the default word "None" selected. After the user has gone through and changed some of these menus to other values in the lists, i am looking to copy the text only in the cells that have been changed to certain locations on sheet2. See attached spreadsheet for a better idea. If any additional info is needed.
View 5 Replies View RelatedIf a cell contains the formula =b1 and the result shows as zero;
Is there any way of getting the text "=b1" in a cell next to it instead of zero?
We have a template sheet we use which has a sheet formatted as 'text' - it msu remain this way for another purpose.
We wish to copy information from other sheets/places and paste into the template sheet - but have it as text (with green triangle on it)
I have tried copy and pasting (the sheet is already formatted as text.
I have tried copy and paste special as values but to no avail.
(I have attached a small example which shows the template, data to past and end result of what I require - the redtab sheets are attempts to paste!
I know there is a really simple solution but I cannot for the life of me see it!!!!!!
Please help! Auto Merged Post;I kept searching and have found a way to do it on 1 column...
(Data/Text to columns....text)
- but how do you do it over a sheet that contains say 120 columns (i.e.: en masse)..???
Code:
Range("a" & Cells.Rows.Count).End(xlUp).Select
Range(Selection, "a1").Select
For Each cell In Selection
If Not IsEmpty(cell.Value) Then
If cell.Value "2012*" Then
cell.Copy
cell.Offset(0, 5).PasteSpecial
End If
End If
Next cell
I have a to copy from column A some cells ( e.g "000005PR RODI T.R, S.L.") and paste it in column F. The problem is that in column A i have as well empty cells and cells that have date (e.g "2012 02 14-OCT-2011 CN 100725") . Neither the IF/AND nor the "double" if constructs are working .
I want to copy a cell from a column and paste it to next column and up one row. My current data looks like this:
DATA
1234
I want to make it look like: DATA 1234
I copied and pasted text (last names) from Website A into File A. Then did the same from Website B into File B. I wrote index match formulas to compare columns between files. I've done this literally hundreds of times, and it's always worked. This time, however, I get ZERO matches - even though there are lots of them. Troubleshooting was straight-forward: it has to be website B. (Strange thing is, I HAVE used text from website B before in similar applications with no problems.) Something in the way they present the data is preventing matches. (Everything works when I manually type over text from Website B.) It's not an upper case/lower case problem. I tried copy-pasting values only - to no avail.
View 4 Replies View RelatedI have a drop down list. When I choose something from the list, it creates a description (text) in the next cell. I need to be able to copy/paste the text from the cell, but it will only let me choose the formula instead.
View 4 Replies View RelatedFinding any specified Text like "Cube" down a specified Column in this case "D" when Text has been found
Copy the 24 cells directly below and Then Paste to G1.
I have a few macros that run until line x currently. I've tried to incorporate xl down into my macro but must have misplaced it. I need to paste until the last line of text in column B.
Sub vlooktest()
'
'
Range("C4").Select
ActiveCell.FormulaR1C1 = _
"=VLOOKUP(RC[-1],'Raw List'!R1C1:R26000C9,3,FALSE)"
Range("D4").Select
ActiveCell.FormulaR1C1 = _
[Code] .......
I have a cell that contains various data but in the cell there will be a string of characters that will begin with either ON or TN followed by numbers. What I would like to do is have the sheet look at that cell and if there's a TN12345 (or any combination of numbers) or an ON123456 (same idea as the TN) I would like the sheet to pull just the ON or TN number out and paste it in a specific cell. The ON would have it's own cell to be placed in as would the TN.
Here's an example. C5 contains various data, a mix of text and numbers but it will have either an ON or a TN or both. I would like the sheet to automatically pull the TN number out and place it in A5 and the ON in B5. I would like this process to repeat all the way through the sheet to the max amount of rows since I have no way of knowing how many rows I'll need. Can this be done with a simple IF formula or does it have to be done in VBA or is it not possible at all.
This may seem dumb but I'm having trouble pasting the contents of a column in one spread sheet into a column in another spread sheet. I get the error message about the copy area and paste area not being the same size. The data in the column is nothing complex, just a list of names, but there are 2500 of them so typing or copy/pasting each one individually is not a desirable option. I've been on this for hours with no success. The only hurdle that may complicate things is the sheet that I want to paste to is using the top 12 rows as a 'home-made' header so I need to start the paste at row 13.
View 4 Replies View RelatedI have a workbook that writes what I need to do. When done I need to type in another sheet the exact same text and the date I did it.
I wonder if its possible to add a checkbox and when this checkbox is pressed it will automatically copy/paste the text to the next free cell of the other sheet, so I only need to type date.
Here is the workbook: [URL] .....
Check box would be added in cell A17, A18, etc.
And the text would be copied to sheet Preventive Maintenance Records in the next available cell in column A.
I have a workbook with many sheets in it. Within each sheet there is a cell with the Text "March 09" there are then 3 cells to the right of this cell with relevant information. Is there a Macro that can search for this text March 09, then copy this and the 3 cells to the right of it and paste special this information 1 cell below for all 4 cells.
View 2 Replies View RelatedI have the following script to copy values from one sheet to another, is there a text version of this script, to copy text rather than values without having to copy and paste.
Code:
Sheets("WS2").Range("A1:a65000").Value = Sheets("WS1").Range("a1:A65000").Value