Delete Certain Range Of Rows In Single Column?
Jun 10, 2014I need to delete a certain range of Rows in a single column
View 3 RepliesI need to delete a certain range of Rows in a single column
View 3 RepliesI need a macro to delete each row in which all cells contain the same value, always starting in cell G2 and going out an indefinite number of cell's. So, for one run, the range could be G2:BU2 and another it could be G2:PW2. Also, the number of row's is indefinite.
And an added complexity: I need it to ignore the cell in this search process if the cell contains "NC" - so if all the data in the row is the same except for a few that say NC - then it gets deleted. If the any of the cells in the row have other values, then that row does not get deleted - even if it contains "NC".
I know it can delete entire rows based on the value of single cell, I just don't know how to do it. So what I need is a macro that will delete an entire row if the value in a particular column = 0.
More details: ....
I have seen many threads on how to delete rows with no data in them (empty rows).. but I have a spreadsheet that has large "chunks" of column data separated by random empty cells. (It is like this from earlier manipulation of summing similar cells...)
Some columns do not have any empty cells and some have a many empty cells. I only want to shift the cell directly beneath it up, and only concentrate on a single column at a time.
So my main questions is:
How do you delete single cells, in a single column, and shift the data below up?
I have a contiguous multi column, multi row numeric range that I want to copy (and sort in ascending order) into a single column on another sheet in the same workbook. What VBA code could achieve this, or alternatively can this be achieve via formulas?
View 3 Replies View RelatedI'm trying to do something which I can't manage with traditional formulas and a macro might be required.
I have the following table:
Code:
Header1Header2Header3Header4Header5
1.00 6.00 11.0016.0021.00
2.00 7.00 12.0017.0022.00
3.00 8.00 13.0018.0023.00
4.00 9.00 14.0019.0024.00
5.00 10.0015.0020.0025.00
What I would need to do is take all column values and transpose is to rows, copying the header for every set, like:
ColumnA ColumnB
Header1 1.00
Header2 6.00
Header3 11.00
Header4 16.00
Header5 21.00
[Code] ...
I have a single column of about 1500 points, and I need them to be separated into many rows of 20 numbers.
I have multiple issues:
1) The middle number of each row (10th and 11th) need to be repeated. So a transpose formula can not work all the way through the 20 numbers. Unless I transpose the first ten, then tranpose the second ten. Is there an easier way around this ?
2) The bigger issue is, I would like to write a formula that can manipulate the date to enter in the correct cell.
To illustrate I will use a set of ten numbers:
1
2
3
4
5
6
7
8
9
10
11
12
INTO
1
2
3
4
5
6
7
8
9
10
11
12
I frequently have to work with tables set up like this:
A1 A2 A3
B1 B2 B3
C1 C2 C3
All I would like to do is to transpose them into one single column:
A1
A2
A3
B1
B2
B3
C1
C2
C3
I have to worksheets: Sheet1, Sheet2. In sheet 1, I have some data like this (in first col is 1, second col is a, third col is c etc. ):
1 a b c d
2 e f g h
.
.
.
.
I need in sheet 2 in range A1(only in this range one big text), something like this: a,c,e,g ........ ( row1-col2,row1-col4,row1-col2,row1-col4 ......) ( separated by ","). The number of rows from sheet 1 is variable. The dataf a,b,c,d,e,f,g,h ... is some random text.
I want to transpose multiple rows to single column and I'm dealing with huge data.
For example, I am working with data like this
A1 A2 A3
B1 B2 B3
C1 C2 C3
and I have to transpose to
A1
A2
A3
B1
B2
B3
C1
C2
C3
I'm using following vb code:
Sub ToOneColumn()
Dim i As Long, k As Long, j As Integer
Application.ScreenUpdating = False
Columns(1).Insert
[Code] ........
The script terminate without completing the job and shows error as "runtime error '1004': application -defined or object defined error".
I have a table in excel in which every line has as many values as the days of the month (e.g. 31 values first row, 28 the second..) and it goes from January 1948 to July 2014. So it ends up having around 800 rows.
I need to put all of those into a column, but it gets hard because the rows have different lengths. I have seen in this forum some solutions that apply well when the table is regular, but I'm stuck in trying to get a solution for when it's not. I have tried to record a macro using TRANSPOSE, but then I cannot change the cells into this formula in the editor in order to create a loop.
I also have to consider leap years.
I am trying to take data from multiple rows and columns (matrix) and reformat it all to fit in a single column.
It would be great if I could select the cells I want to reformat into the single column as the number of rows and columns containing the original data is not always the same (ie 20x20, 21x35, 56x200) etc...
I have thousands and thousands of rows of data which look like the spreadsheet screen shot shown in this image:
ExcelConsolidateRaw.JPG
I want to consolidate them so that they look like the spreadsheet screen shot shown in this image:
ExcelConsolidateDesired.JPG
How to insert it into a module in the VBA editor.
I have 300 rows worth of data that looks similar to this, all organized in one column:
John Q. Smith
Programmer
2111 NW 13th St
Anywhereville, USA, 55555
(555) 555-5555
Joe P. Snider
Organizer
5645 NW 45th St
Anywhereville, USA, 55555
(555) 555-5555
Patty Williams
Accountant
6454 NW 34th St
Anywhereville, USA, 55555
(555) 555-5555
As you can see it is consistent with the name, position, address line 1, address line 2, Phone number, for every single entry. All my names are already alphabetized so I don't have to worry about it. What I want to do is have the information for each entry translated into 5 separate columns so it looks like this.
John Q. Smith Programmer 2111 NW 13th St Anywhereville, USA, 55555 (555) 555-5555
Joe P. Small Organizer 5645 NW 45th St Anywhereville, USA, 55555 (555) 555-5555
Patty Williams Accountant 6454 NW 34th St Anywhereville, USA, 55555 (555) 555-5555
Supposing I started the sheet in the top left corner at A1, I was just going to have cell B1=A1 then Cell B2=A6 then just autofill down column B but it doesn't work. I have seen some people do something similar to what I want with VBA but I am convinced there has to be something simple in with an excel formula seeing as my information is already so organized and consistent.
transposing and sorting data into multiple columns.
Column 1 for example will have the Parent's Name. Column 2 will have the Children.
If Mark has 3 children, X Y and Z
Jim has two children, A and B
then I want Column 1 to display Mark and Jims Name and column two should display all the children
Here is how I want the data:
Column1 Column 2
Mark X
Mark Y
Mark Z
Jim A
Jim B
Please see attachment.
I have on sheet1 of my workbook a number of rows of data, from column A through Column G. The Data in column G either contains the text "Yes", or "No".
I need a macro that will look through each row in this sheet, and upon finding a "Yes" in the cell in the column G, will copy that entire row (columns A through G) into a new row in sheet2. Sheet2 currently contains data, so I'd like to move everything down by one row and paste this data at the top (row 6 is the first line of data on this sheet).
I'd then like to go back to sheet 1, and delete the row I've just copied. Then continue though the loop. The loop needs to stop when a blank row is discovered.
I am trying to convert text to rows but in the same column Take the following example:
Column A:
1-2-3
ab-cde-fg
54-ty-12345
the
waht i am looking is convert it to the following format: (the - is the delimiter)
Column A
1
2
3
ab
cde
fg
54
ty
12345
i have found the following VBA code on those forums but i don't know how to edit it to suit my needs
Sub Txt_To_Rows()
Dim arrText() As String
Dim varItm As Variant
Dim rngText As Range
Dim rngCl As Range
Dim i As Integer
Dim j As Integer
Dim x As Integer
Set rngText = Range("A1:A" & Range("A" & Rows.Count).End(xlUp).Row)
j = 2...........................
I have a named range that is 5 columns wide by 100 rows. On another part of the spreadsheet I want to have a column point to just one of the columns of that range. How can I reference that column using a cell formula? I have a lot of these all over my spreadsheet, so i don't want to have to assign each individual column its own name.
View 2 Replies View Relatedwhat's the quickest way to convert an array (range) of data to a single column?
I have varying numbers of rows with varying cells of data in each row. I need to quickly compile (transcribe?) all the data into a single column.
Assume A1:A10 filled with the characters A to J.
I'm looking for a way to return the letter "C" when 3 serves as the index_num BUT I do not want to present all 10 characters in the formula.
I would like to use the range A1:A10 =Choose(3,A1:A10) or, if applicable, to name the range as DATA and then use: =Choose(3,DATA)
I tried all I know, including INDIRECT - but found no solution [is there any ?]
As I'm familiar with all workarounds - I will appreciate replies that use CHOOSE.
I am trying to reformat the attached doc into one single column, It's a race listing of overseas marathons and I need it to look like this
Event Name
Event Date
City
Country
Entry fee
Website
in date order, one event after the other in a single column so I can flow it into a word doc ready to be designed. I need to apply in Excel (I am using 2007) to get this doc into the required format?!!
I have a single column with multiple rows of data like this: Afirst last, Bfirst last, Cfirst last (all in one cell) etc.
I want to type some names in one cell in the same format (Afirst last, Cfirst last, Bfirst last) but not order and then check if any of those names exist in the first column and count the results of matches.
So in this example I am looking to count Bfirst last and/or Cfirst last in every cell of column A. I need to use a formula.
How can I identify the last cell of a single column range . . . i.e. the last cell address of range C1..C15 is C15. The range will have a name of "reg".
View 9 Replies View RelatedCurrently i have a macro that prints range column A to O but i need to add column AD on the end of the O so in effect Ii would get A:O & AD. Current macro is below:
Sub PRINT_CALL_OFFS()
'
' PRINT_CALL_OFFS Macro
Sheets("DFS Result").Range("A:O").PrintOut
Sheets("CAR Result").Range("A:O").PrintOut
Sheets("ACU BOS(Z1)").Range("A:O").PrintOut
Sheets("ACU LON(Z2)").Range("A:O").PrintOut
Sheets("ACU MIDS(Z3)").Range("A:O").PrintOut
Sheets("ACU SW(Z4)").Range("A:O").PrintOut
Sheets("ACU WALES(Z5)").Range("A:O").PrintOut
Sheets("ACU SOTON EXP").Range("A:O").PrintOut
End Sub
I have tried adding & AD as follows:
Sheets("DFS Result").Range("A:O" & AD).PrintOut
However this doesn't work.
I have numbers in a range over an indeterminate number of rows and 6 columns. I want to create a single column of the numbers with no blank cells in between. It's to check Visa receipts from different depts.
View 2 Replies View RelatedI'm trying to separate a cell containing:
TSB w/6.5% NaCl - NS 29002TSB w/6.5% NaCl - NS 29003TSB w/6.5% NaCl - NS 29004
into a 2x3 table, in another sheet, like this:
TSB w/ 6.5% NaCl NS 29002
TSB w/ 6.5% NaCl NS 29003
TSB w/ 6.5% NaCl NS 29004
TSB..... in left column and NS...... in right column. This example includes 3 items as shown above but the single cell could contain more or less than 3 items
I have A:1 - X365 filled with hourly energy prices for 2013. I need to convert these to a single column - A1:A8760. I have tried writing some code and some macros with no success.
If I were to do it manually 365 times, the macro would look like this:
Copy Row A1:X1
select sheet 2
Paste Special > Transpose (fills A1:A24)
repeat for rows 2-365
Tried using this from a previous post, but it takes A1:A24 then B1:B24 and so on and makes them a single column - so it doesn't work unfortunately.
Sub MakeColumn()
Dim rng As Range
Dim LastRowSrc As Long
Dim LastRowDst As Long
Set rng = Worksheets("Sheet1").Range("A1")
[Code] .....
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.
View 2 Replies View RelatedI want to add a Punctation mark (comma), like this: ,
and also want to add punctation mark (colon), like this: :
In this moment I have below macro:
Public Sub CombineCells
Dim Combined As String
Combined = ""
For Each Cell In Selection
Combined = Combined & Cell.Value & ":"
Next Cell
Selection.Cells(1, 4).Value = Combined
End Sub
the effect shoud be like this:
before:
--A
1-C
2-D
3-E
4-F
Etc.
after transposed:
--D
1-C:D,E:F Etc.
I need a macro to delete a specific range of rows. For example below:
UK
Manchester
London
Chelsea
Birmingham
[Code]....
Each line represents a row. If a cell matches "JAPAN" then the macro needs to delete all the rows relating to it (in this case all the cities that are based in Japan). So after running the macro my list will have:
UK
Manchester
London
Chelsea
Birmingham
[Code]....