I feel like this is textbook to the point of being in FAQ but couldnt find it, so if the answer indeed exists in FAQ - notify me of the url and i will refer to that instead. But my question is fairly simple, I'd like to have a macro run upon the insertion of a row.
View 3 RepliesI recently installed Excel 2007, and have shared others' joy in searching for things on the ribbon. I tried to record a macro to insert an autoshape. Excel creates the macro, but drawing the autoshape is not recorded. I'm sure I'm missing something obvious ...
View 7 Replies View RelatedI would like to find the code to make a button in excel, that when clicked, will insert a new row into the last row of a section so that the formatting is the same as a sample of other rows in that section, but it will be clear of data and only contain the correct formatting. I would also like this code to make a sum formula in a cell below the newly inserted row to change and to include the new cell within its formula.
For example:
I have a form on excel that has space for 6 rows of data with 3 pieces of information (which are: item, section, cost). If / when I need to add a 7th line I have box that I would like to assign a macro to so that when I click on it, it adds a 7th line with the same formatting that can be found in rows 1-6 but will be void of data. However, under the 6th row I have a total of the 'cost' with an '=sum(D7:D12)' formula and any other code I have found and have used it does not automatically tell the formula to add an additional cell to its summation to make it =sum(D7:D13).
I'm working on this sheet where I need to first, sort the invoices by the due date. separate due and not due. for example, due date is 05/05/09 (pls see sheet 2). a blank row is then inserted (above the undue invoices) with "total due to pay" then the sum for due invoices.
for the invoices not due, i need to sum those also and finally, the total of the two figures at the very bottom. I need a macro code to run when the list contains hundreds of invoices.
I hav a macro to insert a new row. But i also want the macro to ask the user to input where he wants(which row number) to insert the new row??
For example when i run the macro, an inputbox should come up asking to input the row number. The user should be able to enter the row number (take 10 for now). And Excel should automatically insert a new row in row number 10. So the previous row 10 now becomes row 11.
how to automaticly create a new row below the last data entry. I have a list of items with relevant data in each row. But below all the data I have statistics of total percentages of certain things. I want to keep that at the bottom of the list. When I add another row for more information I want those statistics to jump down a row so I have more blank rows to add in more data. Is there an easy way to do that?
Also something kinda related. I know you can freeze rows and columbs at the top and left of the spread sheet, is there any way I can freeze those statistics at the bottom so they are always visable but the data on top of it can scroll through? I dont want to split the page cause that kinda causes more problems.
I have an excel spreadsheet set up as shown in the attachment. When I insert data by using the macro (Insert farm), for some reason it puts a NA in a cell (C17).
I then select the cell click into the formula and click enter and it works. how can this be fixed. Look at the excel spreadsheet to be able to understand.
I would like to automatically insert a row at each change in value in one column. See the attached sample. When the value in column C changes, I would like a row inserted. Preferrably without using any macros because they are way beyond my skill level and understanding
View 2 Replies View RelatedI need Macro to insert a specified number of rows in one worksheet and the same number but columns in another worksheet.
The rows are inserting fine but I can't get the columns to work. Here is what I have so far:
Sub InsertRows_Columns()
Dim iRows As Long, rngStart As Range
On Error GoTo Canceled
iRows = InputBox("How many unit rows would you like to insert?", "Number of Rows", 5)
[Code] ....
Canceled:
End Sub
I once heard that in order for a macro to insert a formula you must double all the quotations. Anyway, i did so in the following macro but i got an error message.
View 3 Replies View RelatedI've got a list of postcodes in one column and some of the postcodes do not have the correct amount of spaces between the characters.
So I'm looking to have a macro that will insert a space after each third character and then possible a separate macro to insert a space after each fourth character.
I have a worksheet that includes the list of buildings in an area and the number of households in each building. I want to list the households on separate rows and to number them from 1 to x according to the total number I have. Is it possible to do this using a macro, if so, how?
View 5 Replies View RelatedI want to be able to click a button on my Excel Spreadsheet that will take me to my JPeg Photo location and allow me to add a JPeg Photo.
I have the below code but i does not recognise the JPeg File, so it work upto actually being able to select an image.
I'd like to use a button to run a macro that inserts a combo box, but can't seem to change the properties of that box within the macro. For example, I need to enter the linked cell, but when I run the macro, the actions in the combo box's properties dialogue don't record (I'm not familar with visual basic, so I'm 'recording' the macro).
View 13 Replies View RelatedI've created a macro to assign to a button that inserts a row above say row 10, then another macro to assign to a different button that inserts a row above row 20. My problem is, having clicked the first button a row is inserted above row 10 but of course row 20 now becomes row 21, so now I need the second button to insert a row above row 21 instead of 20.
Is there any way I can write a macro that remembers the old row numbers?
Example:
My sheet needs to insert a blank row under a number everytime it changes.
The column "C" may have 20 or so rows with the number 10 for example, the
next five might be the number 8, I need a row between the last number ten and
the first number eight. This may be repeated many times through the
spreadsheet.
As well, the adjacent columns "D" & "E" are the same as described above.
all 3 columns are continuous ie: ....
I'm trying to use VB to create a macro that will insert check boxes automatically when data is entered in that row. The problem is that I have VERY little experience with VB code. Here's what I'm looking for:
When I enter data in box A2, I want to automatically put a check box in cells D2, F2, G2.
When I enter data in box A3, I want to automatically put a check box in cells D3, F3, G3.
(and so on....)
I have already found a macro that will put a check box in a particular cell, I just need to figure out how to do it automatically in the cells I want. Here's what I have to put the check boxes in:
Sub AddCheckBoxes()
On Error Resume Next
Dim c As Range, myRange As Range
[Code]....
I just want that to happen in the 3 cells in the same row that I enter data in automatically when I enter data.
I had a spreadsheet with an insert row macro which worked fine and dandy, unfortunatly I decided to split the worksheet across two worksheets and the macro requires updating, The macro currently runs fine for the 'To be State' worksheet but gets an error on the 'As is State' worksheet. The code breaks down on this line:
ActiveCell.EntireRow.Insert Shift:=xlDown
The only difference between the two worksheets that I need is that in the 'To be State worksheet' columns C and O need to be copied down from Row 3 while in the 'As is State' worksheet columns C and U need to be coped down from Row 3.
The worksheet names are:
As is State
To be State
My Code is:
Sub InsertARow()
Dim CurCell As Range
Set CurCell = ActiveCell
Dim CurCellInA As Range
Set CurCellInA = Columns("A").Cells(CurCell.Row)
[Code]...
I need a macro that will insert 11 rows before the word total. The word total will always be merged between col A&B but will not always be in the same row. It might be in row 5 one day and row 25 the next.
I am needing a macro that will ask for a month and If I type May. It will put 5/31/07 in H1 and then the same date but the prior year (5/31/06) in H2. It would be a real time save if the macro could also ask if the quarter needs to be updated and if yes, ask"input quarter", if 2 is typed then it puts 2nd in H3.
View 20 Replies View RelatedI am trying to build a macro to insert a row or two rows under an existing row if a formula returns a '2' or a '3' in the first cell of the existing row. This is what I've come up with so far and the first bit works fine but when it comes to inserting the rows it just spirals out of control, inserting never-ending rows.
Private Sub Labels1_Click()
Columns("A:A").Select
Selection.Insert shift:=xlToRight
Range("A3:A2000").Formula = "=ROUNDUP((Q3/300),0)+1"
With Sheets("Sheet1")
' Test Condition 1
For Each c In Worksheets("Sheet1").Range("A3:A2000")
If c.Value = 2 Then
c.EntireRow.Select
Selection.Insert shift:=xlDown
End If
Next c
I have 900+ excel files, with different number of columns. In all the files I want to cut the last three columns and insert them after column "L".
Can I also have the format of the three inserted columns same as Column "L".
I need to create a macro that will move information from a range of columns and then insert them under existing information in another column.
here's my example, this is what I'm starting with:
There are only 3 rows in this worksheet and I have numbered the columns just for reference in solving this problem: Anyway, this is how it looks when I import the records: ...
when you decide to cancel the option from choosing any picture I keep getting the debug error, "Run-time error '1004': Insert method of Pictures class failed". I would like it not to error out at all, obviously.
Sub InsertPicture()
Dim myPicture As String
myPicture = Application.GetOpenFilename _
("Pictures (*.gif; *.jpg; *.bmp; *.tif),*.gif; *.jpg; *.bmp; *.tif", , "Select Picture to Import")
'If myPicture = Null Then
'MsgBox ("You did not make a selection.")
'Else
If myPicture "" Then
ActiveSheet.Pictures.Insert (myPicture)
ActiveSheet.Shapes(ActiveSheet.Shapes.Count).Select
With Selection
.ShapeRange.LockAspectRatio = msoFalse
.ShapeRange.Height = ActiveCell.RowHeight
.ShapeRange.Width = ActiveCell.ColumnWidth * 5.25 + 4
.Placement = xlMoveAndSize
End With
End If
End Sub
Private Sub CommandButton1_Click()
InsertPicture
End Sub
I have recorded a macro to insert six rows. I'd like to take this one step further and have the user enter the number of rows they want to insert. Right now the data is entered in A10:F33.
View 9 Replies View RelatedI need a macro in Excel sheet.
What I need is If Cell Value A4 = India then it should insert one row automatically after Row A10 & Value of Cell A 11 should be "VAT".
I have columns 1 to 5 that requires user input. At the beginning of first row, i have created two buttons +R to insert row and -R to delete row. I used macro recording to get this done. It works well but I need both buttons to be copied on for other rows as well. Let me re-explain, when a person clicks on +R in row 10 I need a new row inserted at row 11 which both the buttons +R and -R copied in. When a person clicks on -R at row 10, i want row 10 to be deleted. the first default should never be deleted. All rows should be added before statistic as statistic row will calculate all the inputs from user start to finish. Can this be done?
123456+R
-R
Statistic: PLS refer to this diagram
12345+R,- R
Statistic: ignore this diagram
I even tried http://www.mvps.org/dmcritchie/excel/insrtrow.htm but it is not working. I am not sure where I am doing wrong.
I've got some rows containing formulas under one of several header rows. I'd like to insert a button in column A of the header row which will insert rows below that header. I've got it working using absolute and relative references, but don't know how to determine where the button is located in order to insert below the right header row.
Hopefully that makes sense. If needed I can attach a sample spreadsheet.
Current macro
Sub Test()
ActiveCell.Offset(1, 0).Rows("1:1").EntireRow.Select
Selection.Copy
ActiveCell.Offset(2, 0).Rows("1:1").EntireRow.Select
Selection.Insert Shift:=xlDown
Application.CutCopyMode = False
End Sub
I need a macro that will insert text into merged cells. I have merged blocks where all will be exactly the same size one after another. (there are 19 blocks). The problem is that each month the size of the blocks change.(see sheet for example). Right now blocks are 8 rows will get to 16 by end of year. In each block I need a "- (city) (Name)" Each block has a different city and name that goes with it.
It would be an awesome time saver If I could click a button and have the city and names be entered into the appropriate spot no matter what month were in.
I've got a dataset of certain trades across different markets and traders, and on different days. The date of the trade is in column A, the contract ID is column D and the trader ID is column J.
Traders do not trade every day. I would like to insert a new row/rows for each date on which traders do not trade between their first and last trade, for each market in which they participate.
Is this possible using macros?
And, if so, then I would like to insert the high and low prices for the market on those dates from a different worksheet into the newly created blank rows. On this second workbook the contract ID is column A, the date is column C, the high price is column F and the low price is column E. I would like the low price to be inserted into column AJ on the original worksheet and the high price into column AK.