I have a macro that deletes certain rows. I'd like the macro to tell me what it deleted specifically (if anything). Here's some of the macro:
For rownum = 1 To maxrownum
item = Cells(rownum, 1).Value
If item = "PUBS" Or item = "SWCDROM" Or item = "PC PACK" Then cells(rownum, 1).EntireRow.Delete
How do I get the macro to tell me if it deleted PUBS, SWCDROM, PC PACK, all three or nothing at all?
In excel, is there anyway to find the details(history) of the previously deleted rows (using vba or anyother way)?
We have created a macro that basically looks for rows that contain an "H" and hides the row if it does.
Users can add new rows throughtout the year to this spreadsheet. and based on certain criteria, an H or U will be placed in a hidden column which the macro looks at and hides any row it finds an H.
The user has to click on the button that has the macro assigned to it once they have finished working on the spreadsheet.
The problem we're finding is that for users who insert/delete rows, once they click the button it takes up to 15 seconds to run through macro (which is ok). However, users who haven't added or deleted any rows and who click the button, they have to wait upto 5 minutes (which isn't ok) for the macro ro run.
We can't figure out why the macro takes longer to run when no changes have been made?
I have 3 sheets (Master,Detail1,Details2) in my workbook. In the master sheet I w'll have customer names. In the detail1 & 2 sheet2 I will have their details.
When I click on the customer name from my Master sheet it will go to corresponding sheet. I have provided link for that and it's working fine.
But my requirement is when I click the customer from Master sheet, I want to get into the detiled sheet as well as want to display the records only related to the custmor I clicked/selected in my master sheet.
I have this code that removes a group of cells on any row that contains "Y" in Column L, but it does not move the remaining group of cells on a row up after the cells are deleted.
VB code so that when a range of cells are deleted, the row(s) below are moved up?
Sub RemoveReceived()
LastRow = Cells(Rows.Count, "H").End(xlUp).Row 'change "H" to the column that determines which is the last row
For x = LastRow To 4 Step -1 'assuming it starts from row 4
If Cells(x, "L") = "Y" Then
Range("H" & x & ":K" & x).ClearContents ' or use Delete
[Code] ........
enables the user to select a row to delete. However, I need to do more than that. I need to be able to copy all the rows until row 37 and move it one row up after the selected row is deleted. Below is the code
View 3 Replies View RelatedI have a question concerning Macros and the Disable/Enable prompt. My boss has a spreadsheet which has been used for years and he recently wanted to and did remove the macros from the spreadsheet (they were no longer necessary), but the disable/enable prompt still appears when the spreadsheet is opened. I replicated this in a test spreadsheet with a simple insert line macro and received the same results. Is there a way to remove the macros and the disable/enable prompt once they are removed? I know about setting the security to low to not see the prompt, but I would think that once the macros are deleted, the prompt should not appear any more.
View 2 Replies View RelatedI was interested in getting Excel to look up details of a person say age and put the details in another table under the correct heading.
E.g. Fred Bloggs age 25
Would look like this
First Name Surname 16-24 25 - 49
Fred Bloggs 0 Tick or something
I have a macro i would like to run whenever a user deletes a worksheet...
I would like the user to be able click as normal to delete,(ie. right clicking the tab and selecting delete worksheet, or selecting delete worksheet from the menu) but would like to run my macro when they select delete.
I am using excel 07 if that helps, or i could use another version...
My macro will save a copy of the deleted worksheet as xlveryhidden as a backup..
Complete List of People in Column AA.
Partial lists of these same people in columns A, C, E, G, I, K.
Goal: Once I put that persons name in A, C, E, G, I, K, I would like it to be deleted from Column AA.
[Excel 2003] I have 2 spreadsheets: one to summarize data from a 2nd detail spreadsheet. I'm analyzing work order information for a service operation.
I'm using dynamic name ranges, as follows, for the detail:
WO_Num =OFFSET('WO Tracking Log'!$A6,0,0,COUNT('WO Tracking Log'!$A:$A),1)
Other detail data is defined as these examples show:
GM_X =OFFSET(WO_Num,0,8)
OpenDate =OFFSET(WO_Num,0,1)
All detail data begins in Row 6 in the detail spreadsheet.
In the Summary spreadsheet, it appears to make a difference where my calcs are located in order for my COUNTIF's to work correctly. As long as I keep my summary calc (to total the number of work orders in the detail) in Row 2 of the Summary, it works fine...but if EITHER I move my calc down a row OR if my detail drops down a row because a row was added above (where I have just header info), my summary totals change?!?! I don't understand.
Here are two examples of the calcs I'm using in the summary:
=COUNTIF(WO_Num,">0")
=COUNTIF(GM_X,"X")
Can someone tell me what is going on? What I'm doing wrong?
i was just wondering if anybody know of any good resourses for excel to outlook macros, specifically for copying contact and appointment details from excel to outlook. I've had a good search on the net, but it just yields lots of code, im looking more for learing resources etc.
View 3 Replies View RelatedThe size of this pivot table depends on how many different customers are in the data tab.
What I want is a macro that will show the details as if you were to double click on the grandtotal, but the grandtotal in column c is never in the same row and I am having difficulty coming up with a macro to do this.
There are some other functions it is performing as well so I just need to add this to the existing macro code.
Attached file 140625 box adds.xlsm has three textboxes that are totalled in the fourth box.
The Code updates the total automatically as you ENTER numbers into cells, and overcomes "blanks", but I need it to update the total if you delete any of the three numbers.,
As shown below, I set the Code to "Exit Sub" if a cell becomes blank, but can't see how to invert it without going through the same "checking" process twice for the other cells.
As the Code structure is essentially the same for each box, I've just shown the first one here:
VB:
Private Sub TextBox1_Change()
If TextBox1.Value = "" Then Exit Sub [code]....
create a macro that will find and calculate based on the details of 4 columns on the same spreadsheet.
Basically, here is what I need to do:
1. Need to calculate how many QTY IN (Column F) and PALLETS IN (Column I) of a specific PART# (Column A) and LOT CODE (Column B) For example if enter a PART # and LOT CODE, it will calculate how many QTY IN and PALLET IN of that PART # and LOT CODE.
2. Need to do the same for QTY OUT (Column G) and PALLETS OUT (Column J) also.
3. Output should contain the PALLET # , QTY IN and PALLETS IN based on the PART # and LOT CODE search. I just want to simplify the search function in this spreadsheet because it is very cumbersome if you need to find how many items left for that PART # and LOT CODE.
Attached is the spreadsheet..
Branch
Security Region
Average Score
101
1 London
4
102
5 Home Counties
5
[Code] .......
I have setup a dropdown list of different regions that cover our company and what I want to do is that when one of those regions is display only the rows from that region are displayed in the list either on the same or a new worksheet.
I know this can be done by adding a filter to the column in question but I am dealing with very basic PC users so to make their lives easier it would be great to use the drop down box option.
I have a userform with a command button which fires a macro.
everything works fine so far.
my problem is:
I would like to add a msgbox at the end of the macro which confirmes "successfully completed".
I cannnot simply add the msgbox at the end of the macro. don't know what I'm doing wrong.
(see below)
Private Sub CommandButtonOK_Click().
If Me.OptionButton1.Value = True Then
ThisWorkbook.Worksheets("PropertyWorksheet").Range("A1").Value = "Government Securities"
ElseIf Me.OptionButton2.Value = True Then
ThisWorkbook.Worksheets("PropertyWorksheet").Range("A1").Value = "Corporate Bonds"
[Code].....
Unload Me
Application.ScreenUpdating = False
Sheets("MySheet1").Select
Application.ScreenUpdating = False
'run macro
MyMacro1 (adds, hides and deletes various sheets)
MyMacro2
[Code]....
I'm trying to display only rows that contain data.
I have a work book that contains several work sheets. The work sheet are named by department, I'm trying to display only rows that have data and to which department they belong. I have 7 columns of data with a header. The header names are the same for all work Sheets.
The headers are Customer#(A1), Order#(A2), Qty(A3), Purchase Date(A4), Comments(A5), Promise date(A6), and Ship Date (A7).
I only want to display cells that have data from the work sheets onto a summary page.
I have this sheet at work which contains a bunch of courses my employer runs, alongwith the dates and other details (which spans columns A through O)
Course-rows which require action/follow-up are highlighted with a certain color. The "completed" course-rows have no fill.
Note: the courses requiring action may have a past date, the only distinguishing feature is the highlight color.
Is there any way by which i could generate a pop-up box of some sort which would display the "highlighted" rows (maybe from A through I or something).
I could add 'follow-up' flags on another column if the highlight color won't do.
There will be many orders in this list and each orders will have several appendixes. I want to able to see and print the orders with their first appendix row but I want to do that when I need.
and do not want to loose any data.
I have a database with 65536 rows and A-BZ columns
What I am wanting to do is, on another worksheet be able to select identifying data from one or more columns from the database but have it display the entire row.
For example
WCP28 SX
WCP28 TX
WCT36 SX
WCT36 TX
In this example I would like to, on another worksheet, be able to create a drop down where I could select WCP28 and it would show me both the TX and SX row. Or I would like to be able to select WCP28 SX and WCT36 SX and see the rows next to each other. If it were for me I would just use the auto filter and manually compare but this is for somebody even less inclined than I am.
After running advanced filtering through VBA like that:
[Code] ........
Excel returns a couple of rows which fit the Criteria. How to display these rows in a textbox in the userform? (all I've managed to display in it is one cell).
Data to appear on one of my sheets.
I have a database of family info, where each family has an ID in A on the "Mems" sheet, and each child is listed separately on "Children" sheet and they each also have the family ID listed for each child in A.
On the Mems sheet all the IDs are unique.
On the Children sheet, as there can be multiple kids per family the same ID value can appear multiple times in A.
How do I get the Mems sheet to show all the kids names (in B on the children sheet) either in 1 single cell (concatonated) or in a series of cells apended at the end of the relevant data row on the Mems sheet?
Please ref attached spreadhseet.
1) Is it possible to hide all cols save D & E and also all blank rows in Col D
2) I would like to have an initial If statement saying stating that if the answer to the question in D2 is Y then don't display anything else other than the info in B2 & B3.
£) the sorting seems to have gone funny - not sure what I've done here, I'd like it sorted by phase (col A)
4) where there is a blank in the cell under a question (for example D3) - this means that the same question applies and that multiple docs should be returned (e.g for Q1 D2 docs 1 & 2 display, for qu D37 docs 36 - 39 display)
I am trying to display a certain number of visible rows, using AutoFilter. My idea is to use a helper column that will 'number' each visible row, but I'm not quite sure what functions to use for this.
View 5 Replies View RelatedI want to be able to view only the rows containing search criteria.
For instance, if I search for the word "sandwich", I only want to view rows containing that word. How do I do that? Or... Is there a way to group the rows containing the word "sandwich" together.
I have about a thousand rows that I need to sort and distribute to different worksheets. I don't want to work through the list moving single rows or small groups of two or three at a time.
I need the selected rows to be displayed on a new sheet. The idea being that I have a quiz with hundreds of questions and I only want a random selection to appear when I execute the macro. I plan on hiding the original questions and only displaying the randomly selected ones.
Here is the original code from the previous post.
I am not very smart in Excel. I have problem with pulling data from the following range of rows.
A
1 Apple
2 Banana
3
4 Grapes
5
6 Pomegranates
Expected Result: Apple, Banana, Grapes and Pomegranates
scenario: One or more than one of any of the 6 rows can be blank. I need a formula or procedure that pulls together data from A1:A6 automatically and adds "and" between the last two values. See the expected result above for an example.
On sheet1 I have this:
employee ID Date hours item1 item2 item3 item4
So it's 8 columns and the row count can vary.
This list on sheet 1 has the persons employee id and various bits of info. There will be multiple rows with the same employee id. This data is not sorted in any particular order, but I'd rather leave this sheet untouched.
On another sheet, I would like the user to simply type in a number for the employee id (I don't want to use msg box, just a cell is fine, maybe a button form to click search to run the macro) and it lists all their hits, however many rows that may be. Again I can't sort the original list so the employee might have hits scattered throughout the main list.
So they would enter the employee id and below that they would get all the rows with all the above data where they get a hit. One concern I have is say the first search for employee 123456 turns up 18 results. Then they search for employee 123444 and it only returns 8 results. I don't want the last 10 rows of employee 123456 to be still present. Basically a search that searches another sheet and returns any hits, and it clears the list of previous search results so for each search you only see the results of that search and not old data.
I can view the data how I need to by conditional formatting and pivot tables but HR wants to get rid of all rows that: only have 1 accounting line per document such as Doc MI310712 in attached sample So I only want to display records if there is more than 1 accounting line for each document
My understanding of Excel is that in order to get rid of rows that a VBA macro is needed since there is no function to do it. My VBA is limited but is there a way to specify criteria in a filter to hide the rows using a formula?