Tracking Forums, Newsgroups, Maling Lists
Home Scripts Tutorials Tracker Forums
  Advanced Search
  HOME    TRACKER    Excel


Advertisements:










Insert Row At Active Cell With Formula From Fixed Row


I want to insert a new row that contains the formulas of a fixed row (1:1).
The inserted row is changeable and is determined by whichever is the current active cell.

Eg:

Active cell is something random like E16

I want to add a new row but don't want a blank row - rather want a row that contains the properties of 1:1


View Complete Thread with Replies

Sponsored Links:

Related Forum Messages:
Insert Row On Sheet & Move Active Cell Row To It
I would like to create a macro that could archive entries from one sheet and insert them in another. I created one but the problem is that the entry has to be the same row each time.

Example:

Sheet 1 – is current jobs and sheet 2 is old jobs.

My macro moves an entry from Row A-5 of Sheet 1 and moves it to the top of Sheet 2.

I would like to be able to scroll through each entry select it and have it moved to the top of the Old Jobs sheet.

View Replies!   View Related
Highlighting Active Cell's Row, Along With Any Row That Shares Same Value In That Column
Is it possible to click on a cell in column C, and have the wishlist below happen:

That active cell's row is hightlighted.

Any cell in that column that has the same value as active cell is also highlighted.

Plus, any cell in another sheet that has that value it's row is highlighted too.

Example:

I click on C5 in Sheet 2 its value is 45000789 it row is highlighted, this value also appears in C3 in the same sheet, so it's row is highlighted as well. Plus, in sheet 1 in C10 this value appears and it's row is highlighted as well. When any of the values are clicked again the highlight is removed from all parties.

View Replies!   View Related
Insert A Row And Copy The Value Or Formula Of The Upper Row
I'm having trouble with my self designed "program" in excel.

Is there a way to insert a row and copy the value or formula of the upper row? withouy using macro.

View Replies!   View Related
Identify Button (shape) Row To Insert Row And Delete Row
I have a button (group containing and add and delete button).

I want to identify the row (position of shape/button calling the macro) to enable inserting a new row (1 row down from current row).

Then do the same to delete a row (position of shape/button calling the macro) to enable deletion of selected row.

This will allow me to add/insert rows by the button located at that row

The problem i have is getting the row property (row position of the button eg. TopLeftCell.Row) of the add button. The add button (RowBtnAdd) is a shape within a group (BtnGrp)

I also note that when a group is copied, it has the same shape name as that copied.
I want to keep the add and delete shape within the group (BtnGrp).
I do not want to select a cell or row or enter a row number to delete etc.

refer to sample workbook attached. Currently only has one record row.

View Replies!   View Related
Insert Row And Copy Cell From New Row
Attached is the sample workbook. I have a workbook with 2 sheets. Sheet1 contains all question and answer question. When the user select "Comment" as an answer, it will trigger to insert a new row on sheet 2. My question: is there any way I can copy from the comment fill in column c on new row to Sheet1 " Comment column"?

View Replies!   View Related
Color Row Based On Fixed Cell & Relative Cells
My sales spreadsheets have a column which is turned to 100% when the order comes in (i.e. when the salesman gets it in his commission). I have applied conditional formatting to turn the whole row green when this happens (for ease of seeing which orders are in)

We also have a cell for the Purchase Order "number" (as these come from the customer, these can be a straight number sequence - "12345" or a mix of letters and numbers - "ABC12345"). My boss would like this cell to be red if the "order in" column is at 100%, but there is no PO number.

However, when I put in the formatting:
(1) =$K$15=1 (to turn the row green)
(2) Cell Value is equal to 0 (to turn the cell red)

it will apply (1) no problem, but will only apply (2) if (1) is false. (i.e. if (1) is true, the whole row goes green, with no red in the PO box.)

If I switch them round (i.e. have (2) first), then I get the formatting that I want (i.e. green row with a red box), but if (1) is false, I still get a red PO box.

What I need is a way of only applying (2) if (1) is true. (or any other way of only making the PO box red if the order is 100% but there is no PO number)

View Replies!   View Related
Use Active Row In A Formula
I am wanting to use the row number of the current active cell in another formula on a spreadsheet. I have only been able to find info in putting the active row number in a dialog box. Is there a method of returning the active row number and using in a number of formulas.

View Replies!   View Related
Paste Formula To Specific Row In Active Column
I'm trying create a macro to enter a series of forumula's in a series of rows in whatever column is currently selected (or column which has a cell selected). IE if the active cell is C5 I want "=A1+B1" copied to C10 of it was AA43 selected I'd want "=A1+B1" copied to AA10. Have done this with setting a row as a variable, but whenever I've defined the column as one it comes out as a numeric value. and gives me "method range of object global failed"

View Replies!   View Related
Insert Formula Every X Row
Does anyone have a code for inserting a formula for every so many # of rows? In my case I have to insert a vlookup formula into every 66 rows, in column L.

View Replies!   View Related
Use Value Of Active Cell To Name Row
I'm trying to take the value of a cell and use the value as a name for the row.
If cell a1 has value = June. I want to change the name of row 1 to June.
I'm not sure what I'm doing wrong with the following code.

Sub Name_a_row()
'
'
Dim TheName As String
Dim RowNum As Integer
TheName = ActiveCell.Value
RowNum = ActiveCell.Row
ActiveWorkbook.Names.Add Name:="TheName", RefersToR1C1:="=Data!R&RowNum"

View Replies!   View Related
Use Row Number Stored In Cell As Formula Row Reference
Column A contains numeric values that refer to a row number in column B. I need the value in column B to be outputted in column C. eg. if the value in Row 1 Column A = 55, the value in row 55 column B will be outputted in column C

View Replies!   View Related
Insert A Row And Add A Formula
I have a spread sheet that I need to insert rows into and then in those same rows, add formulas that display percentages compared to the grand total row. To make it a little more complicated, this spread sheet changes from day to day, so the rows and columns will be different each time. So the code will have to recognize text, then insert the row, then do the formulas in the blank row. The only constant will be that it will always start on Row 5. I have no idea how to start or begin to do this, so I attached a file with a page showing where I am at as an example, and then anther page showing what I want ....

View Replies!   View Related
ACtiveCell.row: Active Row Is Empty
I am trying to write a statement that sees if the the row below the active row is empty.

I have written the following but it is wrong. Please can someone correct it for me? Thanks!

If IsEmpty(ActiveCell.Row.Offset(1, 0)) = False Then
MsgBox "Not Empty"
End If


View Replies!   View Related
Row Of Active Cell Selected
I know how to select an entire row, but if I want the "row" with active cell to be highlighted when I press enter, or the down arrow key, is there a way to do that (mainly for ease of viewing).


View Replies!   View Related
Use Active Cell For Row Number
There is a chart encompasing column A, B and C. The column D has certain numbers stored in its cells. All I wont is to build a code which would check the value of the cell in column D which is in the same row as the active cell, and then paste certain date into the active cell - basing on the value of the cell in column D.

Here an example:

Sub pasteif()
first one) column D has
'if the value is i.e 2 then it should paste into the active cell whatever there is in Range F1:G1
'if other value is present in this case in cell D1 (it is always the D column) then other range would copied into the active cell
Range("F1:G1").Copy
ActiveCell.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End Sub

View Replies!   View Related
Row Number Of Active Cell
I need to write code which would find the row number of my selected range (named 's')and then select the row beneath that.

View Replies!   View Related
Highlight Row Of Active Cell
Is it possible to have a specified shading (say 50%) applied to all rows except the currently picked row and the header rows to allow a user to focus on inputting across the row? I'd use this in conjunction with " Move Selection After Enter" to "Right" so the user would stay on the same row. I've tried the Help function, but can't find anything.

View Replies!   View Related
Whole Row Of Active Cell Should Be Bold
The text of the active cell's row should be displayed BOLD. In other words, My cursor is on row 8, then this whole row should be bold. Is this possible ?

View Replies!   View Related
Delete Row Of Active Cell
I have a macro for deleting a row. I want iit to delete the row that I have selected, that is i if I mark cell B22 I want it to delete row 22. But it deletes the row under it, that is 23.

Sub Tabortrad()
Dim intRadnr As Integer
Dim intStartrad As Integer
Dim intSlutrad As Integer
intRadnr = ActiveCell.Row
intStartrad = ActiveSheet.Range("Första").Row + 1
intSlutrad = ActiveSheet.Range("Sista").Row - 2
If intRadnr < intStartrad Or intRadnr >= intSlutrad Then
MsgBox "Kan inte radera denna rad. Placera markören på en av bokföringsraderna mellan rad " & intStartrad & " och rad " & intSlutrad - 1 & "." & Chr(13) & "En ny rad kommer att infogas under den rad där markören står.", vbOKOnly, "Felaktig rad markerad".......................

View Replies!   View Related
Select Row For Active Cell
I need to select the row for the active cell without using an explicit RC address. I don't seem to be able to make the syntax work.

View Replies!   View Related
Range In Same Row As Active Cell
I'm looking for a piece of code, which would activate a certain Range i.e. the start of which would be in column A and the End in Column G. My problem is that the activated range of cells shuld be exactly in the same row as the currently active cell i.e. active cell B3 -> activated range A3:G3 .

View Replies!   View Related
Moving Active Cell In Same Row To Column A
In my macro, I need to, from any column, move the active cell to column A, while remaining in the same row.

View Replies!   View Related
Macro To Select The Row That The Active Cell Is In
Using vba how do I tell a macro to select the row that the active cell is in?

I'm just using a basic delete Row macro but I'd like for the macro to automatically select the entire row when it's time to delete instead of me highlighting the section.

View Replies!   View Related
Highlite Or Underline Active Cell Row
Is there any way in excel to allow for whenever clicking on an active cell to make an underline or highlite the entire row that that cell is in?

View Replies!   View Related
Use Active Cell Row To Check Another Column
I've been racking my brains trying to figure this out but cant, please can someone assist. I need to write some vba code that looks at cells in column aa and ag (on the same row) and displays a message is ag > 0 and aa <> "Agency".

View Replies!   View Related
Offset Active Cell To Beginning Of Row
I need to make the active cell go to the beginning of the row (Column A). I tried setting up a variable to be the row.value, but that didn't work (the way I wrote it, which doesn't surprise me).

View Replies!   View Related
Insert Row Syntax - Resize Row VBA Error
I need to insert rows in row A44 depending how many cells exits in a range i named "ALL_C"

I saw this code that inserts 10 rows on A44 so i thought by modifying it the way i did would work but it didn't. I'm still new at this stuff. What am i doing wrong?

Original

Sub Insertinrow43()
Range("A44").Resize(10, 1).EntireRow.Insert
End Sub
Modified (doesn't work)

Sub Insertinrow43()
Range("A44").Resize(Count(All_C), 1).EntireRow.Insert
End Sub
Thank you!

View Replies!   View Related
Insert Range-named Row At User-selected Row
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 Replies!   View Related
Insert Row- Macro Pasting Format And Formulas Under Last Row
I need to paste the format and formulas of the last row of data into a new row beneath it. I've seen a bunch of different end row functions, but which one is best and how do I only paste the formulas and formatting?

View Replies!   View Related
Repeat Insert Row And Formula For Selected Cells
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 Replies!   View Related
Formula References Not Updating On Row Insert/Delete
I have a worksheet with many different formulas in many different cells. When I insert or delete a row, there is one formula in one cell that does update to reflect the change in rows. The cell is located several rows below the section where rows are changing. It is a simple formula too. Here is the formula: "= SUM($E$3:E11)*0.09". If I delete more rows that cause the highest row number to be less than 11, this formula updates. If I insert more rows and go beyond row 11, the formula does not update. I have tried using $E$11, $E11, and E$11 to no avail.

View Replies!   View Related
SumIf Formula: Add New Data With An Insert At Row 13
The formula that works is =SUM(IF('Pipeline Input'!$X$13:$X$39=1,IF('Pipeline Input'!$H$13:$H$39="Lead",'Pipeline Input'!$K$13:$K$39,0),0))

I am trying to modify this formula so that the ranges are dynamic to allow me to add new data with an insert at row 13. What would the syntax of the formula look like if I use the INDEX function to allow the ranges to grow with new data? I have tried naming the defined ranges and entering the formula as =SUM(IF((CloseMo)="1",IF((SaleP)="Lead",(LoanAmt),0),0)) but I get a #VALUE! error

View Replies!   View Related
Auto Insert A Row With Info Populated From The Row Above
to be able to do is have a stock control sheet that tells me how much of 1 item we have in stock which is easy, the hard part comes when this stock is sold as this stock can be sold to a number of different customers e.g.

We have 10,000 X Pens

Customer 1 buys 1,000
Customer 2 buys 6,000
Customer 3 buys 3,000

i need a way of saying that we have 10,000 pens but if we sold 1,000 then we can click a button (macro maybe) and that will automatically see that we have 10,000 for that line and we have only sold 1,000 so we need a line inserting saying that we have 9,000 remaing and so on.... The sheet needs to record who these goes to though, that the reason i was thinking of adding a row

If this doesnt make sense then i am happy to answer your questions?

i can upload an example excel sheet if required if someone can explain how i do this?

View Replies!   View Related
Insert A Blank New Row If Check The Different Content In The Next Row
i attach my sample excel file here, book1.xls. sheet1, "input". it check the column "C" row by row and if it detect the different content data in next column, it will auto insert a new row. it will ignore the space. below is my coding:

View Replies!   View Related
Duplicating Insert Row And Delete Row On Another Sheet
I have two sheets, they basically contain shifts. They are laid out identically the only thing that changes is the date along row 1. In order not to have to recreate the workers from sheet1 onto sheet2 I use the following

View Replies!   View Related
Return Active Cell's Location/row
I'm having trouble identifing a way to return a location for the position of the active cell. I've searched Excel help with "Position, location, return, activecell, etc." and I can't seem to figure this out. I know that it's possible, so that's why I'm on here!

...

Ok, say the active cell is currently "F1", and I need the location "F1" to identify the ROW to be used in a formula later, how would I go about that?

The current contents of cell "F1"' will be "REPLACE", but I need to change the words "REPLACE" in "F1" and other cells labeled "REPLACE" in column F to the following formula (where the "1" in "A1" is is the current row):

View Replies!   View Related
Merge Range Based On Active Cell Row
I am working on a macros that creates a new row for every data entry. Below is the macros that I have. In the new row, I want for the cells in columns F through O to merge right after creating the row. How do I go about this?

If Sigma = 0 Then

Selection.EntireRow.Insert ' New row for new entries
ActiveCell.Value = "NONE"
ActiveCell.Offset(1, 0).Select
End If

View Replies!   View Related
Determine Row Number Of Active Cell In CurrentRegion
I'm trying identify the active cell row number in a current region for viRows below. Currently I'm getting the active cell row number on the total worksheet.

With ActiveCell.CurrentRegion
viCols = .Columns.Count
viRows = .Range(ActiveCell.Row).Count
End With

View Replies!   View Related
Set Variable To Row & Active Cell Column
I have a sort procedure I have been working on. Sort By Active Cell Column
Now I would like to make sure the row of the activecell.column is row 7. I tried

Private Sub comp_myMonthlyReport_SortAscend()
Dim rng As Range
With ActiveWindow
rng = .ActiveCell(7, .ActiveCell.Column)
End With
Selection.Sort Key1:=rng, _
Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
End Sub

But I receive this error: Run-time error '91': Object variable or With block variable not set

View Replies!   View Related
Copy 2 Fixed Ranges To Another Sheet After The Last Row
I want the range B111:B167 from the hidden sheet copied to Column A of the questionnaire sheet 5 rows after the last used row on the sheet. There is text in cells C261 & S261 at the bottom of the sheet, so currently row 261 is the last row, but users could/might insert or delete rows, when answering questions. I then also want to copy the error check responses from C111:C167 to column N of the questionnaire sheet 5 rows after the last used row on the sheet, so the question # and response matchup. I then planed to delete any rows that have “Answered” in column N on the questionnaire Sheet. The Idea being the user can run the macro over and over until no questions remain.

View Replies!   View Related
Automatically Insert Row When Row Value In Column Changes
I'm unable to find VBA code to insert a blank row when the value in Column L changes. For example if cell L2 = 400 and cell L3=500 I need to insert a blank row between L2 and L3. I need the macro to search the entire sheet which will have variable numbers of rows but Column L will always have data.

View Replies!   View Related
Fill UserForms Controls Based On Active Cell/Row/Column
I am attempting to write an Excel Macro that would allow me to Click on a particular row and have the fields in my form fill with the data in the columns of the row.

I am fairly new to Macros and VBA, but know that this has got to be a possibility.


View Replies!   View Related
Pick Data From A Specific Row/column (eg 10/B) Related To Active Cell
I have a spreadsheet with my Periods along row 10. e.g. C10: "1", D10: "2", E10 "3", F10: "4", G10: "5" etc. (green on the attached sheet). I have my departments along column B, e.g. B11: "Baked" B12: "Fresh" B13: "Frozen" (yellow on the attached sheet)

what I need and cannot work out is some VBA code that will populate two variables (lets call them Period & Department) when I click on one of the figures. For example if I click on cell: if I click E14: Period would have the contents of cell E10, and Department the contents of cell B14.

if i click G14: Period would have the contents of G10, and Department the contents of cell B14 again. I know how to get the click on the cell to work properly etc, and I have code to slot these variables into that works very nicely, I just can't get this bit to work!!!!

View Replies!   View Related
Macro: Insert A Row A Cell = Particular Value
I 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".


View Replies!   View Related
Row Insert By Selecting One Cell
I wish to use an InputBox to select one cell in a row and then insert an entire row at that position. What is the VBA code to do this?

View Replies!   View Related
Insert Next Row Based On Previous Cell Value
My current code works, but there's got to be a shorter version to insert rows based on a cell value. Currently my code works on a series of If statements. If the value in the current cell is "2" then goto the next row and insert one line. If the value is "3" then go to the next row, insert, next row insert etc. I'm currently written up to a value of 10, but the coding is getting longer and longer. Anybody got a shorter loop that I could use.


View Replies!   View Related
Add/Insert Row Below Cell If Value Matches
I have a column O with the heading "Return Visit Required". Each cell, starting in row 5, has data regarding a job. So each row represents a different job.

If the cell in a certain row in column O has a value="Yes" then I need 1 row added below that cell. If the value="No" or "" then do nothing.

I need the value "Yes" to be non- case sensitive.

View Replies!   View Related
Insert Date In Cell In Each Visible Row
I have a spreadsheet from which i run monthly reports for aother business area. I have filters in row 2 (which is my header row) and what i want to do is filter column CH to show blanks and filter column CE to show non blanks. Then in every visible cell in column CH below the header row (row 2) i want to enter todays date - this is so a record is kept of when each row was detailed in the report. I have tried the code below (which i tried to amend (unsucessfully) from code i got here to clear some cells when i ran another filter for another report).

Sub FilterSheets_Monthly_OFMDFM()
If ActiveWorkbook.ReadOnly = True Then
MsgBox ("This filter must add the date on each row included in this return." & vbLf & vbLf & "It must be run while the workbook status is not Read Only!" & vbLf & vbLf & "Please close this spreadsheet and re-open using the password. Thank you.")
Exit Sub
End If
Dim i As Integer
Dim rng As Range
Application.EnableEvents = False
Application.ScreenUpdating = False........................

View Replies!   View Related
Insert Row Macro Based On Cell Criteria
I'm trying to create a macro that takes data from one row and inserts it into a new row. Attached is a workbook with a before and after example of what I'm trying to do.

Each row has a security transaction that includes principal cash and interest. The data needs to be formatted so that each transaction has one row for principal and one row for interest.

Principal is identified by the tran code PAYDOWN in column C. Interest is identified by the tran code INT. However, the raw data generated includes both interest and principal under the tran code PAYDOWN.

There could be 100 or 1000 transactions generated based on the day.

View Replies!   View Related
Vba To Copy And Insert Row Based On Cell Value
vba to copy and insert row based on cell value

I have a spreadsheet with serveral thousand lines. I need to add row(s) and fill-in values based on a value in anothe cell; for example,

Based on the value in Column A, a row(s) needs to be added below the row and a count (value) to B needs to be inserted into the cell in Column B. This step needs to be repeated for all rows to the end of the sheet.

I would want to copy and insert the entire row.

LABELAB110

2
1

View Replies!   View Related
Copyright © 2005-08 www.BigResource.com, All rights reserved