Delete Colums Containing Data
Mar 15, 2012
with the following problem : i have a matrix and a list with words and i need to delete every column from the matrix which contains one of the words from my list. I have a VBA script which uses entirecolumn.delete but i need one which doesnt rely on this function. The reason i can't use entirecolumn.delete is that it messes up all of my predefined ranges. here is the script i am using :
Dim c As Range, d As Range
Worksheets("table1").Activate
For Each c In Range("matrix")
For Each d In Range("listofwords")
If c = d Then
[Code]...
View 9 Replies
ADVERTISEMENT
Feb 16, 2007
I have the following sheet with reg hours and ot hours. I need to insert a column that sums these two items. I used the macro recorder and it only works when the same amount of ID's or less. If there are more ID's it does not sum the remaining ID's. What it currently looks like:.........
View 3 Replies
View Related
Oct 16, 2009
I previously posted a problem related to copying data from one sheet and paste it in another workbook when "Delivered" is chosen from a drop down menu. Everything works fine with my dummy files, but a problem comes up when I try to incorporate this code into the original file.
The issue is that once the code copies the info from the range A3:D3 it has to paste it into different cells in the other workbook.
Please see the attached file to see where I need the data from the range A3:D3 to be pasted.
View 7 Replies
View Related
Mar 31, 2009
i need a formula the looks for neame the gives the relivent data as headed by the colums under the wrd average
View 3 Replies
View Related
Jul 25, 2007
Look at the total in Cell A2, B2 and so on..... and multiply by the numbers below - then add them together at the end.
Problem im having is i cant seem to copy and paste the original formula as when i do it for the next row down it wont look at ROW 2, it will look at ROW 3, ROW 4 etc..
View 9 Replies
View Related
Aug 11, 2009
I have a sheet with products and information regarding these products. It is consistently build up in a 5-row information block per product like:
A1: name
A2: info
A3: price
A4: to be deleted
A5: to be deleted
What I want:
A1: name
B1: description
C1: Price
For product 2 it should:
A6 -> A2
A7 -> B2
A8 -> C2
A9 -> to be deleted
A10 -> to be deleted ..etcetera
The Macro should loop until no data is found in the A column. Note: some of the 2nd rows (information) are not filled. They can't be deleted but need to be left empty!
View 4 Replies
View Related
Nov 11, 2009
I would like to get the last value in column A & B and place them into another sheets cell. The number of rows will always be changing too.. In the attached spreadsheet I want the totals, which is the very last value in the colums.
View 8 Replies
View Related
Oct 14, 2009
I have an excel sheet with a pivot table with some data about the trades that I have done in the stock market. Before reading the query request you to please have a look at the attachment as I have referred a few data columns.
Coming to the pivot table, in column 'I', I have the 'Total Sum of Trade Value' column which basically adds up the data frome columns E and G (i.e. Sum of trade values under 'Buy' and 'Sell'). I also have the brokerages paid for buying as well as selling and the brokerages are summed up in column J. Basically, what I want to do is to be able to get a difference between different columns within a pivot table. So I want a column which will have 'G-E-J' (Sum of Sell value - Sum of Buy value - Sum of Brokerage). I could click on one of the data fields and after selecting Value filed settings, it shows the summarized by tab.
View 2 Replies
View Related
Jun 6, 2008
how do I move the codes (1CH,1CL,1CP,1EM) from Column B to Colum A under Fee Earner cells where opposite the dates by using a macro?
View 9 Replies
View Related
Jul 9, 2008
How do i work out the percentage difference between two colums and show the results in a third? I then need to know the average of that third colum
View 9 Replies
View Related
Jan 20, 2009
I'm using this code to input values into the next available row of columns of A and B.
Range("A65536").End(xlUp).Offset(1).Select
ActiveCell.FormulaR1C1 = Textbox1
Range("B65536").End(xlUp).Offset(1).Select
ActiveCell.FormulaR1C1 = Textbox2
I have this piece of code right under it:
Range("E65536").End(xlUp).Offset(1).Select
ActiveCell.FormulaR1C1 = Range("B65536").End(xlUp).Offset(1) - Range("A65536").End(xlUp).Offset(1)
The value being returned is 0.
What I want that last part to do is take the last row of column B and subtract the last row in column A.
View 9 Replies
View Related
Mar 5, 2009
I am trying to create a spreadsheet to select different values. I have 5 columns with type A values then 3 cols with type B values, a blk col then 1 cols with type B values and 5 cols with type A values then 1 cols with type B values and 2 cols with type A values a blank 1 col with a B value, 2 cols with A values and 2 cols with B values. [ A A A A A B B B Blank B A A A A A B A A Blank B A A B B ]
I need to select 5 lowest values from this set but a minimum of three A values need to be used. I have used the min, small 2, small 3 for the A set then used an IF statement for the fourth value. The formula returns the correct sum for values up to the fourth value. The problem comes on the fifth value. I am attaching the formula I started with.
=(MIN(F3:J3,R3:T3,V3:W3))+(SMALL((F3:J3,R3:T3,V3:W3),2))+(SMALL((F3:J3,R3:T3,V3:W3),3))+(IF((MIN(K3: M3,U3)<SMALL((F3:J3,R3:T3,V3:W3),4)),(MIN(K3:M3,U3)),(SMALL((F3:J3,R3:T3,V3:W3),4))))+(IF(SMALL((K3: M3,U3),2)<SMALL((F3:J3,R3:T3,V3:W3),5),SMALL((K3:M3,U3),2),(SMALL((F3:J3,R3:T3,V3:W3),5))))
View 4 Replies
View Related
Jun 19, 2009
I am trying to create a marco that clears the columns of a named range if the sum of the cells in the range is zero.
View 3 Replies
View Related
Aug 27, 2009
Say i have database (A2:X4), the first 2 row is ID (text), and the last row is the value.
If given, 2 ID that can be looked up to the database, and say the data given is equal to the ID in cell I2&I3. The question asked is how to get the sum value of (cell E4:G4)?
For more clear explanation i have attached the example.
View 3 Replies
View Related
Oct 15, 2008
I need to have a macro of formula that would take a cell's value (value1)and spread it over equally over a number (value2) of columns across
A B C D E ...
1 $300 3 $100 $100 $100
2 $20 4 $5 $5 $5 $5
etc.
The expectation is to place a formula like this:
=dividevalue(A1,A3) in Col3 and it does the rest magically!
View 9 Replies
View Related
Nov 10, 2008
I have a parts index containing 500+ rows of data, I also have multiple columns in which I can sort the data.
I would like to have a button fixed in cell C4, D4, E4, etc... row 4 is the header, that when clicked, will filter all rows that have a selection (non-blanks) for only that column. So If I have data in various rows & column (C5:F500) that when I click on the button in cell D4, only the data listed in the various rows of D5:D500 are shown and columns C, E & F are hidden. Clicking cell D4 will show all data.
I can create the button so that it is sized specific to the cell and follows the cell sizing and I can create a button to filter only columns D or E or F, etc... but that means that each button is a separate VBA, macro.
A while ago I found a VBA code that allowed me to sort rows Asending/Desending depending on which button in which column was clicked... See inset: and this allowed me to add columns without changing the code. So I think If I can modify this code this will work great for me..
Sub SortTable()
'code written by Dave Peterson 2005-10-22
'2006-08-06 updated to accommodate hidden or filtered rows
Dim myTable As Range
Dim myColToSort As Long
Dim curWks As Worksheet
Dim mySortOrder As Long
Dim FirstRow As Long
Dim TopRow As Long
Dim LastRow As Long
Dim iCol As Integer
Dim strCol As String
Dim rng As Range
Dim rngF As Range
View 9 Replies
View Related
Oct 19, 2009
Could ye have a look at this sheet. I need to extract the cells that are in ColumnB but not in ColumnA.
View 5 Replies
View Related
Dec 22, 2008
I have a spreadsheet with 20+ columns. Each column contains a list of invoice numbers, eg, 1234. The lists are all of different lengths (see below). I want to find a way to find/highlight/identify those invoice numbers that appear more than once in the entire sheet (eg if invoice 1234 is listed in column B, and also in column H, and/or if invoice 5678 is listed in column A, and also in column J, and also perhaps in column D, etc.)
I've searched this forum but haven't found anything about searching for multiple duplicates in multiple columns. Ideally the matches would be highlighted in different colours, (eg all cells that contain 1234 would be red, those that contain 5678 would be blue, etc., for ease of identification) but I'm not sure if that's possible. I've attached an example that I've shaded myself to show what I mean. I've tried the MODE function but that only tells me which invoice number occurs the most.
View 5 Replies
View Related
Feb 9, 2012
I have a question about sorting. I would like to sort multiple columns from small to large at the same time. Is this possible? I have over 400 columns to sort so I would rather not do this one column at the time.
Example
A.... B.... C
0.2 0.4 0.3
0.4 0.3 0.5
0.1 0.6 0.1
shoud be
A.... B.... C
0.1 0.3 0.1
0.2 0.4 0.3
0.4 0.6 0.5
View 1 Replies
View Related
Dec 10, 2008
In Sheet1 from row 12 on down in columns A to E I have numerical values.
Column F has letters, either N or S
Column G has numerical values
Column H has letters, either E or W
and columns I, J and K have numerical values again
On a new sheet (Sheet2), I want everything copied but the numerical values
in columns G need to be changed to negative if the cell to the right, column F,
have an S and the values in column G need to be changed to negative if the cell
to the right, column H, has a W.
Columns F and H are therefor not copied to Sheet2
(Sheet1 has quadrant readings and Sheet2 will end up with azimuth readings)
The result is that Sheet2 will have all numerical values from column A to column I
with columns E and F either positive or negative values.
Currently I use the following
Sub CopyTNS()
Sheets("Sheet1").Range("A12:D" & Range("D65536").End(xlUp).Row).Copy _
Destination:=Sheets("Sheet2").Range("A12")
Sheets("Sheet1").Range("I12:K" & Range("K65536").End(xlUp).Row).Copy _
Destination:=Sheets("Sheet2").Range("G12")
View 9 Replies
View Related
Apr 22, 2009
I have a problem with a data set that I'm working on. Basically, I've got a data set that was downloaded from a weather station. I need weather data like average temperature, maximum temperature, minimum temperature for each day over a 90 days period. This is simple enough.
The problem, however, is that the weatherstation has been sampling every 5 minutes. In the data sheet, each day is represented by 12*24 rows of data (12 samples per hour times 24 hours). The total dataset across all days is something close to 26000 rows!
Of course, I can spend hours doing all this by manually by average(), min() and max() and then selecting the cells I want it to apply to each time, but the thought of doing so makes me wince. I would have to do it 90 times per column across hundreds of cells each time and I'm after much more than just temperatures.
Is there a less labour intensive way of doing this?
View 12 Replies
View Related
Dec 14, 2009
I routinely have do download massive data sets of reporting that is saved as an excel spreadsheet. The three columns of sample data attached are Report Numbers, Report Evaluation Serial Numbers, and Report Evaluator ID.
As seen in the attached spreadsheet, there can be multiple Report Numbers (in same field separated by comma) which have been evaluated by different Evaluators. It is my responsibility to account for the number of Reports that have been evaluated, and many other metrics from like data. The issue I have is when more than one report number is listed in the same field I need to parse the data into its own field for ease of counting (and also maintain the adjacent data). It is not a problem to merely copy the fields and delete the excess numbers, however when dealing with thousands of Reports, and Evaluators this can be very time consuming. In the attached file I have separated .xls into three workbooks to help explain my problem: Initial state of Data; What I need To Parse Out; and The final endstate I require. I hope that I have explained this issue with enough detail. I am sure that the attached file will explain better.
View 5 Replies
View Related
Nov 5, 2009
I am looking for a macro to sort my colums in ascending order the range i need sorted is from A7:F107, it will be sorted with the numbers in the A column ie 1 - 107. sometimes different numbers get added and it has to be sorted in number sequence.
If possible i would also like a macro to protect this range after the sort,
View 3 Replies
View Related
Sep 18, 2009
I have two sheets, a data sheet with all our customers by ref, name and spend; and a presentation sheet.
In the presentation sheet I want to display the ref, name and spend of the Top 50 customers by spend, price high to low.
The workaround:
Copy all data from data sheet, sequence top down by spend, manually delete all after 50.
My only issue is that each month the data sheet will update and I want the Top 50 to auto update, without performing the workaround above.
Is there a way to do this without VBA i.e. pivot tables etc
View 10 Replies
View Related
Apr 2, 2014
I have a lot of rows of data all divided with an empty row and if they are 6 or less all rows need to be entirely deleted any 7 or above need to be kept.
View 2 Replies
View Related
Dec 10, 2009
I have 3 columns of data that are being copied from a .csv file. The data is pasted into Columns B, C, & D. Columns C and D are hidden. So that the user does not have to unhide the columns in order to delete the data, I would like to make it so that when the data in column B is deleted, the data in columns C and D is also deleted.
View 14 Replies
View Related
Jun 10, 2009
I have 1000's of columns of data to go through, I just need to visually inspect the data and then delete any column containing irregular data. At the moment; I select a section of the first column of data and insert a column chart for that data. I then need to change the source of the chart data to that of the next column, to do this I click on the data within the chart and it will show the data on the worksheet that I have selected by surrounding it in a blue box, I then click on this box and drag it to the next column of data. Clicking on the blue box (which sometimes I miss, and I then have to go back to the chart to activate it again) and dragging it to the next column is getting annoying, especially as I have sooooo much data to go through. Does anyone know if there is a shortcut key for this, or how I could write a macro to do this?
View 9 Replies
View Related
Dec 6, 2006
I have one source spreadsheet, where are columns NAME, DATE. I read these data by ADO to other spreadsheet, where I can change/delete data and then run macro for update data in source spreadsheet. The problem: In source spreadsheet is column "NAME" and column "DATE", with values e.g. "Joseph"; 1.1.1980. I read this data to other spreadsheet, then I delete in it value 1.1.1980. When I run macro Update, it messages error.
Sub UpdateItem
...
.Fields.Item(1).value = activecell 'activecell value = "Joseph"
If Not isempty(activecell.offset(0,1)) Then
.Fields.Item(2).value = activecell.offset(0,1).value
Else
.Fields.Item(2).value = "" 'I tried Empty and 0 too but when I read data again then, it displays 0.1.1900, nothing works
End If
...
End Sub
It seems that in source spreadsheet has data in column "Date" format Date and when I try to update data in format String ("") in source spreadsheet by Update macro, it messages error. When I used
.Fields.Item(2).Value = Empty
' or
.Fields.Item(2).Value = 0
after rereading data it displays 0.1.1900 What I want to get is that if the cell with date (in other spreadsheet) is empty, the cell in column Date in source spreadsheet after updating will be blank (contains no values).
View 2 Replies
View Related
Sep 7, 2007
I have a workbook which starts with data in column B. The heading of each set of data starts with Turn No. What im trying to do is to be able to delete that row and the following 2 lines under it. It will then show LTP in column B. What I need doing with that is to be cut and pasted into column A.
This is how it looks at moment....
View 9 Replies
View Related
Jul 29, 2013
I have the following code for identifying the 1,3,2 patterns from sheet1 and it copy pastes those rows into sheet2. I was wondering if there is a way to modify this code to delete those patterns once it has identified them instead of pasting them into sheet2. In other word,s sheet2 needs to contain every other data except those identified patterns.
VB:
Sub test()
Dim myPtn As String, txt As String, m As Object, n As Long, LastR As Range
Dim ws1 As Worksheet, ws2 As Worksheet, myStep As Long, i As Long, t As Long
myStep = 10000 '<- change here if needed.
Set ws1 = Sheets("sheet1")
Set ws2 = Sheets("sheet2")
[Code]...
View 2 Replies
View Related
