Insert Rows By Condition & Copy Data Above
Mar 8, 2008
I deleted the data and made up some figures but kept the format to protect privacy. Highlighted blue and green because it's possible to have the same name have 2 different types. I put in dashed lines to more clearly divide months.
1. For each UNIQUE "Name" and "Type" add a new row starting from last entry
2. Copy A,B,C to new row
3. Copy LAST (most recent) "End Balance" from column "I" corresponding to last person
4. Copy column "I" formula into new role
So Name, ID#, type, column D and the formula in "I" (excluding "Name" and "Type" duplicates) should be added to the end of the sheet with their new row
Unsure if possible:
5. Make old amounts (columns D,F,H,I) not count towards the totals
6. Totals reflect new amounts only so values aren't counted multiple times
exampleforforum.xls
View 2 Replies
ADVERTISEMENT
Apr 21, 2014
I want to get some blank rows in a worksheet after certain characters.i have some data in a sheet. at the end of each cluster of data it ends either with 1-0 or 0-1.
if excel finds 1-0 or 0-1 at the end of a bunch of rows, it should add 5 blank rows under it.then it should search for the next 1-0 or 0-1
If data ends on A25 where you find 1-0 or 0-1 then add 5 blank rows under it from A26:A30,likewise it should be given till it reaches the end of the range.range can be defined as A1:A1000
View 4 Replies
View Related
Apr 21, 2014
I'm new to Macros and below is my requirement.I need to split my data into multiple rows based on count and the first row should have the value but the other rows should have a value as zero.
Input
Count Value
1 400
2 101
3 300
4 450
Output
Count Value
1 400
2 101
20
3 300
3 0
3 0
4 450
4 0
4 0
4 0
View 4 Replies
View Related
Mar 12, 2002
I haven't mucked about with Excel in quite a while now and have been asked to do a module in Excel 2000.
When given a workbook (tej-exit.xls) which has one worksheet of thousands of rows with columns from A to AS, i would like to copy all rows which have a zero in column N to a new worksheet.
Is this difficult?
Would i have to have one workbook with the code module in, load up the tej-exit.xls file ?
View 9 Replies
View Related
Jun 17, 2008
I'm looking to create a macro that copies a row of data and pastes it within a range when a condition is met. For Example, if A1 of the header Row matches A2 within a Range of A2:A100, I want to Copy the A1 Row and Paste Special Values over the Match in A2. Likewise if the match is contained in Row 100, I would like to Copy from A1 and Paste Special Values into A100.
View 2 Replies
View Related
Apr 19, 2013
I have tried to write some VBA to copy and paste rows based on the condition in cells A:A in sheet one. So far I have managed to put something together which will paste the first row and insert a new row below but keeps on pasting the same row. But not much else! Not sure I have tried to make it more difficult than what is it.
I would like it to copy a row based on a certain condition ("WRW") in A:A sheet one and paste it to sheet2.
VB:
Function DoOne(RowIndex As Integer) As Boolean
Dim Key
Dim Target
[Code].....
View 3 Replies
View Related
Jan 16, 2009
I got this code form Ozgrid that works great other than everytime I run the macro it copies everything over again.
View 3 Replies
View Related
Sep 18, 2009
I have created a worksheet which contains seven columns of data and many rows. I need to copy entire rows into nine separate worksheets depending on the data in column G.
I know nothing about VBA but have read enough to realize this is the way to go with this. Would someone point me in the right direction on how to set this up? I've attached the file so you can better see what I'm talking about.
View 5 Replies
View Related
Jun 6, 2008
I Have workbook-1 with 5 cells and 10 rows and in 5 th (E) cell i have value of 1 or 0 .
i want to selectively copy entire rows which has value = 1 in cell(E) and paste these rows into 2 nd row(A2 cell) of workbook-2 using Macro
View 5 Replies
View Related
Aug 11, 2008
On my main worksheet, I have a list of stocks in the "A column", so for example reading down the list would be:
Vodafone
Vodafone
Ericsson
Nokia etc...
I have a seperate worksheet for each different name (about 100), and I wanted to know if there was a way to select all the information relating to the name "vodafone" for example, and to copy and paste that into the worksheet called vodafone. The problem is copying and pasting 100 times would take ages and wanted to know whether there is an easier way using VBA.
View 3 Replies
View Related
Oct 14, 2006
if there's a macro that can be run to check one worksheet. In this worksheet there is a column where the value should be "true". If this value is true, I'd like to copy the entire row of data into another worksheet.
There can be multiple rows of data where this condition is met.
View 3 Replies
View Related
Nov 20, 2012
I have multiple sheets with the same format.(all columns have same format) in column "A" i have a value lets say "B1-1".
What I need to do is to copy from all sheets the rows containing in column "A" the same criteria("B1-1") to a new sheet and skip the rows that have a blank cell in Column "A".
View 5 Replies
View Related
Feb 4, 2010
I am self-taught (arguably by a pretty shoddy teacher), and am determined to figure *some* of this stuff out. I need a code to look at the rows on one worksheet and based on the value of column A for each row, copy cells A through E in that row to cells A through E of a blank row on a corresponding worksheet. I found a code from another post that does just what I need it to with one small exception. The code was posted by DaveGuggs and is as follows:
View 2 Replies
View Related
Mar 31, 2008
1. I need a script to retrieve data (member number) from "Search List" worksheet and then to search it in "Members List" worksheet.
2. Once the search result (member number) found, e.g. 00311, it will copy the entire row to the "Only Selected" worksheet.
I have also attached a sample excel for better understanding.
View 9 Replies
View Related
May 5, 2008
I did a search to find a question similar to mine and I found this:
Copying data matching a criteria into another spreadsheet
This is exactly the same concept I am trying to accomplish, but don't know how to...at all. I couldn't follow the thread either.
I have a schedule which is constantly being updated (simplier version attached). I want to create a schedule, which will:
1) First ask which region to display the information for (I would like to create the same pop up menu to choose from)
2) Then, it will select only that region's information (all rows & columns) and copy them into a new worksheet and lists it all
-if you go back to the Master List, you can again choose another Region and it will create another new worksheet with that region's information
3) Don't know if this is making things more complicated, but at the bottom of the attached file, there are 3 lines under "Land".
Is it possible to list these under the same spreadsheet as the region it is pertaining to but classify it separately under "Land" (ie leaving space, so it is clear this is separate
View 9 Replies
View Related
Jun 1, 2008
i'm trying to create a macro to find any value <> "" from COLUMN B then copy Bx;Cx;Dx and paste into another worksheet with the name of COLUMN A.
And when the cells Cx or Dx is empty should appear 0 into the other worksheet
for example.
sheet1 ..... cell("dx") is empty
a b c d
w 5 3
the macro would copy 5,3,0 and paste into sheet named "w".
i found this code on internet but it's not quite good for me because it copies the hole row. i tried everything to change that but i couldn't.
[url]
(ORIGINAL CODE)
Sub SearchForString()
Dim LSearchRow As Integer
Dim LCopyToRow As Integer
View 9 Replies
View Related
Jul 13, 2009
I was searching through this site and found this macro ...
View 9 Replies
View Related
Dec 15, 2008
I am trying to finish off a form that allows a user to insert a row below the selected cell and copy the formula from the line above if one exists. The code inserts the line but does not copy the formulas if they exist.
Application. ScreenUpdating = False
Dim cRow
Dim j As Long
cRow = ActiveCell.Row
With ActiveCell
.EntireRow.Insert
End With
For j = 1 To Cells(1, 255).End(xlToLeft).Column
If Cells(cRow, j).HasFormula Then Cells(cRow, j).Copy Cells(cRow + 1, j)
Next j
View 9 Replies
View Related
Sep 25, 2006
I need to find a way to insert a row (preferably at the bottom of an existing list) that mirrors the formatting of the row above.
I have had a stab at this (see attached example file) but my solution requires the user to select the correct activecell before it works correctly
View 9 Replies
View Related
Mar 27, 2008
I currently have a spreadsheet with 4 columns that represent Surface corridinates and Bottom Hole Corridnates.
Surface X, Surface Y, BH X, BH Y
We need to get the Bottom Hole XY to be directly under the Surface XY.
Attached is some sample Data and What I mocked up for a temp solution is in VBA Module2
RunAll it will complete 399 rows of data.
In Module1 I have the starting Code that I modeled off of a macro that I started to get the base code.
I just need this to loop till it has no more data to copy. and not use module2 at all.
I commented everything for my personal benifit and to help me understand the steps. also know its a monster right now but it does most of what I need it to do.
Sub CopyPasteBHXYs()
'Wrote Based on recorded macro
'Selects second data row and inserts a row above
Rows("4:4").Select
Selection.Insert Shift:=xlDown
'How to make it loop till the last data is reached?
End Sub
Side Note I'm finally taking a Excel VBA course Apr 8th and 9th.
View 5 Replies
View Related
Oct 30, 2013
I have a spread sheet with values in the area of A1:H834
In column H, I have number values from 1-7.
Essentially that number value means that the values in the row are duplicate.
So, for example, if H2 has a value of 4, that means that $A$2:$G$2, really should have an additional 3 rows underneath with the EXACT same data in each cell, however, the way the sheet was created, was to remove the duplicate values and just indicate in column H, the number value of how many duplicates $A$2:$G$2 really is.
I need to unpackage this and create what it was originally. What type of formula can I use, to look at the value in H2, and then insert underneath that number of rowes with the exact same data as A2:G2 and do the same for the remainder of the table all the way down to A834:G834
View 1 Replies
View Related
Feb 5, 2014
I have a simple command button in my worksheet that will insert a blank row and copy formatting, but not the formulas. How do I adjust the code so that the formulas are copied to the new blank row? This is currently what I have:
Private Sub CommandButton2_Click()
Sheets("WAWF Track").Range("A9").Select
ActiveCell.EntireRow.Insert Shift:=x1Down
End Sub
View 5 Replies
View Related
Dec 20, 2006
I have a bit of a curly one - I have a sheet with 9,000 records that I need to expand to 24,000 + on a separate sheet records using the following method:
1) Select and Copy entire row 2 from sheet(1)
2) Insert a number of new rows into sheet(2), based on the value of cells(2,8) or cell H2. Column H contains quantity values for each of the 9000 rows which are variable.
3) Repeat for row 3, copying and inserting into sheet(2) based on the value of the cell in H3.
4) loop through all records until complete
I have tried writing the code in VBA but am not even getting close!
View 9 Replies
View Related
Oct 12, 2009
to copy the information from A3 to D3 in another workbook if in colum E "Delivered" is selected from the drop down menu, using vba code.
The thing is that drop down menus are dinamicly dependent. If "Expected" is
selected in E3 then F3 should be empty. If "Delivered" is selected then from
the menu in F3 i have the choise from, let say 20 clients
When I choose "Client1", for example, i wont the vba code to copy the information from A3:D3 range and paste it to another workbook, in the sheet "Client1"
I don't know where to start from building this code,
View 14 Replies
View Related
Oct 21, 2009
Sheet OldData has 4 fields Bo# / Tag / ORG / ACCT
Sheet NewData has 2 fields Bo# / Tag
I would like to copy fields ORG / ACCT from Old to New if the Tags from New match with OldData.
View 6 Replies
View Related
Apr 25, 2014
I am using below code to copy data and paste after a certain row. I want in below code first copy data Range("C4:R46") and paste it automatically 50 times after 43 rows but with this condition.
[Code] ......
View 2 Replies
View Related
Sep 17, 2013
I need to copy the row data from sheet1, if the DEPT is HR and paste the same into sheet 2.
Qus:
data table ( Sheet 1)
SLEMP IDDOJ DEPT
1123419/17/2010HR
2123429/17/2010HR[code]......
View 1 Replies
View Related
Sep 7, 2009
I need to copy the data form Cell "C" to Cell "D" only if Cell "D" is empty
i have been using the following code but it will overwrite cell "D" regardless if data is present or not.
View 8 Replies
View Related
Feb 29, 2012
I need to copy and paste data with imposing a condition from one worksheet to the other. I also need a code to update an existing condition.
Code:
Sub COPYPASTEDATA()
Dim rcnt As Variant, i As Long, j As Long
rcnt = Range("A" & Rows.Count).End(xlUp).Row
j = 4
For i = 2 To rcnt
[Code] ........
The procedure does not update the changed condition ( I have pass/fail as condition). Once you run this macro, the data will be pasted but when you change a condition from "fai" to "pass". The pasted data in sheet 3 is not updated. I either need worksheetchange procedure or maybe a code to delete (refresh) sheet 3 data before running the existing macro.
I have Name, location, status (pass/fail) and comment in columns A, B, C, D in sheet 1.
View 1 Replies
View Related
Oct 16, 2006
Attach is a sample of my project. I have to loop through B9:B80 in sheet("Raw Data") and capture the value of each cell. EG:
* if Value captured is 120A --> check with sheet("SP14F") from the row which contains the same value.
* i have to check that the aperture, outer and inner values of Layer 120A and so on..of the Raw Data sheet is the same as that of in the SP14F sheet.
* if the values are not the same, change the font to red
i understand that this task requires looping and arrays.
View 4 Replies
View Related
