I would like to be able to find the largest visible area of continuous rows in a filtered table. I know one possible way would be to loop through visible cells using the "xlCellTypeVisible" property and count cells in each visible area. However, the data is consisted of tens and sometimes hundreds of thousands of rows so I was wondering if there is a faster, more efficient way to do this.
View 3 RepliesNeed macro that changes the text in a particular field. Previously, the column to change was column 46 (AT), but now the column is column 1 (A). If I adjust the last line and run the macro, I get this error message: "Compile error: Invalid or unqualified reference".
. AutoFilter Field:=1, Criteria1:="To be capped" 'TYPE
. AutoFilter Field:=29, Criteria1:="OPEN" 'STATUS
.columns(1).Offset(1,0).Resize(rng.Rows.Count - 1,1).SpecialCells(xlCellTypeVisible).Value = "Capitalised"
I'm using a named range called "VFILTER". This range is my filter range. Once the filter does it's thing, I want to set the first visible cell in column a to a variable...I can't get this right for the life of me!
With Range("VFILTER")
.AutoFilter
.AutoFilter field:=25, Criteria1:="DELETE"
.Offset(1, 0).Resize(. CurrentRegion.Rows.Count - 4, 1).SpecialCells(xlCellTypeVisible). _
EntireRow.ClearContents
.AutoFilter
JPhelper.ClearContents
JPhelper = "=IF(ISNA(MATCH(B5,J46DATA,0)),FALSE,TRUE)"
.AutoFilter
.AutoFilter field:=25, Criteria1:="TRUE"
.Offset(1, 0).Resize(.CurrentRegion.Rows.Count - 4, 9).SpecialCells(xlCellTypeVisible).ClearContents
'set the first visible cell in column a to variable
Set OutRange = .Offset(1).Resize(.CurrentRegion.Rows.Count - 4, 1).SpecialCells(xlCellTypeVisible)
End With
From a combobox selection i filter a table for all entries containing the selected ID (from the combobox).
I first wanted to use selected columns from the resultant display (the filtered table) to populate another combobox so the user could drill down to the final selection that way, but seeing the mess i was getting involved in (I couldn't assign a range to the listfillrange of the other combobox) i think it might be best to settle for simply copying the visible cells to a new table on the selection page (the full database is on one sheet separate from the selection comboboxes and related controls), where the user can simply see the information needed on whatever line item they want - the number of filtered entries rarely exceeds five. What i can't understand is when i query the number of rows in the immediate window from the code snip below, it always comes back as "1", whether i do so on the full range or special visible cells.
[Code] .......
To load another combobox i tired
[Code] ...........
I really would like to be able to do so for further refining, if not feasible, can work with just a display table.
Querying the reultant rows i simply tried:
[Code] ...........
and
[Code] ....
In both cases, though the filtered table had 5 records displayed, the count was... 1.
1) Can the visible cells resultant table be fed into a combobox relatively easily and if so, how?
2) With the count of rows, what am i doing wrong?
I have a range that has been formatted as a table. Once I've applied a filter, if I try to select all of the rows, and delete the visible rows the option is greyed out.
Is there no way, short of vba, that I can just simply delete the visible rows?
I wonder - is there a way to copy the green range over the filtered cells in col. C !? (I want to Copy range D20:D23 on to cells: C5, C9, C13, C17). I tried to select "Visible Cells Only" as the target for Pasting onto (using [F5] etc...) but no success. I prefer a solution that does not involve VBA. *** see attached picture.
View 2 Replies View RelatedI'm looking for a formula to enter within a particular cell which will return the largest number that appears within a range of cells, for example the range H:133 through L:136. If it's any easier, only one number will appear within the range, though it could appear in any cell within that range.
View 3 Replies View RelatedI need to subtotal/sum a series of columns individually (one column per month across a date range) by the odd numbered visible/ filtered rows as well as (separately) by the even numbered visible/filtered rows. Preferably the totals would recalculate like a SUBTOTAL whenever the filter is altered.
I've explored using Mod and SpecialCells(xlCellTypeVisible) but I can't get a syntactically correct combination to bring back the desired results.
I have a data of a large no. of rows with 5 columns. The last 2 columns are district and state. As it is an imported data, in some rows the data has shifted a column, i.e. the name of state is being shown in district column and name of district is being shown in the column to its left. I tried filtering the data such that it shows only those rows where names of the states are coming under district columns and then selecting the whole thing, cutting it and pasting it to the rightmost column. But even the correct district entries got pasted under state column. Undo, the further damage was controlled, but the original problem remains. Now i will have to cut and paste each row or only consecutive rows.
View 2 Replies View RelatedI have data in one column that is the result of a formula, ie: =B2*B3. The result may display a decimal answer that goes out 4 places. My boss likes us to clean this up by using the = ROUND(B4,2). That is fine and easy enough, but the problem is that these numbers maybe spaced throughout a large sheet. I have to filter to make sure similar items are calculated the same way. The problem is that when I copy and paste, it copies and pastes all the data hidden between the displayed cells of the filtered sheet. How do I make it so I am only copying and pasting the data displayed and not the cells that are filtered out in between?
View 9 Replies View RelatedI am trying to create a range with visible cells after filtering based on a criteria. But, facing some wierd problem with setting correct range with visible cells. Here is the code.
Code:
xlsDynRange = xlsWorksheet.Range("A1:G500")
xlsDynRange.AutoFilter(Field:=1, Criteria1:=intEmpid)
xlsFilteredRange = xlsDynRange.Range("A1:G500").SpecialCells(Excel.XLCellType.xlCellTypeVisible).Cells
Here, xlsFilteredRange.Cells.Count returns correct values. For example, for a particular filtered criteria, if there are 6 rows, it returns 42 (6 rows * 7 columns). However, xlsFilteredRange.Rows.Count always returns 1 (header row), though there are 6 rows. How can this be fixed?
In the sample worksheet, I need VB code to copy the formulas in column D, to paste them as values in the same cells (without removing autofilter by clicking on menu Data>Filter>Autofilter, then edit>copy>paste special>values).
sample2.xls
in the sample worksheet, I need help with a VB code to copy the formulas in column D, to paste them as values in the same cells (without removing autofilter by clicking on menu Data>Filter>Autofilter, then edit>copy>paste special>values).
View 3 Replies View RelatedI'm going to be using a spreadsheet to keep track of where different people are at. So if Person 1 is in Room 3, I will stick a 3 in the box next to their name and then can look at the spreadsheet whenever I need and see what room they are in. When I'm deciding what room to put a person in, though, I need to be able to quickly glance at a list of Room #'s and see what one's are still available. So I have a bank of Room #'s in the spreadsheet....1,2,3, etc.
What I'd like, is some way to set this up so that when I put, for example, "3" in the cell next to "Person 1" the spreadsheet automatically removes "3" from the bank of available Room #'s and when I delete the "3" because the person has left, it adds "3" back to the bank of available Rooms.
I need to be able to query a large date range by a small beginning and end date range and return a count when the value is = each search criteria. i.e. - Search one year of dates from a table by Beg: 7/23/2012 to End: 10/21/2012 and return a count. The beginning and end dates are dynamic and I will need to reference the cells, i.e. B102 "Beg" B102 "End" and not a static date.
View 7 Replies View RelatedI am currently using the following macro to input a formula into my worksheet:
View 12 Replies View RelatedI am trying to do the following with VBA.
What i need is to find out the last cell with data and then selecting the whole range and copying it.
Please see the below.
As you can see, the column with the "longest" data range is B9,C9,D9,E9.
I need a VBA code to detect which Column has the longest Data and from there copy the entire range.
Hence, in this case, the range to be copied is From A2:J9.
Column A
Column B
Column C
Column D
Column E
Column F
Column G
Column H
Column I
Column J
1
2
ttt
rrr
m
vvv
gg
ff
fff
fff
fff
[Code] ..........
Hence,in this case, the range to be copied is From A2 to J14.
Column A
Column B
Column C
Column D
Column E
Column F
Column G
Column H
Column I
Column J
1
2
hjhjh
ghj
gh
ghj
ghj
ghj
[Code] ..........
I am trying to get the addresses of different cells containing numbers. This addresses should be ranked by the size of the value from largest to smallest.
Currently I am using this formula
=CELL("address";OFFSET($A$2;MATCH(LARGE($A$2:$A$10;1);$A$2:$A$10;0)-1;0))
and just increasing the variable of the LARGE function for every rank.
This works fine up to the point some numbers are the same. If I have for example two cells containing a 80 and 80 is the largest value, rank 1 and 2 result in the same address (of the first cell containing the 80). But I want the formula to result in specific addresses for every number.
I thought about using MAX instead of LARGE, but I don't get a working solution for the second (third, fourth, ...) largest value.
I tried a few searches for what I need but I think my wording might be off or there isn't anything on it yet. So the formula I'm looking for is: I have a single colum of say 700 rows with random values in each. I would like to average rows 1 to 15 then 2 to 16 then 3 to 17.... all the way through to 686 to 700. Now out of all that I need only the highest 15 period average value returned. Seemed simple until I tried to do it. Whats that saying, the idea is 1% of the invention..
View 4 Replies View RelatedI am looking for a formula that will output the highest and lowest value in a range. Column A contains a range of numbers, some of which repeat and in column B i'd like to extract ONE instance of the highest and lowest value in Column A, preferable the last instance.
See example below and in column B the desired output.
Column A
160
90
120
90
120
160
Column B
blank
blank
blank
90
blank
160
How to automate the process of finding the highest number in a dynamic range meeting a criteria?
New data added/updated every day (new come, old gone).
The attached file has a properly displayed data.
I am having some data running into 60 (C:BJ) columns and 200 rows. It is the record of dates query raised and answered with refernce to query number in the A coulmn. I have zero value as entry for the unused cells in this range due to some constraints. I need to find the smallest and the largest non-zero date in this range for analysis purpose. I plan to use the difference between these 2 dates to calculate turn around time for a query.
Problem is to find the smallest and the largest non zero date within range C6:BJ6 which would be used as input in the Networkdays formula.
I have a named range which refers to: =MATCH(LARGE($G$5:$G$68,ROW(G5)-4),G$5:G$68,0)+4. It is supposed to find the largest figure in the adjacent column, list its row in cell H5, then the second largest for cell H6 and so on until the end of the data. The data in column G is dynamic and some cells will contain "0" with certain sections of data thus why I need a formula and cannot just use sort each time.
My problem is that when I use the formula as a named range I get "#N/A" and when I evaluate the formula I will get the answer but in array brackets (e.g.{17}) before the final step turns it to "#N/A". The formula will work fine if inputted directly into the cell but as the same formula will be used over three columns and numerous rows I would much prefer to use a named range.
I need to create a macro that will examine a range of cells, for example D12:T12, find the cell with the largest number value in that range then set the font for that cell to bold (or red, or change the cell background color).
View 2 Replies View RelatedI have a set of data like below, I am trying to get a formula to look at a range i.e. May column and then select the highest number in that range but rather than returning the number returning the team name, is that possible? Not sure where to start...
Jan
Feb
Mar
Apr
May
Jun
Team 1
25087
23029
32991
21319
25271
25136.8
[Code] .........
I have Sheet1 and Sheet2. On Sheet2 I have some filtered items.
Now, is it possible to link the filtered items to Sheet1, e.g. =IF(Sheet2!B1=IsVisible;Sheet2!B1;"")
I do not want to make a copy/paste/vba turnaround.
[Code] ....
I have a page ("Property Register" with some 22 rows of data. I apply the filter as per the code and I can now visually see a header and two data rows which is what I need to have.
the row number of the last visible entry (actually showing as the third on the filtered page) is row 7, again correct as row 7 of my original page has the last value I am trying to find.
However, both of the two "last_row" lines return me a value of 7 whereas I really need it to be three.
Seems to me that I must have the wrong approach (s) to finding the last row so that I can only process the visible rows (I don't need the actual row at all because my processing depends on a cell value in the row).
How would I modify the code belwo to insert the copied range above the existing data in the worksheet? (The part giving me the problem is in bold italics.) Also, how would I modify this code so that it only copies the filtered data, NOT including the column headers?
View 14 Replies View RelatedMy first worksheet contains the following information:
Column A contains parent category names (e.g. colours)
Column B contains lookup values (non-unique)
Column C contains value to return
Each subsequent worksheet is for a single parent category (i.e. a sheet per unique category)
I'm unsure how to write some code that will return column C for each worksheet
Example of first worksheet:
A
B
C
1
Group
Item
Amount
[code]....
From this, my code creates 4 new sheets named Red, Orange, Blue and Green with column A containing the item numbers that relate to the worksheet name in the table in the first sheet (e.g. column A in sheet Red contains item numbers 1 to 6 inclusive):
A
B
1
Item
Amount
2
1
x
[code]....
In column B, I could like to return the values in column C from the table in column C that are only specific to that worksheet name.
I think I want to filter column A in the first sheet against the sheet name and then perform a VLOOKUP on the filtered data or would using a dynamic range be better?
i have issue copying data from a filtered sheet to another sheet. i only want to copy visible cells....ie when there is no data or data after filtering i have: selection. currentregion.copy. this dosent work as when there is no data it still copies my column headings in row A1 across to row r1 and then to next sheet. how do i write code that will only pick up the filtered data starting in first cell...ie after filtering this could be any number. for example i only want to copy data if row 2 and downwards has data
View 2 Replies View Related