I have a problem with multiple, similar formulas in a macro. Each of these formulas, depending on the active cell, selects a certain range of cells and prints it.
The problem is, no matter which active cell I'm on, the macro activates all lines of the formula and separately prints each range. Is there a way to "separate" these lines in the formula so each range will print separately, depending on the active cell?
Here's the
Is there anyway to lap the execution of the 3 lines in the below code (sample) say by 10 seconds each ?
Sub Macro1()
'
ActiveCell.FormulaR1C1 = "AAAAAA"
ActiveCell.FormulaR1C1 = "BBBBBB"
ActiveCell.FormulaR1C1 = "CCCCCC"
End Sub
I am calling sub B from sub A and want to skip some lines in sub B (only when it is called from sub A).
View 3 Replies View RelatedI 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 having an excel sheet with addresses. I need to copy some lines of the first sheet to the other sheet. Between the lines I want to copy there are 7 lines which shouldn't be copied.
I created the following macro which does the job: ...
I am having trouble writing a macro that will draw a line relative to what cell is currently selected. I can only get the macro to draw a line in one specific spot.
View 9 Replies View RelatedI have 3 different sheets named:
USA
UK
DK
and 1 sheet named:
I would like to have a macro written that when runned will delete all data in line 2 to 1000 in the first three sheets and line 2 through 1500 in the compilation sheets
Is there a possibility to automate a grouping process i have to do every month? The rows that have to be grouped change every month.
Grouping is done based on the contents in column C. In here i have the following values: Category, Segment, Type, Brand.
For example, column C looks like this:
Category
Segment
Type
Brand
Brand
Type
Brand
Brand
The grouping needs to start from row 100 down. Usually the maximum number of lines to group is 500...
I always do the grouping for Brands first, then Type, then Segment and then Category.
I want to draw a (time) line from the top left corner of a cell (say C3) to top left corner of a cell (say i10) in a Macro. Both start and end cells (column & rows) will vary depending on certain input values which I can convert into a cell reference. Line must overlap on both ends by two column widths.
View 9 Replies View RelatedI 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?
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 Relatedi am completely new to writing macros. have recorded a macro but have just found out the each of the new sheets that the macro creates needs a line at the top of the sheet with a title in it
View 2 Replies View RelatedI need a macro that duplicates lines based on the value of a Column. So in Attached excel D1 is 10 - I need it to create 9 entries for that line, so there are 10 total duplicate lines.
I had a Macro that worked that is in the document, I even had everything set up the same, which it is not now, but could not get it to work.
A Macro or a Finished document is fine, Just need this to produce raffle tickets for the church
Raffle Tickets.xls
I am trying to write a formula to insert in a macro for multiple lines of data.
Column B contains the date that I am comparing the date in Column C against. I want to be able to highlight the content on that row if the date in column C is greater than or equal to column B. how to write this?
Sample data:
3/12/20123/12/2012
3/12/20123/1/2012
3/6/20123/6/2012
2/29/20123/2/2012
I would need row 1 and 4 to highlight in red. this is part of a long Macro that is written and includes many other steps, but I cannot seem to make this step work correctly.
I have a worksheet that contains data arranged in fields from columns A to J. The relevant columns for the purposes of the macro are columns B (customer codes) and G (sales values). Column B may contain a single instance of a customer code, or multiple (over 50), depending on how active a customer has been. The worksheet always contains many different customer codes with varying numbers of rows for each customer, sorted by customer. What I'm trying to do is write a macro that will loop through the worksheet and insert a blank line immediately after a change in value of column B (customer code), and in this blank line, insert the customer code in column B (which comes from the cell immediately above), a sum formula for all values within a range that relate to that particular customer in column G, and an IF statement in column J that relates to the SUM formula. The loop concludes when there are no longer values in column B.
I have managed to insert blank lines on change in values in column B, but am not sure about the best approach for inserting the SUM formula or the IF statement in columns G and J respectively.
I need to paste the first 10 lines of every page with a header.
I do not want to use a header, I want to designate every page to copy the first 10 lines from the first page and add those 10 lines. The "header" can not overwrite current data but needs to push it down 10 lines.
Basically I want to copy and paste all data in a row if the value in a cell is equal to something
I am currently using the below formula
The Value in red = Set tgt = ThisWorkbook.Sheets(Criterion.Offset(, 1).Value 'Pick the cell next to the cell containing the criterion).
But my issue is now that i will need this to work based on 37 values and having this macro 37 times with the value changed and 37 buttons will be difficult.
So I am looking for a way i can add multiple values each going to separate sheets.
I'm looking for a way to write a macro to insert 5 lines at the end of the data in column A. Then I want to copy a range into the newly inserted lines. I would press a button anytime I need this to occur.
Current last line of data A39
Need to insert 5 rows after A39
Then copy range BA30:CB34 into the newly inserted rows.
I have a spreadsheet where I am tracking several entries in a table that will keep growing. Three fields are Data Validation Drop Down Lists. The macro below works well to clear the two lists to the right when the first one is changed by the user.
[Code] .....
I want this to affect the rows below it in the table as they are added.
I have an Excel worksheet with a DDE link that continually displays the latest data from a trading platform.
I want to create a second worksheet with a list of times in column A from midnight to 23:30 in 30 minute increments.
At each 30 minutes during the day I want to capture the latest data from worksheet A and store it beside the appropriate time in worksheet B.
But I don't know how to execute a command or macro at a time that is in a cell. My problem is getting the current time to match the cell value.
I have created a command button from the Excel 2003 from the Macros toolbar that I placed on my worksheet. I want to use this button to activate an existing macro. Currently I have no code entered for this button and the button when clicked on behaves as an object to be edited, moved, etc. How should I proceed?
View 6 Replies View RelatedI can't write macros, so have to create them by actually recording the process. I did that just now and then copied it into the Command button. When I run it from Tools>Macros, it works, but when I run it using the Command button it fails.
I'm trying to copy and paste values current MTD figures (P18:P39) to previous MTD area (W18:W39), but the command button fails at this selection. Cells 28-35 are blank, but I don't think this makes any difference, as I've tried the command button with those cells zeroed out.
This is what I recorded initially; this works from Tools>Macros
Sub Macro1()
'
' Macro1 Macro
' Macro recorded 04/01/2008 by Lucertola
'
'
Sheets("Reconciliation").Select
Range("P18:P39").Select
Selection.Copy
Range("W18").Select.....................
What I want to do is be able to make a command on a range of cells. Every cell you would click would make a calendar box pop up. Then you select the date from the box and it enters the date into the cell. I found a easy way to go about doing this on a dropdown box but the boss didn't want that.
I have been trying to figure this out all morning.
I am trying to attach a recored macro to work via a command button - but keep getting the error message "select method of Range class failed.
When I run the macro through the normal way it works, but I want to be able to click on a Command button for it to work.
I have copied the recorded macro code to the command buttons code field
Do I need to use the code for the Cmd Btn to tell it to run the Macro -
I have the following lines in my macro:
Dim LastMonth As Variant
LastMonth = Year(Now()) & "0" & Month(Now() - 1)
Cells. Find(What:=LastMonth).Activate
I am trying to find the first instance of 2007+previous month, i.e. April =04, in a data set. Not sure how to tweak this formula to make it work.
Is it possible that when you press a command button, that the first thing it does is to execute the code assigned to another command button (IE in another sub).
View 9 Replies View RelatedThe sceanrio is that I use vba to create commandbutton and make that commandbutton call a macro
Code:
With ActiveSheet.Buttons.Add(183.75, 38.25, 96.75, 38.25)
.Name = "Test"
.OnAction = "anothermacro"
End With
ActiveSheet.Shapes("Test").Characters.Text = "Test"
I would like to add a command to my macro that will do one simple step: Refresh all FDS Codes
FDS I believe is short for FactSet Data Series. FactSet is an add-in for excel we use at work. The FactSet menu button is in my ribbon and when I choose that add-in, there are a number of actions I can execute. One is to refresh all FDS which is to refresh all cells with formulas that pull in data from our FactSet database.
I tried recording this action but VBA does not show any key strokes from those steps so I think I just experienced one of the many shortfalls of recording macros. Is there a way to write the macro to execute this action? I would think since I am using a FactSet add-in, it would be possible but I don't know where to begin.
i have created a very simple macro and wish to assign it to a command button i have placed on my worksheet.
View 9 Replies View RelatedUsing workbook A, I have created a new workbook (let's call it workbook B), and have copied a module over to workbook B using macros.
My question is, is there a way to assign the module to a command button using vba?