Deleting / Disabling Macro Once Macro Run?
Feb 18, 2014
I have a couple of macros in the book that plug through a list of "stores", input the store number in a cell, then copy the results to a new workbook, value out the formulas, and save it, before moving onto the next store. There are also 2 types of stores, "STORES" and "CORPORATE", and the sheet toggles some things based on this input. One of those things is a "ON CHANGE" macro that hides and unhides rows appropriately. Everything works in my Master sheet, but the problem is that once I copy the page (and the macro embedded) to a new workbook, I save to a lower version of Excel and it all gets hung up on the embedded macro.
Is there a way to disable/delete the macro once it goes to the new book? I've tried "Application.EnableEvents = False" and i think this is the right route, but i think maybe i'm placing it in the wrong place(s).
Here;s my code:
Code:
Sub CREATE_REPORT()
'
' PY12 Macro
[Code]....
View 3 Replies
ADVERTISEMENT
Dec 5, 2009
I have recorded a simple macro that refreshes a set of random data in my sheet everytime I click on the button I made.
When I see a zero in one of the cells I know to stop refreshing. The thing is, I click on the button quite rapidly and sometimes miss the zero. I need to click on this button quite quickly so slowing down isnt an option!
What I need is for excel to stop that button operation when it sees a zero in one of the cells.
View 9 Replies
View Related
Jul 12, 2007
How do disable Private Sub Macro
I have a private sub macro for Sheet1 as shown below
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address "$B$2$" Then Sheets("Start").Select
Exit Sub
End Sub
And I have another macro (call ADDNumLine) that add additional data to the Sheet1. How do I temporally disable the Private Sub above when executing Macro AddNumLine?
View 9 Replies
View Related
Jul 25, 2006
I have a macro implemented in my worksheet which plots graphs. When you press it, it plots a graph.
What i would like it to also do is:
(a) create a tab name which states Graph_1.45 {last bit is whatever the name of the data worksheet is}. - so for example i will eventually have 20 worksheets of data of the same form as the attachment. Each will have the option of the graph. So each will haveits own name, by pressing the graph button the name thatis given is Graph_"whatever the tab sheet of data's name is".
(b) Now the problem is if a user forgets to delete the worksheet it comes up with an error. Is there a way by which if the graph already exists the macro comes up with a message "Graph already exists" and gives an option to delete that graph and plot nbew one?
View 9 Replies
View Related
Dec 29, 2011
Is there a way to disable the Excel print button and force someone to use a macro button to print the spreadsheet?
View 1 Replies
View Related
Jun 19, 2006
Is there a way of disabling one macro from within another macro? The worksheet in question contains a lot of macros. If it is possible, how do I name/identify/call up the macro that is being disabled, whilst the other one is running?
View 9 Replies
View Related
May 18, 2007
I have a file with a macro that I want to delete after it has completely run. Is there a code in VBA that does this? I have tried to record a macro that deletes a macro, but the resulting macro is blank.
View 2 Replies
View Related
May 2, 2014
I am trying to write a macro that takes the value in cell B2 from a workbook called ""numbers" in a worksheet called "summary," and creates a new worksheet in a workbook called "filestransfer" that is named the same thing as the value in cell B2 from "numbers." That part is done.
View 2 Replies
View Related
Mar 19, 2009
I want to delete every second row, because I have data with 0.25m interval and I want 0.5m interval. Why I try the following it doesn't work?
View 2 Replies
View Related
May 8, 2012
I need a simple macro to delete all sheets in a workbook except one that is called "START"
View 9 Replies
View Related
Jul 25, 2012
I'm looking for a macro that will delete a row with a certain value (0.00) and the row below it.
View 9 Replies
View Related
Aug 23, 2012
So I have a macro that creates a monthly set of reports, but some of them only relate to period 5 onwards. I wanted the macro to check whether a folder exists for periods 1 to 4, and if so, delete the folder and all the files inside it. I've used the following...
Code:
If Period < 5 Then
If Dir("I:AcctsCentral EngineeringEngineering Reporting Pack2012-131 April 20122-2 Reports - 4+8 Reforecast") "" Then Kill "I:AcctsCentral EngineeringEngineering Reporting Pack2012-131 April 20122-2 Reports - 4+8 Reforecast[code]....
but the macro just skips straight through the secondary IF statements without stopping.
I know this works on deleting files, and presumed it did too for folders, but it doesn;t.
View 2 Replies
View Related
Oct 19, 2013
I'm trying to delete both rows of the same data not just one.
item
warehouse
location
PANT
7050
2
A1-05-89
PANT
5051
2
B1-19-19
SHIRT
7050
2
J1-08-67
SHIRT
7051
2
J1-08-67
What i need is if there is a same location delete both rows and i cant figure it out to get it to do both of them not just one row.
View 9 Replies
View Related
Jan 2, 2014
I have a problem with the following macro:
Code:
Sub CalcsDelete()
Dim count As Integer
count = 1
For count = 1 To 100
ActiveSheet.Shapes.Range(Array("Picture " & count)).Select
Selection.Delete
count = count + 1
Next count
End Sub
It should simply delete picture 1, picture 2, picture 3, picture 4, etc. The problem lies within the "Picture " & count part.
This is obviously the name of the picture, i.e. picture 1, picture 2, etc.
That's what I tried to accomplish with the for-loop, but I'm not sure how to increment the number of the picture by means of using a for-loop and having that be the new name for the picture.
View 6 Replies
View Related
May 20, 2008
how to remove a macro button from the sheet after we've used its functions.
For example, i have a macro that emails the workbook. Once the emailed workbook is out, i would like the macro button to be removed after we press it.
View 9 Replies
View Related
Jul 28, 2007
I am looking to find and delete email addresses in this case *@aol.com. I have only one column which is full of email addresses, I just want to delete all of the @aol.com ones in this case. This is the macro I am trying to use, but it does not work.
For Each cell In Range(Range("a2"), Range("a65536").End(xlUp))
If cell = "*@aol" Then
Range(cell, Cells(1, Rows.Count)).EntireRow.Delete
Exit For
End If
Next cell
View 3 Replies
View Related
Jul 4, 2012
I am dealing with data sets from various instruments that have different sample rates. I am deleting data points I don't need from some of the sets with higher sample rates so that all the data is on the same time scale.
The macro I have is super simple, but incredibly slow. I'm simply deleting every other cell down a column.
VB:
Sub OATcondense()
Application.ScreenUpdating = False
Do While ActiveCell <> ""
ActiveCell.Offset(1, 0).Delete Shift:=xlUp
ActiveCell.Offset(1, 0).Select
Loop
Application.ScreenUpdating = True
End Sub
View 9 Replies
View Related
Apr 2, 2014
I want a macro which can detect empty cell in rows and can delete whole row in which that empty cell is .and want to shift rows up. Macro should start searching empty cells from Column B meaning that It should not delete cells in Column A.
And I want this function in all sheets except parent sheet at position 1.
File is attached : inquiry 3.xlsx
View 6 Replies
View Related
Aug 7, 2014
I have another report which needs to be sorted using a macro. However, before I can sort the data, I need to delete rows at the bottom of each report that have "0" values in column A and B. Again, each report I run is of different length so I need to write a code that will take that into consideration. Here is an example of what I need to do:
Sub second_step()
'
' second_step Macro
'
'
Range("C1").Select
Range(Selection, Selection.End(xlDown)).Select
Rows("7876:7876").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.ClearContents
Range("A1").Select
End Sub
Now, the thing is, not every report will start having "0" values in row 7876. How do I write a code to reflect this?
View 9 Replies
View Related
Oct 26, 2008
I want to delete all series which are in graphs. is there any way so that i can pull total number of series in VB from graph, and then just do all the series one by one.
View 2 Replies
View Related
Nov 6, 2012
I have an issue with trying to write a macro to apply a filter and then delete all lines.
Within the macro I copy and paste one sheet to a new one, and Paste Special Values over all formulas, leaving me with a column that has some figures and some "#N/A".
i.e.
13.75
12.00
#N/A
14.00
So I need to do something in the macro that then applies a filter on this column and deletes off all the #n/a results.
This table has a number of columns not just this one so it is the full rows that need removing.
I see on other posts that using a range.specialcells clause could work, but i'm not too sure exactly on how to apply this.
View 1 Replies
View Related
Jan 23, 2013
I've a file with lots of data. In that file I've some blank rows, I want a code which search complete blank row and delete.
View 2 Replies
View Related
Jan 20, 2014
I want to write a macro that would delete the rows if the sum equal to zero and the description is identical. For example:
Column a: Column b:
100 Apple
200. Apple
300. Grape
-100. Apple
-200. Apple
400. Cherry
-400. Cherry
The answer should be 300 grape.
View 2 Replies
View Related
Apr 18, 2014
I am looking for code to put in a macro that will go through a tab of data and delete the rows that have merged cells in them. The number of rows that there will be will never be a constant because the people using it will be pasted in information from another source, deleting the lines that have merged cells then run a macro with stuff that needs to be done to the info, but I would like to save them the step of delete the rows that have cells.I think it is Office 2013 I am using. I am not at that machine right now so I can't check.
View 4 Replies
View Related
Jul 23, 2014
So I have data that I'm importing in rows 1,2 and 3. The first row has the product type, then rows 2 and 3 have additional info pertaining to that product. I was wondering how I would write a macro that could identify entries in the first row that equal a particular product, and remove those cells, along with its respective info in rows 2 and 3. Ideally, I could just push a button, and a particular product along with all it's info would disappear from my imported table.
View 4 Replies
View Related
Nov 15, 2006
Sub Delete()
Dim x As Long
For x = 28 To 8 Step -1
If Range("b" & x) = "" Then _
Range("b" & x).EntireRow.Delete
Next x
End Sub
View 9 Replies
View Related
Mar 29, 2007
I am trying to delete all data between two ranges by Macro.
Range one is called Title and range two is called disclaimer.
I simply want to delete all data between them and insert new data ( again between them)
The deleted and inserted will always be of varying sizes.
All data sits in columns "A:H"
View 9 Replies
View Related
Mar 3, 2008
I am able create a macro using the find function to find the next blank row, but I would like to have it select a range of rows down that I can then delete. Each time I run the macro the next blank row may be different thant the last, so it can't be a set number of row numbers each time. I could also possibly use the print area function if it would be easier.
Here is what I have so far, what is in red is where I need it to vary from next active blank row down to R2001C14, and then delete all the active blank rows ...
View 9 Replies
View Related
Apr 16, 2008
I have a question for you that can be much helpful for me. I prepared a macro which is collecting many datas from different pages and entering them on a sheet. Some lines of this sheet are with data and some are empty. I would like to write a code, which will delete the lines in which there is no data. But I would like the code to do this between line 5 and line 225.
View 9 Replies
View Related
Mar 24, 2009
I will paste data into columns A-H, I have headers in rows, 1,2 and 3. I have formulas in a few cells in row 2. After inputting my data on the sheet etc I copy all the formulas from row 2 and paste in teh relevant columns, I then select my autofilter and my selection (in this case #N/A), i then choose all visable cells (Alt and ;)and delete them. The problem is I do not want to delete rows 1,2 or 3 but all other rows (i.e. just the selected N/A rows). Can anyone help on how to do this?
Once i have figured this out I will then continue the macro to select 'all' on the filter and do the same to a few other columns.
So far I have this;
Sub Macro6()
'
' Macro6 Macro
' Macro recorded 24/03/2009 by Richard Tydeman
'
'
Selection.Copy
Range("I4:I5000").Select
ActiveSheet.Paste
Range("J2").Select
Application.CutCopyMode = False
Selection.Copy
I think the extra bit of code needs to go in after selecting visible cells - something that says exclude row1,2 and 3 but im not sure.
View 9 Replies
View Related