Set Of Column Data Move To Different Column And Delete Unwanted Column VBA
May 29, 2014
I have set of data Pasted in 4th row, in the top row 44 columns values assigned i want move data from set of data to different column among these 44 columns
Like "Service Order ID" is 1 column in set of data ,it move to second column of top row
Some of column need to delete. (Service Order Type,Service Order Description,Created By,Status,Contact,Expected Delivery Date,
Column A | Column B | Column C Los Angeles | Fire Dept | 3 Los Angeles | Health Services | 12 New York | Fire Dept | 8 New York | Health Services | 22 New York | Internal Services | 100 New York | Public Works | 7 Chicago | Health Services | 15 Chicago | Public Works | 56 Chicago | Social Services | 4
And I am trying to make it look like this:
Fire Dept Health Services Internal Services Public Works Social Services
We have a client that provided us with a text file that we imported into Excel. Rather than have the entire record in one row, they have the record in 4 rows.
What I need a macro or something to do is move award 2 award 3 and award 4 into the same row and after doing this delete the other rows.
Below is an idea how this looks. 1JohnSmithstreetcitystateZIPaward 1 2JohnSmithstreetcitystateZIPaward 2 3JohnSmithstreetcitystateZIPaward 3 4JohnSmithstreetcitystateZIPaward 4 5BillJonesstreet2city2state2ZIP2award 1 6BillJonesstreet2city2state2ZIP2award 2 7BillJonesstreet2city2state2ZIP2award 3 8BillJonesstreet2city2state2ZIP2award 4
What we need for our data to work is: 1JohnSmithstreetcitystateZIPaward 1award 2award 3award 4 2BillJonesstreet2city2state2ZIP2award 1award 2award 3award 4
I am in need of restructuring a spreadsheet of addresses for mailing purposes. (I tried to find something similar answered previously, but nothing seemed to work for me.)
I have attached a small example spreadsheet below, but our spreadsheets can be hundreds or thousands of rows in length.
I need a macro that will look for the "PO Box" addresses under the column headers named "ADDRESS2" and "ADDRESS3".
The PO Box addresses will need to be moved under the column header "ADDRESS1" within the same row.
It will need to overwrite the text that is already under "ADDRESS1" and delete the text from the "ADDRESS2" and "ADDRESS3" columns - UNLESS the text in 'ADDRESS2" is a PO Box AND "ADDRESS1" begins with "c/o".
If the data in "ADDRESS2" or "ADDRESS3" is anything other than a PO Box it will remain the same. As will "ADDRESS 1".
Basically if there is a PO Box it needs to be in the column named "ADDRESS1" and overwrite anything else that was there. The exception will be for PO Boxes that are in c/o someone else, the PO Box will then need to be listed in the column directly after the column that has c/o.
If the c/o exception will be too difficult the code could just highlight those scenarios and we could fix them manually. We usually do not have a lot of them, but enough that we need to be mindful of them.
The different scenarios are listed in my sample spreadsheet.Also, the code will have to use the column header names in row 1 because those headers are not always in the same column.
I am trying to move a column of numbers based on the information in another column. I've been looking for about a week and find macros that are close but not quite.
In one column it reads Mobile, Home, or is blank. If the number is a Mobile (column R), the area code (column P) needs to move to column S and the phone (column Q) needs to move to column T and the primary phone (column R) needs to move to column U. Home and blank cells remain as they are.
area (P) phone (Q) primary phone (R) col S col T col U
I have a spreadsheet that I need to rearrange to improve readability. I have an example attache, which is easier to understand than describing it, but I'll try:
I want to start in a1, move to a2 copy a2 to b1 delete line 2 (the previous lrow 3 now becomes row 2 if a2 > 0.01, skip it and move & select cell a3 ... and repeat the above logic, on the next series of cells...
E.g. copy a3 to b2 delete line 3 (the previous lrow 4 now becomes row 3 if a3 > 0.01, skip it and move & select cell a4 ...and repeat the sequence again.
I have two different Excel reports and the data needs to be copied from each column on one spreadsheet and pasted to the bottom of the equivalent column on the other spreadsheet.
So, is it possible to get a macro that will copy the data from one column then paste it to the next free cell in the column on the other spreadsheet.
If I could get some code to do one column then this should be enough to get me started and I could apply this to the other columns I need to copy.
All info goes to the master inventory and then if some enters an amount for respray then it is transferred to the respray sheet. when it is transferred to the respray sheet it put the date in Column A and then put 3 days later in Column B.
Every day it will change and the date in A1 changes to tomorrow but if another item is enter as having resprays then it transfers to the respray sheet and will bump down in column C but Column A stays the in the same spot.
I need Column A and B to move up and down if something in Column C moves up or down and it would be nice to always have the oldest date at the top.
I have attached a sample spreadsheet – what I want to do is insert a column before the current column A and move the current column D in to it and auto fill for every non blank cell in column B. Also, there are different values in column D such as “B03” ,”B41” etc – so for example, it should auto fill B03 until it comes across either a blank cell in column B or it comes across a “B41” and then it should do the same until it comes across a “B42” or a blank cell again. This needs to continue till the end of the report.
1. Find the last row (cell) of data in the "Customer Number" column. This search should be by the name "Customer Number" rather than by column letter because the column that "Customer Number" will be in can change.
2. Find the column named "Purple" (also by name for same reason)
3. If the "Purple" column has no blank cells in those same number of rows as the "Customer Number" column, delete the whole "Purple" column.
I have a sheet where i want to delete duplicate rows where column A and column B combined are equal, i.e. range(Ax:Bx) where x is the current row. I am using the macro below but cant seem to get it working as I keep getting a type mismatch error and Im not sure why.
How would you set up a macro to delete numbers in a spreadsheet in one column that appear in another column or worksheet?
In other words, if I have the numbers 1,2,3,4,5,6,7,8,9, 10 in one column and in the same column, or another column or worksheet I have the numbers 1,2,3,4,5 - I need a way to delete 1,2,3,4,5. I know how to delete duplicates via the advanced filter but I want to have the duplicate and original deleted.
I am basically trying to find the first non-empty cell in a range, but I want the macro to look down columns first. In other words, I want it to look down column A, then column B, and so on. Right now I believe it is searching by rows.
With Columns("A1:D15") .Find(what:="*", after:=.Cells(1, 1), LookIn:=xlValues).Activate End With
Have have a excel spreadsheets with 2 columns. One with the employees name and one with the date that their warning expires. I would like the employees name to be automatically removed after the date expires. How do I do this.
Currently i hav list of info that is long like this.
A 1 B 2 C 3 D 4 E 5 F 6 G 7 H 8 I 9 J 10
How to move row to column example below. Because i want the data to be printed on an a4 paper which can fit around 3 row to save space . If i manually copy paste page by page it is too much.
A 1 D 4 G 7 B 2 E 5 H 8 C 3 F 6 I 9
===
Currently i have macro code which roughly does this.
A 1 B2 C3 D4 E5 F6 G7 H8 I9 J10
Sub test() Dim rng As Range, m As Integer, c As Range Columns("c:E").Delete m = 2 Set rng = Range(Range("a1"), Range("a1").End(xlDown)) Set c = Range("a1") Do While c <> "" 'MsgBox c.Address
Range(c, c.Offset(m - 1, 0)).Copy Cells(Rows.Count, "c").End(xlUp).Offset(1, 0).PasteSpecial Transpose:=True Set c = c.Offset(m, 0) Loop End Sub
I have used the "Import External Data-Web Query" to gather financial data.
This data is updated daily by the web site. The data fills up columns A2 to E 6000.
The data on Column B is of importance and I need it to be stored daily. I need a code that will store todays Column B data in column F, tomorrows Column B data in Column G, dayafter's column B data in Column H and so on..
In short, I need to create a database automatically..
I have a large spreadsheet which I have extracted the data I need, but I am now having a problem tiding it up.
To simplify. I have 2 columns, both containing data formatted as text, each column has some data, but on different rows.
I need to merge the 2 columns without overwriting the data on the second column, with blank data from the first column, and without the column shrinking or growing.
Here is a section of my spreadsheet that needs merging : Excel-1.PNG
I have tried copy > Paste Special > Skip Blanks, but it just copies the column to the other - no merging.
I have a sheet called 'TimeRecorded' which will contain lots of rows of data.
If a row contains 'invoice' in column H, then the data in that row, preferably as far as column H, should be moved to the next blank row in a sheet called 'Archived'.
I would like the macro to move every row that contains 'Invoice' in column H to be moved.
Moving Data And Deleting Blank Rows. I am a complete newbie to excel VBA and require assistance (if at all possible). I have data in the following format in an excel sheet (I have a lot more rows but give an example for two rows)... in 1 column but I wish to separate it (i.e. move data along onto the first row in other columns) and delete blank rows.
I am importing a 20 character text string (from a barcode scanner) to H2. I need to send that data to the next unused row in Column A (after insuring that no matching text currently exists in Column A-no action taken if matching data is found). I can provide a copy of the sheet, along with a description of the project.
There is a spreadsheet that I use that has multiple plans in one column for various members. You can see the plan for Robert James and Amanda James is plan 5. If all this information was in column A how would you move the plan type say column C for each member?
For example Column A Customer Name Robert James Amanda James Plan 5 Nikki Martinez James Gross Plan 6
I am trying to move information that is pulled from a database to look cleaner and easier to read. All of the information exports out into column A only. The attachment is a brief example of what it looks like, and what I’m trying to get it to look like.
I want to move the data in col A to 5 columns C through G in groups of 16 rows. Once the last column is filled with a group of 16, it needs to fill below the first group of 16 in column B onward to column F. It should repeat this process until there is no more data in A. The attachment shows it much better than i can explain it.
I have some basic experience with formulas and macros, but I haven’t had any luck trying to manipulate any of them to give me the information the way I have shown. I would prefer to not have to manually type or cut and past the information in if possible.