Macro To Work Out Top 3 Cell Occurrences
Oct 16, 2013
I have a database full of part numbers for example 0EV2310A06G01JU:S5065
These can vary to having a vareity of symbols/letters/numbers (I am not sure if this makes a difference!)
writing a macro to run a report to show the top three reoccuring partnumbers.
The spreadsheet is currently 1845 cells big but this data will change on a weekly basis, the layout will however remain the same. The column that the part numbers are in is column A.
Is a macro the right way to be approaching this if the data is going to be changing on a weekly basis?
View 2 Replies
ADVERTISEMENT
Sep 5, 2008
Everytime a cell (say B18) changes value I want the following to happen:
If it changes to "Annual" I want row 20 to ungroup
If it changes to "Quarterly" I want rows 22-25 to ungroup
If it changes to "Monthly" I want rows 27-38 to ungroup
From what I can see on other discussion groups I need to enter a code on the worksheet from view code... but I cant work out the code that I would need to enter.
View 9 Replies
View Related
May 21, 2014
I created a very simple macro, which actually works.
There is a button on my spreadsheet, so the user can launch the macro using this button.
[ Code] .......
At the moment the user clicks on the button, the part of the macro which is hiding the rows will not take place if the cell activated at the moment of launching the macro is in the range below :
The table on my Excel sheet covers range A5:E49
If the active cell is anywhere in A6:49 or C5:D24 or C25, the hiding part of the macro will not work. Launched from any other cells on the spreadsheet it works fine.
The rest works fine and I am not getting an error.
To solve this I just need to add the line Range("G9").Select and it will work.
But I would like to understand why it does not work from the cells given above. My sheet is not protected and I unlocked the cells just ion case.
View 2 Replies
View Related
Aug 24, 2009
i have a made a macro that copies info to a new sheet now that is working great but if i change the name of the work book it wont work any more so i need the macro to work with what ever name i give the workbook
the current name is
AVERAGE PRICE (update 2009) Mimmos Armico 170809.xls
i have attached the code in notepad ...
View 8 Replies
View Related
Jun 5, 2007
I have 3 columns of data that contain horses names and these are sorted by a race time.
See attached txt file for example....
View 9 Replies
View Related
Feb 16, 2007
=SUMPRODUCT(--('2007'!$E$2:$E$500=$A$20),--('2007'!$O$2:$O$500=G2))--('2007'!$AA$2:$AA$500='2007'!$AA$3)
I need to count the number of occurrences in cell AA3. I need only to count the occurrences of AA3, that also have the contents of A20 and G2 in them.
View 9 Replies
View Related
Jul 13, 2007
My task is that I have several documents exported in excel. The requirements in them were mapped to another document. The IDs were populated in a certain column but are now no longer needed. I have to convert those old Ids to the current ones. In my example I have populated Sheet one with the lookup table. In column A are the old IDs. In Column B are the new ones they map to. The old ones can map to several which is why there are more than one ID in some of the cells. In column D of Sheet 2 I have populated it with the old Ids. In Column A I'd like to have the lookup return the appropriate maps to the new Ids. For example for the first map in cell A2 it should return:
abc_18
abc_43
abc_6
abc_4
all in one cell.
Vlookup can return the first hit (abc_18 and abc_43 for cell D2), but ignores the other two IDs in cell D2. I was able to work around this combining the find, mid, and vlookup to return all values. The problem with that is that the formula gets monstrously big after just having it return 4. In the actual files it can be up to 30 IDs which would make that formula literally pages long since. I have pretty much no experience with macros, but it seems like the only solution since I have to send this off to various people so they can use it.
View 3 Replies
View Related
Dec 15, 2008
I've recorded a macro that copies an entire tab into a new spreadsheet then goes on the copy and paste information from one tab to another.
When I run the macro from the Tools>Macros menu it works perfectly.
But when I copy the code and add it to that of a button it fails and posts the following error: Run-time error '1001': Select method of Range class failed.
The first attachement shows the code for the macro as it is alone, and the second shows how I simply copied and pasted it into the 'view code' window of the button.
Needless to say I'm a beginner at macros and only every record them, I can usually make stuff work that way but this has me stumped!
View 12 Replies
View Related
Dec 20, 2013
In column A I have a set of Ids that are not unique. In column B I have a set of latlong values for those Ids in column A. In column D I have the unique list of Ids from column A(Removed duplicates from column A & pasted them in column D). In column E, I need the latlong value which has highest frequency for each Id. I tried countif,Frequency and tried mixing them up with various other formulas but it is out of my reach.
View 3 Replies
View Related
Mar 14, 2014
I have my workbook set up so that one worksheet contains the names of all my departments/sections listed with their 3 letter code (this can be anything from AAA-ZZZ, e.g 'FYH', 'JWK' or 'KZA' are all valid) in Column F. I then have Columns H, I, J & K blank and require them to be auto-filling based on data from 4 other worksheets - i'll detail what i need below, but Column H needs to be filled based on what it finds in worksheet 'Data 1', Column I should be filled based on what it finds in worksheet 'Data 2' etc. etc. I have four further worksheets that contain data based on the types of assets owned by the department/section, these are 'Data 1', 'Data 2', 'Data 3' and 'Data 4' and I use these as described above, with Column H referring only to 'Data 1', Column I only to 'Data 2', Column J only to 'Data 3' and Column K only to 'Data 4'.
What i need then, is a VBA that will take the value of a cell in column F on my main worksheet (called 'main') and then count the number of occurences of that value in Coulumn A on another worksheet and place the number of occurences into Column H, I, J or K based on which sheet it's checking.
For example, Cell 'F2' on my main worksheet contains the value "ABC". I need to take "ABC" and search Column A of worksheet "Data 1" to find how many time it occurs, placing the result into Column H of worksheet 'Main', I then need the same value to be counted in Column A of 'Data 2' and its result placed into Column I on 'Main', and again for Column A of 'Data 3' with the result being put into Column J of 'Main', and finally Column A of 'Data 4' to be checked and that result placed into Column K on 'Main'.
does this seem too much of a task for VBA? or am i best doing each column separately with a CountIf or Array formula?? Not sure whether a COUNTIF or Array formula will do the job.
View 5 Replies
View Related
Mar 14, 2014
I have my workbook set up so that one worksheet contains the names of all my departments/sections listed with their 3 letter code (this can be anything from AAA-ZZZ, e.g 'FYH', 'JWK' or 'KZA' are all valid) in Column F. I then have Columns H, I, J & K blank and require them to be auto-filling based on data from 4 other worksheets - i'll detail what i need below, but Column H needs to be filled based on what it finds in worksheet 'Data 1', Column I should be filled based on what it finds in worksheet 'Data 2' etc. etc. I have four further worksheets that contain data based on the types of assets owned by the department/section, these are 'Data 1', 'Data 2', 'Data 3' and 'Data 4' and I use these as described above, with Column H referring only to 'Data 1', Column I only to 'Data 2', Column J only to 'Data 3' and Column K only to 'Data 4'.
What i need then, is a VBA that will take the value of a cell in column F on my main worksheet (called 'main') and then count the number of occurences of that value in Coulumn A on another worksheet and place the number of occurences into Column H, I, J or K based on which sheet it's checking.
For example, Cell 'F2' on my main worksheet contains the value "ABC". I need to take "ABC" and search Column A of worksheet "Data 1" to find how many time it occurs, placing the result into Column H of worksheet 'Main', I then need the same value to be counted in Column A of 'Data 2' and its result placed into Column I on 'Main', and again for Column A of 'Data 3' with the result being put into Column J of 'Main', and finally Column A of 'Data 4' to be checked and that result placed into Column K on 'Main'.
does this seem too much of a task for VBA? or am i best doing each column separately with a CountIf or Array formula?
View 2 Replies
View Related
Feb 3, 2014
I would like to design a macro that can find a value within a cell in a colunm and copy a value in the row then count occurances of that value next time a match in the colunm is found on a different row, but also do this only if the date range in the row is within a specified range. So a multi-critieria search and copy operation.
To explain a little better here is a simplified example of my spread sheet that is in input for the macro.
A
B
C
D
E
1
PART NO.
date in
date out
comp1
comp2[code]......
Column A lists the coponents found on the same row as the seach critria, in this example "12-3".
Column B lists the number of occurances of the components. This search is limited to a date range input by the user.
So what I can see is the components replaced and the amount of times replaced on a specific item over a fixed time.
*It is difficult to describe this problem without showing the macro output, but this is just an example for the purpose of explanation.
I know a bit of VBA programming and initially I started with an input box that asks for the part number and limit dates.
View 2 Replies
View Related
Feb 4, 2009
To run a macro from the first tab of the workbook but have it do it work on another tab.
In the workbook in question I have a tab called "input" were certain information in updated and is linked or used in formulas on other tabs. Some of the tabs have macros that do various functions. I would like to set up one macro button on the "input" tab that would run the macros on the other tabs instead of having to run each one individually from its own tab.
Below is on of the macros that I would like to run from the "input" tab and have it update the "AP Accrual" tab
Sub CopyPriorMonthAccruals()
ActiveCell.FormulaR1C1 = "=EOMONTH(Input!R[5]C,-1)"
Columns("L:L").Select
Selection.Copy
Columns("Y:Y").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
Range("B3").Select
ActiveCell.FormulaR1C1 = "=EOMONTH(Input!R[5]C,0)"................................
View 9 Replies
View Related
Jul 1, 2014
I've got a PDF file that I was hoping to convert into an Excel sheet, but it doesn't look like that's possible, xince I'm working with only Adobe Reader, not Acrobat. Anyway, I need to compare 1 column of this report to another report that IS in Excel. Is there a way to have a macro compare an Excel file with a PDF??
View 2 Replies
View Related
May 28, 2009
I have a macro which loops through data, deleting those rows that are marked with a "Y". However - it appears to always want to do this in three stages. The first time I run the macro, it delete's a large chunk of those marked rows - but it nearly always leaves two rows. The second time I run it, it deletes one of those two remaining rows. And then I run it again and it deletes the final outstanding row. I'm sure i've done something stupid here - the code is below
View 2 Replies
View Related
Apr 17, 2007
I need to remove hyperlinks across probably 30-40 workbooks, is there a way of doing creating a macro that would do this across many instead of 1 at a time?
View 9 Replies
View Related
Oct 22, 2008
I have a file with date from the whole year.
Now i want that he splits for me in the file the weeks. So that i have all the info for each week. (seperating by 2 or 3 blank rows)
A second thought was to copy paste them to a new sheet for each seperated week.
and if i just splits them by inserting blanks rows between the weeks. I was wondering if it is possible to make a pivot for each week
i thought maybe working with boxname?
View 9 Replies
View Related
Apr 7, 2009
I am sent an email that contains multiple blocks of information.
They're broken down like this:
Title
Link
ID
Department
Date
Status
Value
News
There are about 100 of these blocks of text in the email, and some of them are duplicates. What I'd like to do is copy them into Excel, and run a macro which separates them into the appropriate column and removes the duplicates. The problem that I'm running into is some of the blocks have a value (highlighted in red above) and others don't have anything at all. I'm looking for a solution that will be able to evaluate the text and if the cell after Status isn't value, I'd like it to insert a blank cell, a cell that says ignore, or something that will keep the format correct.
View 9 Replies
View Related
Sep 19, 2006
I've been using a Macro that was written in an Excel spreadsheet and it's been working fine. For some reason, the Macro does not work anymore.
The Macro is written in Visual Basic and it is launched with button.
What is the first step I should take to debug this?
I think it's something obvious I'm missing.
View 9 Replies
View Related
Jun 22, 2007
why the macro "try()" in the attached workbook does not work?
I get the error message: "Unable to get the Vlookup property of the WorksheetFunction class"
Sub try()
Dim i%
For i = 1 To 35
Sheets("Sheet2").Select
myValue = Cells(i, 1).Value
Sheets("Sheet1").Select
n = WorksheetFunction.VLookup(myValue, "A1:A11", 1, True)
Sheets("Sheet2").Select
Cells(i, 2).Value = n
Next i
End Sub
View 3 Replies
View Related
Jan 11, 2009
i need to work out a formula for my spreadsheet which I use to work out cutting lists for timber frames. I need it to work out if the width of a job is for eg 2400mm i need to work out how many timber studs I need so the space between each stud is between 400mm and 500mm and this will need to work for a range of different sizes of frames. I have it written at the moment and it just devides the width by 400 and gives me a amount of studs but it would work much better if it could space them between 400 & 500.
View 4 Replies
View Related
Mar 3, 2009
In a project i am compiling i need to work accurately with times to calculate the work progress of the people in the workshop thus....here goes....
I have in work book #1 (7) sheets mon to fri + complete week + a sheet where all job numbers are collected.
From monday to friday the workmen log their times as a start time and a end time. This has to be then calculated to a total hours:mins spent per job, wich in turn then has to be calculated to a total hours:mins spent per day. And the on the complete week sheet recalculated as a total time worked per week.
View 9 Replies
View Related
Feb 15, 2013
I've written a macro in an attempt to automate the advanced filtering in Excel.
VB:
Sub FilterData()
Sheets("Filter").Select
Range("B10").Select[code]....
View 5 Replies
View Related
Nov 28, 2008
I have designed a macro which consists of a form through it takes the input into excel sheet. The macro is running fine and I dont have any problems with it. The problem I am facing is that after I start running this macro, I am not able to access any other open excel files. Is there any option to make all other excel files available during running a macro?
View 3 Replies
View Related
Jul 6, 2005
I was looking at a previous post to get a progress bar to work while running
a lengthy macro. Below is the post on how to incorporate the progress bar
into your code.
That works fine expect for one thing. There is a cancel button on the progress bar, and when it is pushed the rest of my code continues running. How do I end my code if I press cancel on the progress bar?
Sub Main
Dim PB as clsProgBar
Set PB = new clsProgBar
'if your subs are being called from a userform, hide the form first using
Me.Hide
With PB
.title = "some title"
.caption1 = "Executing, this may take a while"
.caption2 = "Doing task 1"
.show
doevents...................................................
View 14 Replies
View Related
Mar 14, 2008
I have the below macro in a workbook that I need to combine the two sheets into one, (sheet1 and sheet2). Both sheets in use column "A" for id, but for some reason it is only copying over sheet one? One sheet has 12 columns and the other has 13, not sure if that is making the difference?
View 13 Replies
View Related
Jan 8, 2012
I dont like the way the toggle button looks. So i wanted to create a button that when pressed would recognized if row 19 was hidden or not hidden..
Then if it was already hidden it would unhide the row 19
or if it was not hidden it would hide the row 19 when clicked
Is this possible via a macro?
View 1 Replies
View Related
May 23, 2012
Can we get a macro in excel where we can browse web page and get the data from a internet based webpage.
View 3 Replies
View Related
Nov 30, 2012
i got a long macro to delete all rows with contains a column with the value 'xx'. The macro works in sheet 2K, 2F and 1G. But the weird thing is it doesnt work in sheet 1K (i copied the exact same part of the macro out of the other sheets). Is it possible that there are to many rows in the sheet (sheet 1K has 24.000 rows, 50% or more will be deleted with the macro. The error says bug in the line: If Not rng Is Nothing Then rng.EntireRow.Delete It stops showing all the rows wich should be deleted.
Sub GrondeigenarenVerwijderen()
Application.Goto ActiveWorkbook.Sheets("2K").Cells(1, 1)
Dim DeleteValue As String
[Code]....
View 5 Replies
View Related
Sep 13, 2013
I have a fairly simple macro (below). I want it to do one more thing.....not run if the filters have not been changed. I would like to prevent the error that occurs if someone tries to run it and there are no filters active.
Private Sub AutoFilter_Remove()
Sheets("Data").Select
ActiveSheet.Unprotect "password"
ActiveSheet.ShowAllData
[Code].....
View 9 Replies
View Related