Repeat Insert Row And Formula For Selected Cells

Jul 8, 2009

I am in the process of developing a budget template for next year and here is what I want to accomplish through Macro to avoid the tedious mannual manipulation process (hope that's achievable). BTW, I am only an entry-level Macro user who has no background in coding.

I have attached an Excel sample but let me explain:

In each of the expenses tabs (1, 2, and so on (only 1, 2 given in the sample)), I want to be able to select a range of the data cells (A19:Q34 in "Expense 1" and A10:Q28 in "Expense 2") and run this Macro so that:

1. 10 blank rows be inserted between selected data rows

2. A sum created for each month from the four rows below) with different color

3. A Year to Date Actual and To Year End Forecast created based on the VLOOKUP of the "P&L" matching the account code by month

4. Finally grouping of the first 9 rows.

the above is what I have manually created for the first account code in the "expense 1" tab. I have 7-8 expenses groups and about 200 account codes. So mannually creating the above for each expense groups is not that terrible if this will make life easier for Macro.

I would think this is a very typical Macro issue but can't really come up with anything.

The other issue I ran into the VLOOKUP for the YTD Actual and TYE Forecast. It is to look up accont code in the "P&L" tab and match the #s. But the column numbers in the VLOOKUP do not change automatically when I copy across. Thus I have to change mannually, which is really a pain in the butt. I also know I can't copy down because that will change the account code that I want it to match. Because to be able to copy the VLOOKUP formula across the same account code, I need to use the $ to fix the account code. But to copy down I think I need that to be without the $ sign. Any solution on that?

View 9 Replies


ADVERTISEMENT

F4 Does Not Repeat Insert Rows Or Columns

Sep 12, 2009

My F4 key (which I use constantly) works for every "repeat" function except for inserting rows or columns. I can repeat every other option EXCEPT inserting rows/columns. I just had Office 2007 uninstalled and had Office 2003 put back on my PC. My IT group can't figure it out.

View 3 Replies View Related

Insert Rows & Repeat Values Based On Corresponding Cell Value

Jul 7, 2009

I have a list of 130 names in column A. I have a number value between 0-10 in column B (next to the name). I need to insert the number of rows defined by the value in column B, below each row that I already have (if the value is 0, then the row needs to be deleted). The inserted rows have to be filled with the name value from the row above.

For example - before macro:

Joe Bloggs 2
Adam Wilson 10
Peter Andrews 0
Claire Burrows 6

After macro:

Joe Bloggs
Joe Bloggs
Adam Wilson
Adam Wilson
Adam Wilson
Adam Wilson....................................

View 6 Replies View Related

How To Copy Row With Formula In Locked Cells And Insert Copied Cells In Protected Sheet

Mar 29, 2014

Have you ever copy a row with formula in locked cells & insert it in a protected worksheet?

View 1 Replies View Related

Apply Formula To Selected Cells Via Macro

Jul 6, 2009

i m trying to set up a macro to convert a range of user-highlighted(selected) cells to 3 significant figures: for example, convert 0.135564 to 0.136

the equation i found elsewhere online: ROUND(xx,3-(1+INT(LOG10(ABS(xx))))). but i can't quite figue out how to apply the equation to a selected range of cells via a macro.

View 5 Replies View Related

Macro To Add Formula In Selected Range Of Cells

Apr 26, 2013

I have a spread sheet with large number of data, problem is all are in various currency so rather than typing =#####.##/a1 in every cell to get the GBP amount (a1 where my exchange rate is linked) I thought if there is macro can do this job for rme.

So what i need is macro which once run enter the formula after the numbers already in the cell in selected or given range.

View 1 Replies View Related

Copy Selected Rows & Insert As Many Times As Rows Selected

Feb 6, 2008

The following code inserts a row below the selected row, and copies the formula of the row above into it.

Dim Rw As Integer
Rw = ActiveCell.Row
Selection.Insert Shift:=xlDown
Rows("" & Rw - 1 & ":" & Rw - 1 & "").Copy
Rows("" & Rw & ":" & Rw & "").Paste

However, I need to alter this to work for inserting more than one row at a time. ie. the user selects 'x' number of rows and 'x' rows are inserted below (in the same way 'Insert Row' works in Excel) and the row above the selection is copied down.

View 2 Replies View Related

Using VBA To Insert Formula Into Cells ...

Jul 6, 2009

I have a header row, so everything should start at row 2.

If Cell A2 has data, I would like to use VBA to insert the following formula into B2 (this works fine when pasted directly into cell B2):

View 6 Replies View Related

Copy Selected Cells And Paste As Formula With Original Cell Reference

Nov 20, 2012

Wanted to know if there is a macro that can copy the selection of cells and paste it as a formula with original cell refernce.

For Example :

Copy Selection Cells - Say Cells A1 B1 & C1
and Paste It as formula In Cell D1 as =A1+B1+C1

View 7 Replies View Related

Insert Formula In Range Of Cells VBA?

Sep 6, 2012

i am trying to insert a formula into a range of cells using a For... to loop

This is what it looks like:

VB:
For i=1 To n
Worksheets("Ret_sheet").Cells(i, 8).Formula = "=if(mid(B" & i & ",3,1)=""A"",""PY Campaigns"",mid(B" & i & ",4,3)"
Next i

The row with the formula returns a syntax error.

what the right syntax is? I have read a lot about inserting a formula in a cell using VBA, but i never met the case with a counter (i) usage. I guess the problem might be there.

View 8 Replies View Related

Insert Formula In Empty Cells

Jun 19, 2008

I have a sheet that I put a blank row before every change in column G,

Dim lr As Long, i As Long
lr = Range("G" & Rows.Count).End(xlUp).Row
For i = lr To 2 Step -1
If Range("G" & i).Value Range("G" & i - 1).Value Then
Rows(i).EntireRow.Insert Shift:=xlShiftDown
End If
Next i

and now I need formulas in columns B and I in those blank rows. I'm happy to roll it in to the above piece of code, or put it in after.

I don't think I can use LastRow to define my range and replace blanks with formula because of the blank rows. I would need more of a "LastRow with only one blank in between populated rows" if such a thing exists.

The formulas will be ="*"&H3&" DWG "&G3 for cell B2 and =I3 for cell I2.

View 9 Replies View Related

Insert Rows And Copy Formula Cells

Dec 15, 2008

I am trying to finish off a form that allows a user to insert a row below the selected cell and copy the formula from the line above if one exists. The code inserts the line but does not copy the formulas if they exist.

Application. ScreenUpdating = False

Dim cRow
Dim j As Long

cRow = ActiveCell.Row

With ActiveCell
.EntireRow.Insert
End With

For j = 1 To Cells(1, 255).End(xlToLeft).Column
If Cells(cRow, j).HasFormula Then Cells(cRow, j).Copy Cells(cRow + 1, j)
Next j

View 9 Replies View Related

Fill Range Of Cells With Text When Listbox Option Selected - Clear When Not Selected

Jul 25, 2014

I am using this code to hide or unhide rows of text on another sheet:

VB:
Sub ProcessSheet1ChangeOnCellJ7(ByVal Target As Range)

Dim sAddress As String
Dim sValue As String

'Get the address of the cell that changed without '$' signs
sAddress = Target.Address(False, False)

[Code]....

When the "Not Pursuing" list box option is selected (in cell "J7" or "J8" in Sheet 1) I need to add (or over-write) "Not Pursuing" to the range of cells in column "B" (in the "Tasks" sheet), but only for that particular Goal, meaning a limited range of cells in column "B". If the "Pursuing - Show All Tasks" option is selected for a Goal then these same cells need to be blank so that the appropriate person can enter their name into the cell.

The purpose for adding "Not Pursuing" automatically to these yellow highlighted cells is that it will facilitate filtering of tasks by individual in the "Tasks" sheet..

Again I have tried several times to upload a sample file and am unable to, which I know makes it more difficult to solve. (Is there some common mistake people make? I know it's an allowed format and is very small in file size....)

Code solution can be entered directly beneath:

VB:
If Target.Value = "Not Pursuing" Then
ActiveWorkbook.Sheets("Tasks").Rows("29:29").EntireRow.Hidden = False
ActiveWorkbook.Sheets("Tasks").Rows("30:48").EntireRow.Hidden = True

View 1 Replies View Related

Insert Formula Based Off Changing Reference Cells

Mar 6, 2014

i need a macro which puts the formulas into the cells as per attached.

the number of rows between the "beam" can be variable
the number next to the beam will be variable.
the number of "beam" rows is vaiable

my thoughts where to do a find"beam" and refernce the cells address the create formulas off those points but dont have the skill to code this

beam macro.xlsx

View 2 Replies View Related

Excel 2010 :: Macro To Insert Formula Into Cells?

Oct 6, 2011

I'm trying to create a macro to insert a formula into a specific cell. The formula is meant to check if a cell has text, and then if it does, search for the text on another page.

I had a go at the code, but keep getting Runtime error 13.

I'm using Excel 2010

Code:

Sub new_entry()
'
' NEW_ENTRY Macro
Dim rowNo As Integer

[Code]....

View 6 Replies View Related

Repeat VBA Formula

Dec 15, 2008

How do I keep repeating

If Range("E22").Value Range("G3").Value Then
Rows("22:22").Select
Selection.Delete Shift:=xlUp

Until E22 does = G3

Then I need it to go to Row 23 and do the same.

My goal is to leave only rows (between rows 22 and 50) that have the same value in its column E that match cell G3.

View 9 Replies View Related

VBA - Insert Formula With Sheet References In All Blank Cells In Used Range?

Sep 9, 2013

I am try to get the following VBA macro to work; however, I keep getting hung up on errors regarding the formula I am trying to input. It is getting hung up on the apostrophes and dollar signs. I am fairly new to VBA so I am lost when it come to converting my sheet formulas to VBA.

Code:

With ActiveSheet.UsedRange.SpecialCells(xlCellTypeBlanks)
.Formula = "=RAND()*0+VLOOKUP(INDIRECT(ADDRESS(1,COLUMN(),3),TRUE),INDIRECT("'"&TEXT(INDIRECT("$A"&ROW(),TRUE),"DD-MMM-YYYY")&" Inv'!"&"$J:$K",TRUE),2,FALSE)"
.Value = .Value
End With

View 3 Replies View Related

Not Repeat The Same Formula In Each Cell, Over And Over Again

Feb 27, 2009

I have a 34-page workbook. On Every Row (starting on line 4), and on Every Page (except the first "Summary" page) is repeated, this same formula....over and over again in column "N":

=IF(A4<>"A",(IF(AND(A4<>"A",OR(J4="",J4="NT")),"OK","WARNING: EXECUTION NOT EXPECTED OF LOW PRIORITY TEST CASE!")),IF((LEN(J4)=B4),"OK","WARNING: STATUS DOES NOT EQUAL TC COUNT!"))

So, since this keeps repeating over and over again, is there some way (either by formula, macro, or whatever), that I can prevent the constant repeating on every line, to bring the file size back down? [Note: This formula alone actually added almost 5MB to the file size!]

Two things to know:
- The formula above is seen on row 4 (that's why you see "4" all over the place). On Row 5, it would be "5" instead, and so on...
- The formula above always starts on row 4, and goes down to the "last used" row, in column "N" (so there's other information in that last used row as well).

....hopefully this is a very easy thing to do?

(PS: Thanks PeterSS for the help creating the above formula in the past...hopefully it can now be made less repetitive to conserve ~5MB of file space!)

View 10 Replies View Related

Insert Two Columns For Selected Rows

Dec 6, 2008

I would like to select a number of columns and then run a macro that would insert two columns after each of the selected columns.

Or is there perhaps a faster way than using a macro?

View 9 Replies View Related

To Write A Macro That Will Insert A Formula Directly Into The Cells In Column M Of My Worksheet

Aug 9, 2007

I am trying to write a macro that will insert a formula directly into the cells in column M of my worksheet.

The worksheet has about 3400 rows. When I run the macro it does not adjust the cell reference in the formula so I am getting the same value in all 3400 rows.

I am using the following ....

View 9 Replies View Related

Repeat Column Of Data Down A Row Using A Formula?

Jun 9, 2014

I'm trying to create a formula (if possible) that will repeat column headers down a row and repeat every nth time. I have text values in cells E6:AL6 and would like to use a formula that will make it so that E6 will show up B2, F6 will show up in B3, G6 will show up in B4, etc. And then when it gets to B35 (AL6), B36 will then revert back to E6, and the loop will continue - B37 will be F6, B38 will be G6, etc.

My thought is to create an offset/address of some sort that will read as OFFSET(E6,0,x+1) and if x>35, start back at 0. However, I don't think you can create such a formula using an offset?

View 5 Replies View Related

Repeat A Formula Automatically Every Seven Columns

Feb 19, 2010

I have a formula that is working, but I want to repeat it every seven columns. I know I can drag it and release it (or drag a few and release them in the appropriate column), but at this point I have so many columns that it's quite cumbersome to do that. Is it possible to create a macro that will automatically repeat the formula in every cell seven columns to the right (the same row for all)?

My formula is in cell K7 is:

=IF(AND(K24<=0%,K24>=-2%,OR(J32="T",J32="F")),1,"FALSE")

Now I want that formula to repeat (with the proper adjustments) for cell R7, i.e.:
=IF(AND(R24<=0%,R24>=-2%,OR(Q32="T",Q32="F")),1,"FALSE")

and then to automatically continue like that for cells Y7, AF7, AM7, and so on.

View 6 Replies View Related

VBA Formula To Repeat Down Rows Until Nothing In Cell

Aug 27, 2013

how to get it to fill down. Basically depending on the contents of column D, a formula (which also needs to fill with the rows) is copied from sheet 2 in to column K.

Code:
Sub Copy()
With Sheets("sheet1")
typ = .Cells(Rows, Count, "D").End(x1Up).Row

[Code]...

That's what I have. I am totally stuck. the formula needs to relate to column G and fill down too. this is the formula

HTML Code:
=IF($G2=2,$G2*90,IF(AND($G2<4,$G2>2),"$270.00",IF($G2>6,360+(($G2-6)*50),IF(AND($G2>=4,$G2

View 2 Replies View Related

Insert Range-named Row At User-selected Row

May 3, 2008

On the first row of a spreadsheet template is a <hidden> contiguous series of conditionally formatted cells (range name "stdRow" =production!$1:$1), with formulas, that I want a user to be able to easily insert at whatever row they might be in a worksheet.

If, for example, the user is at D24, then clicks the [InsertRow] button that I have positioned at the top of the worksheet (in a fixed pane), I want the attached macro to insert an instance of "stdRow" directly underneath the user position (at row 25, in this case). The use's position should still be at D24 when the macro finishes. If the user clicks the button multiple times, multiple rows should be inserted (again, without changing the user's position).

This is what I have tried so far:

View 13 Replies View Related

How To Insert Value Into Cell If Option Button Selected

Mar 9, 2012

What I am trying to accomplish is the ability to insert a value into a cell if an option button is selected. If the option button is not selected I want there to be a different value in the cell. This is what I have so far:

Sub OptionButton2_Click() Range("F8").Value = "$299" End Sub

What I am having issues with is the "else" clause. I want the value to show $0 if the option button is not selected. I attached a screen shot for reference.

View 1 Replies View Related

Pulling Multiple Matches (formula Repeat?)

Aug 21, 2009

I'm looking for is to repeat this formula within the cell, so that it can pull the information of not only the first match, but all matches proceeding it. Right now it only pulls the first match it finds, but I would like it to add every time a row matches the criteria of the formula.

=(LOOKUP(2,1/(('Paste SFHS'!$A$2:$A$9=A2)*('Paste SFHS'!$B$2:$B$9="08-Wave/Stu. Goals")),'Paste SFHS'!$C$2:$C$9))

View 5 Replies View Related

Repeat Vlookup And Find Or Search Formula

Feb 4, 2009

I have a column of text strings in a2.a??? this is my data. Each text string has a persons name somewhere in it with other text around it.

In column c2.c??? i have text names of people names im searching for. eg. bob,jane,harry

what would be a pratical use of the vlookup function to return the name in column b2.b??? if the name from C was located in the string in A this is a non case sensertive requirement.

View 9 Replies View Related

Formula For Duplicate Referral - Same Condition Or Repeat Within 30-90 Days

Mar 31, 2014

I wish to create a spreadsheet which has formulas which would enable me to see if a patient has had more than one referral created within the next 30-90 days [the actual number of days not important - the ability to modify the formula to reflect which time period required would be cool] and also to see if a patient has been referred for the same medical condition again. Thus in my mind at least two different formulas - has the patient been referred again within a time period of days and has the patient been referred again for the same medical condition.

Attached is an example referral spreadsheet I have created

View 4 Replies View Related

Conditional Border Formatting Formula (after Repeat 5 Data)

Apr 9, 2014

how to make conditional formatting for border line (top & bottom) after repeat 5 data/text ....

it's possible with CF formula and do not vba?

see my excel file attached..

View 4 Replies View Related

Repeat Formula 5 Times Before Changing Cell Reference?

Feb 27, 2014

how I can have a formula repeat down a column five times before it changes to another formula? For example. Say on tab 1 I have a list of products. On tab two I have five codes that repeat down the page over and over again. On tab two next to the repeating codes I need to repeat product one 5 times and then skip to product 2 on the 6th row and repeat five times and then skip to product 3 on the 11th row and repeat 5 times and so on?

View 10 Replies View Related







Copyrights 2005-15 www.BigResource.com, All rights reserved