I am not sure if this is doable in VB or if there is an excel function to do this but I am using a rather large worksheet that is shared amongst my staff. I would like to have the sheet clear any filters that have been used by one member and for the sheet to save with the cursor in the home cell (A1). This way the sheet is ready for the next user. Can this be done with VB?
I have a problem with the attached spreadsheet. I have certain letters (A,B,C etc.) that are shipped to various regions. I would like to have a count on top to count the total number of orders, but one that also counts the total number of unique orders. However, this unique count has to be dynamic and must be able to adjust accordingly to the filters (by default, if no other filters are applied, should be 15). For example, if I apply the "Ship To" filter to Canada, the total number should be 19, but the unique count should be 12. If I change the "Ship To" filter to US, the total number should be 9, and the unique count should be 7. I've tried to use the advanced filters but if I apply the unique entries filter, it is only a one time calculation. Also, the advanced filter gets rid of my other filters.
This is my first use of the forum as I only joined yesterday after a recommendation from another colleague.
I am attempting to write a macro to clear the contents of cells in a range that have conditional formatting. Below is the formula I have used...
Sub clr() Dim r As Range For Each r In Range("09:050") If InStr(r.Interior.ColorIndex, "40") Then r.ClearContents Next r End Sub
While the formula runs without error, it does not clear the contents, although I read on another thread on this forum that you cannot clear contents of cells that are conditionally formatted.
Alternatively, if there is a more efficient way to clear cell contents (without using a formula in the cell itself),
I'm wanting to filter a set of data by inputting in to a cell. And it works perfectly...
VB: Private Sub Worksheet_Change(ByVal Target As Range) If (Intersect(Target, Range("B4")) Is Nothing) _ Then Exit Sub End If Cells.AutoFilter Field:=2, Criteria1:="=" & Range("B4") End Sub
The only thing is I now need is for the code to clear the filter if the cell (B4) is blank. It currently filters out all the data if the cell is blank.
I have a table which says that this is the amount of coloured cells we have in another sheet.
For e.g.
Field Name Code A Item Description 5
Now, the item description column has 5 cells in another sheet which are filled in with "Yellow" Colour. So what i want to do is to click on this 5 in sheet 2 in this case as per the attached sample which takes me to the filtered result on sheet1 of 5 yellow coloured cells under the column of Item description including an additional filter of Code "A"
I am trying to find a way in which a used can enter text into a cell (effectively the search cell) and then that text is compared to text in 3 or so columns, if the text matchs any part of the cells in the those columns then the spreadsheet should filter out the rows that dont have a match and only leave rows that have a match.
Its like having a spreadsheet with a list of part an user can put in 55 or bolt in the cell at the top and the list would only then show all the rows that have 55 or bolt or whatever text in the table below?
I have 3 pivot tables and with 3 filters each (they are all the same filters). I just want to change 1 of the filters for each of the pivot table (meaning the other 2 stay the same for all of the pivots). Is it possible to have a filter change automatically to match a filter in another pivot?
I had 2 pivot tables running on the same page (sheet 2). They both draw data from the same source (Sheet 1).
The only difference between the two is that pivottable1 has a filter for "home team", and pivottable2 has a filter for "awayteam".
I have managed to link the tables using VB so if i select "Man United" on pivottable1 - as the home team, pivottable2 also selects "Man United".
Now my problem is, that i don;t want to select the teams from the drop down check box list on the actual pivot table. I want to be able to do this by typing into a cell (say Cell A1 on sheet 3 for instance) and this controlling BOTH pivot tables.
I did have some lengthy code which worked for one pivot table, but it did not operate both and it over rode my code i had in place which works for manual filtering.
i have this formula in cell e28 =IF(B28<>"",LOOKUP(B28,STOCK!A1:A500,STOCK!B1:B500),"") and when its empty it returns a blank cell
but in cell e29 i have exactly the same formula =IF(B29<>"",LOOKUP(B29,STOCK!A1:A500,STOCK!B1:B500),"") but i returns #n/a
why is this and how do i stop it i want the cell to be empty unless there is a code entered in b29 in which case it will look up the relevant info for me
I am running into trouble with too much data accumulating on the clipboard in XL2007, so is there any way to set cutcopymode=false (or some other function) so that the clipboard is automatically cleared after every paste event throuout a macro project without having to restate cutcopymode=false after every paste?
I have a UserForm called Menu. The first line of code behind the OK button says
Menu.Hide
When I run this using F8, it behaves itself and the menu disappears after the code line Menu.Hide. When I click the OK button to run it normally the menu stays on the screen partially hidden behind the next sub menu.
I have 4 listboxs on a Userform populated by rowsource
I have code that will not allow conflicting selections of the list boxs
EG listbox1 conflicts with listbox3 listbox2 conflicts with listbox4
What I am trying to do is when the user clicks on listbox1 and listbox3
I clear the selections from 1 and 3 leaving no highlted blue in the boxs
My code runs it clears the first listbox and not the second
I have tried using boolean to clear them but it is the same thing
here is my code below
If shOptions.Cells(r, c) = "" Then MsgBox "You have selected conflicting Alterations" UserForm1.Controls(h.Name).ListIndex = -1 *this works UserForm1.Controls(lb.Name).ListIndex = -1 * this does not fire Exit Sub End If
If I change the code to UserForm1.Controls(lb.Name).ListIndex = -1 * this works UserForm1.Controls(h.Name).ListIndex = -1 *this does not
Basically, I want to use look in one cell to get a value then in a table look in a coloum to find the same value then return a value from a different column in that row.
This is to organize groups of children participating in an event.
I had this problem a few days ago and NVBC suggested Text to Columns, which worked initally but didn't seem to 'save' or stick... also, I'm not sure what is causing the problem to begin with. It was my understanding that Excel couldn't return a truely 'blank' value. If a cell was blank or empty, Excel still 'sees' it as Zero. WHY then, for the Love of Gummi Bears, will Excel not calculate my formula. It's a simple formula!
=A13+B13
I've tried =SUM(A13+B13)
I've tried =IF(ISERROR(A13+B13),"",A13+B13)
But if don't TYPE in a 0 or a number, then it just does nothing. 50 + 0 = should be 50 not blank or #VALUE!. 50 + Nothing = should be 50 not blank or #VALUE!
Attached is a small copy of what I'm trying to do. I've double checked that all number cells are formatted to numbers, not text. I tried the Data:Text to Columns trick. I've tried Tools:Options:Show Zeros. I've tried Manual and Automatic Calculation. They shouldn't have to type in 60 cells of Zero to get the simple calculation.
I'm linking one sheet in a workbook to another. The formula is simple,
='Link 1'!E1
If there is data in the cell, it replicates it which is what I'm after. However if there is no data in the cell it returns a "0", not what I want at all.
I have a current formula using SUM formulas obviously in the answer cell the answer is returning 0 due to no data inputed, how do i make the cell show empty.
eg. =SUM(A1*A3) returns answer 0 need cell to be blank.
I have a sheet containing collums with month an weeks. I try to find out which collum the first week start and where te last week the same mont ends.
Let say A5:E5 is filled with december in each cell. The row below (A6:E6) says week 48, week 49, week 50, week 51, week 52.
I want a formula telling me de Cell reference where desember begins en where it ends. In my Excample (A5 and E5). If Possible, I also could prefer that the cell reference was to rows below start/end. In my example (A7 and E7)
i'm trying to figure out a way that would return the address of the cell that contains the highest/lowest value of a range i.e. =cell("address",min(g3:g6)).
if the lowest value was in cell g4, i'd want the output from above formula to be $g$4.
I am trying to create a formula that will act like a vlookup but will return a different row. In other words, On page two I need to write a formula that says: In column 1 if you see "Extension 101" return column 2 of the row right beneath it, so on and so forth. So page two should return a mirror of what page one says, the difference is I would like people to type in "Extension 101" in a cell and it would return all the date.
A B
1 EXTENSION 101
2 INBOUND TALK TIME 55M19S
[code].....
Cell A1 would be typed in//Cell A2-A4 would be static//Cell B2-B4 would return these numbers based on info from A1.
Cell A1 would always be unique in column A (on both pages).
The conversion rate is updated daily from telephony reports, and I manually sort it into conversion order each day before sending it round.
What I want to do is find the highest converter for each team.
So:
Column A ('TeamLeader' range) has the Team leaders in, column B has the agent name ('Agent' range), and column F has the agents conversion rate ('conversion' range).
I think I'm on the right track with this formula:
=(MAX(IF(TeamLeader="Bonnie",Conversion))
But this only displays the figure in the Conversion rate, how to I get it to 'step back' 4 column's and show the agents name?
my spreadsheet to return the word unit if cell a18=1 or the word units if its over 1 but i also want the cell to remain empty if there is nothing input into cell a18 is this possible
I'm looking to clear the contents of the 2 rows after my previously defined last row. So for example, if my last row is defined as LastRow1, I'd like to clear the contents of thr 2 rows below LastRow1.