A coworker has come to me asking for a way to indicate on a sheet whether or not any autofilters are applied, and a button to reset all the filters. The second part is easy, and I've got a CommandButton with the following code to do it:
View 6 Replies
I have a workbook that is accessed through a network by many users. The one problem that occurs with certain users is that they leave the autofilter on when then are in the spreadsheet. It has an autofilter on each title, and the user initials are an option to filter...certain users leave the filter on when they save the sheet so the next time someone else goes in, it only displays the previous users results.
Is there a way to reset the autofilter for the user initials each time the sheet is opened?
I'm just finishing a project that is a collection of three calculators, each of which returns data based on a series of user-supplied variables. All the mechanics are working [thanks in part to replies to previous posts], but there is one more thing I'd like to add:
Does anyone have a way to clear the contents of another cell [actually several] cells via another cell? As the most complex calculator requires eight variables to be entered, I'd like to provide a quick way [a button?] to "clear" or "reset" the calculator - basically wipe all unlocked cells. I should note that all of the cells in question already have Data Validation of one type or another.
I've included the code I'm using to calculate the net weight depending on which option button is selected. I use a flag ("VLAG") to know whether it's the first time the button is pressed. All variables are DIMmed at initialization (different sub).
By using other flags, I can see the code runs perfectly, but the tare weight ("TARRA") is not incremented each time the button is pressed. The formula I'm using to increment is
I want to add a secondary function to these buttons; this is a necessary function for every order, so I want to make it necessary to click one of the buttons for every order. One way to do this would be to leave the button unchecked.
How could the button be set to leave itself unchecked after being clicked on?
I have a Lookup that updates name from a list.
D2 =IF(LOOKUP($A$2,B:B,C:C)=",",LOOKUP($A$2,B:B,C:C)) - this Works fine
Say A2=3
C1= Name1
C2= Name2
C3= Name3
Also a macros that if D2 is typed over you can re-insert the LookUp.
Sub Reset()
For Each ce In Range("D12) 'Company
'If IsEmpty(ce) Then
ce.FormulaR1C1 = "=IF(LOOKUP(R2C1,C[-2],C[-1])=",",LOOKUP(R2C1,C[-2],C[-1]))"
ce.Font.ColorIndex = 11
'End If
Next
End Sub
The Weird thing is that in stead of putting the value from the LookUp it paste the formula
=IF(LOOKUP(R2C1,C[-2],C[-1])=",",LOOKUP(R2C1,C[-2],C[-1])) like it was text
I have used the reset on a number of numeric equations no problem, but not on a LookUp one. I've tried changing the format of the cell, but not successfully.
I have a spreadsheet with 4 combo boxes and 2 cells that I need reset to a specific value when a button is clicked (the top value for the combo boxes, the function [today()] for one cell, and a specific date for the other). I figured I would put the function and the specific date in seperate hidden cells and the button would link to them, but whatever way gets the job done will work. I know I'll need to code this in VB, but as well as I know excel i've never played with basic before.
View 3 Replies View RelatedI can't find a way to reset/clear the textbox in order to enter new data
View 2 Replies View RelatedI have a pivot table with over 4000 entries and about 12 columns which i filter to get the info i want.
Unfortunately with so many rows and columns in the table, if i do a macro that gets each filter back to 'show all' its really slow.
Doing this manually using the "Show all" option in the filter takes a fraction of a second, so surely there must be a way to do this more quickly in VBA?
i can't understand why manually it takes no time at all, but automating it through recording a macro takes forever.
I'm having a problem creating a Reset All command button that will remove user entered unlocked cell values from an entire workbook save for one specific worksheet. So for example, I have five tabs labeled as "DTF", "Week 1", "Week 2", "Week 3" and "Week 4". I want one single command button (placed in the "DTF" worksheet) to remove all of the unlocked cell values from "Week 1" to "Week 4".
View 9 Replies View RelatedI have never written or used a macro before and I have a simple macro task to complete:
I have Column L (L4:L10) of seven scroll bars that move according to number changes in column F (F4:F10). I want to create a form control command button that resets the changes on the scroll bars according to static column of numbers in Column E (E4:E10).
I don't know if it matters, but I'll add that I plan to add a second button that does the same thing with a different column of data. I assume I'll simply replicate whatever procedure I use in the first button - is this okay?
I have some vba code that currently copies a status table out of a worksheet, into a temp file for an email. The status table in excel has a column D which can have different status. I want to select everything in the table except rows that are 'Descoped'. Currently my code looks like:
Set rng2 = Sheets("Execution Status").Range("B2:F420")
This picks up everything without looking at the status. I want to change it so it doesn't pick up the rows where Column D contains 'Descoped'.
In pseudo code I would describe it as:
Set rng2 = Sheets("Execution Status").Range("B2:F420") where value in D5:D420 is not equal to 'Descoped'.
I have tried:
Set rng2 = Sheets("Execution Status").Range("B2:F420").Value "Descoped" and nothing gets selected.
I have 4 combo boxes with selectable options and several cells for inputting data into. I'm looking to create a reset button that returns combo box values back to the first one in the list and clears all cells at the same time. I've figured out the cell reset as follows;
View 3 Replies View RelatedI have a spreadsheet with 32 worksheet, I want to write a macro to "save the work, save as.. in a specific location and with a specific name and then reseting all data in specific cells.
View 14 Replies View RelatedIm sure this is a very common problem. I tried searching for it but I havent found anything that solves this for me. Here is the code Im using:
View 3 Replies View RelatedI can select the top cell in column "F" after filtering by multiple columns using VBA and arrays, but now want to I want to use the top cell in column "F" to search for all other equipment that uses this item.
E.g. remove filter, and reapply autofilter to column "F" based on selected cell as per below VBA
Note: Row 1 contains command buttons and row 2 Headers.
Using the below table, I'm trying to do the following
I'll use row 3 as an example. I'm trying to creat a RAG status based upon the foloowing details
G- If D3 is under 30 days past D2
A- If D3 is over 30 days past D2
R- If D3 is over 30 days past D2, and todays date is over 30 days past.
ABCDE1Today:20.7.2009Stage due (planned date)Stage completed (actual) 2 1.2.200910.3.2009R3 1.6.200910.6.2009A4 1.6.200910.7.2009R5 1.7.200910.7.2009G
I have done the two obvious checks regarding my missing Status Bar, both in View and Options and still the Status Bar refuses to show itself. I have shut down Excel with the options unticked hoping that on restarting and ticking them the bar will re-emerge but still no joy and also done vice-versa. how to get the Status Bar to reappear?
View 5 Replies View RelatedIm forgetting how to code something for this ....
View 7 Replies View RelatedCircular: 02 in status bar. I got this message
View 2 Replies View RelatedDoes anyone know of a site or some code that can make changes to add some items to the status bar calculations?
Such as right now you have Sum, Count, Count Nums, Max, Min... just to name a few.
I'd like to be able to add some other ones down there if it can be done. I'd like to count #N/A's or possibly sum only positive numbers? I can do it with a quick keyboard shortcut and message box with a macro, but I'd like to just be able to highlight a range and have it show up like sum or the others do.
Just thought I'd psoe the question.
in the status bar in the bottom left once the workbook is opened is want it to say
## Seconds Remaining Before Workbook Auto Closes
as for the ## I want it to countdown from 60 seconds
I have a worksheet that I use to track course scheduling. I have 5 columns which contain dates. At the end I have a Event Status cell that i manually update based on which of my 6 date fields are filled in. I would like to have the Event Status automatically fill with a word as I add dates to the 5 columns. If there is a date in columns 1,2,3, and 4 the event status cell would update based on the date in column 4, dates in columns 1 and 2 - the event status would update based on column 2, etc.
Here are my column headers and what the event status says if there is a date in that column, and no dates in any column to the right of it.
Notional Start Date - Not Contacted
Declined Date - Declined
Contacted Date - Contacted/Working
Scheduled Date - Scheduled
Completion Date - Completed
I have excel in the below format.
Sheet1 ABCD1NameDescStatusSpend2raviGood boy1103kumarAve3104raviGood boy1205raviGood boy2306kumarAVE1407sureshMED1508subMED3609raviGood boy27010raviGood boy38011raviGood boy120 Excel tables to the web >> Excel Jeanie HTML 4
I need sum of value based on name and status.
And also i need Descrption also.
It is possible in VBA.
Sheet1 FGHIJ1NameDESCStatus 1Status 2Status 32raviGood boy50100803kumarAVE40 104subMED 605sureshMED50 Excel tables to the web >> Excel Jeanie HTML 4
My macro involves iterating thru' a loop close to 500 times, and each iteration involves some movement back and forth between Sheet1 and Sheet2. Thus I have set 'Application. ScreenUpdating = False' just before the start of the iteration to prevent screen flicker and hopefully to speed up the iteration process. However, altho' the screen thus appears 'frozen' during the iterative process, I would like a real-time 'status update' box to appear at the start of the iteration; something like: 'Currently Running Iteration 24 of 500', where '24' is the current value of the loop counter within the macro code; next loop increments this to '25', etc.
View 4 Replies View RelatedI am trying to use teh staus bar for simple reporting of progress. When I launch Excel 2003 on XP the status bar works as normal with Excel reporting progress etc.
When I take control in VBA using: Application.StatusBar = "some text here"
then the status bar text appears as solid black. As if each character is black on a black background. If the text is longer then the length of black increases. See attached image. I reduced the Excel window from maximised to allow me to print a small image of the window showing teh status bar. The status bar works as I would expect, running the macro I can see the progress. When I maximise it it reverts to being black on black!
I posted here already but the subject deviated to somewhere else...
Basically I have this in a module to format TextBoxes:
VB:
Option Explicit
Sub TxtBx(i As Integer)
Dim uf As UserForm
For Each uf In UserForms
[Code].....
I have a sheet with work tasks on. Column I shows the completion date for each project. In column J I would like an automated response linked to todays date. Can we use row 2 as our example? So I need in this case cell J2 to show the following:
- If todays date is more than 5 days before the completion date (in cell I2) I would like the cell J2 to show "IN PROGRESS"
- If todays date is less than 5 days before the completion date (in cell I2) I would like the cell J2 to show "AT RISK"
How can i link my PO status sheet on desktop to alert material delivery date.
View 2 Replies View RelatedIn my spreadsheet I have column B which has a drop down list using "open" and "closed" as the choices. Whenever someone selects the closed option, I would like for that row to be moved to the next blank row on the tab called CLOSED. Is this possible? I was thinking that if it was it would require some kind of coding. I have attached my spreadsheet for you to look at.
View 2 Replies View Related
