i'm looking for a loop macro to perform the following task:
Sheet 2 is my look up table, and sheet 1 as a number of references such as:
='Sheet 2'!B1
='Sheet 2'!E1
='Sheet 2'!G1 etc
I need a macro that increases the row references "1" to "2", saves the sheet then increases "2" to "3" and so on until the bottom of the reference table is reached
I don't know if title is understandable, English not being my tongue, anyway here's my problem, the current value must be increased or decreased by 0.01 if it's between 1 and 2, by 0.02 between 2 and 3 and so on. I'm really new to VBA and after a few hours I came up with the following code which works fine till the value of 6 and then gets stuck: ....
View 14 Replies View RelatedI'm new to Excel (4th day in class) and I can't find the answer to what I'm looking for on the net. Part of the problem is that I don't know what to call it, so I have a hard time looking it up.
Very simply put, let's say there are examples numbers 1,2,3,4 put in cells A1 to A4 (vertical) and more example number 50,60,70,80 are put in cells A6 to D6 (horizontal)
What one formula can be written in B1 that I can copy down to B4 that will make B1=A1+A6, and B2=A2+B6, and B3=A3+C6, and B4=A4+D6
I have to reference to another sheet a fixed increase of moving 6 rows across. What would be the formula for it?
For example.
First formula would be =Sheet1!A1
What would be the formula for the subsequent cells. (eg. =Sheet1!A1+6) obviously doesn't work.
I am looking for a formula that I can drag down a column that is pulling data from left to right at the top of my spreadsheet. See the attachment.
View 5 Replies View Relatedin cell A1 I have a ref no. eg aa/01/bb
in cell A2 I have a ref no. eg aa/02/bb
only the middle number increases in the reference each time eg: /01/
is there a formula that can achieve this or am i doomed to manual input, I have made a few attempts but cannot work it out.
I have a large database, and I wrote a macro to update it. However, the sheer volume of data makes it difficult to update at once (without crashing my machine), and I would like to know if there is a simple way to run the macro in increments ---say, 2,000 rows of data at once. Just wondering if these is an efficient way to code this, rather than hardcode partitions into visual basic.
View 2 Replies View RelatedI have a macro that increase a cell number and one that decreases a cell number, heres my code:
Code:
Sub Macro1()
Dim t
t = Split(Worksheets("Sheet1").Range("d5").Text, "/")
t(0) = Format(t(0) + 1, "0")
Worksheets("Sheet1").Range("d5") = Join(t, "/")
[Code] .......
So they do exactly what i want them to do but i want to put a limitation on them, so say the number in the cell is 0 then i dont want it to be able to subtract from it anymore, and say the number is 20 i dont want it to be able to add any more, i tried to put if statments into the code but no luck.
I don't know if I am asking for something impossible,but is it possible to create a MACRO to automatically add or subtract 10 to whatever number is in the cell? for example:
A1= 20
I would like to have a macro that lets you either add 10 to it to become 30 or subtract 10 to it to become 10.
Excel file attached! I need a macro to do the following:
Start with cell F4 and read the increment value from cell C4. Then add this with F3 and display the result. Continue with the same increment until it reaches the value equal to cell B4. Then read the increment from cell C5 and do the same until value equals cell B5. Repeat the same step until it reach the value equals B7. I did manually in the column F4 to F28. Moreover, the cell increment will change according to the variable in A2. In this case it is 25 and got 25 values to fill the column R.
I have a test due in the morning, and I really need this question answered ASAP, if anyone could. I need to create an IF formula for this situation: the standard Mhz is 500. Give 55.00 for that standard. But for every increase of of Mhz, give 25.00 per 100 increase.
View 2 Replies View Relatedwhat i need is a macro to run when I print a form. I am making a job card with a unique number on it ie: 100. when I print the form, I then need the 100 to change to 101 and so on. I cant work this one out.
EDIT - Ive attached my work in progress. It is for a computer repair shop. I have a few macros in there as I need to email a copy of the workbook too.
when you open the workbook, you will see the job number in red. I just need a macro tht will increase that number +1 every time it runs. I also need the email macro to rename the workbook to the customer name input in cell B4 - but I think im best to post this request in a new thread?
I am trying to write a program that needs to select a different cell everytime it is ran. For example, this month when it runs I need it to select cell BL137. Next time it is ran it will need to select cell BL138. Month after BL139. The cell it selects will always be in the same column (column BL) and the cell number always increases by the same amount (1).
View 6 Replies View Relatedhow to reference cell A1 in a macro?
View 9 Replies View Relatedi am currently using the macro below to import text files into a spreadsheet. Currently, it begins the import in cell A1 which is what I recorded it to do. how do I change the code to begin the import on the active cell?
View 2 Replies View Relatedi have a workbook containing two sheets "Impiorted Data" which is the data which is downloaded and the range will change each time the data is imported and "Pivot Table"
I would like a macro to increase the range of the data from col A to the lasst row in Col K so that the pivot Table has the correct range
I have recorded a macro , but would like this to be streamliined with regard to the range
ActiveSheet.PivotTables("PivotTable3").ChangePivotCache ActiveWorkbook. _
PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _
"C:My Documents[Debtors.xlsm]Imported Data!R1C1:R2797C11", _
Version:=xlPivotTableVersion14)
I'm trying to reference a location on a spreadsheet in a macro by using the values in two cells (the idea is to then paste to this location):
D2 is 17 (the row)
B4 is 2 (the column)
therefore the location is B17 (R17C2), but can I get this to work...? The values in these cells can change depending on selections made which is why I want to use the cell references rather than the absolute!
I have recorded macros in the attached file to highlight cells that contain matching initials by using conditional formatting on the first cell and copying it to the remaining cells. The problem is that if rows are inserted above that change the first cell reference then the macro no longer works properly. Is there a way to use a relative cell reference within the macro? The macro buttons are in cells A4 to A13. I have no VB experience and created the macros by recording keystrokes and using tips found in this forum.
View 14 Replies View RelatedI am building an Excel sheet for my company which keeps track of who has done what with a new client in a step by step process. I have it set up so that once a department clicks complete in a box it automatically emails (VIA a macro) the next person who needs to do the next task. Some tasks are done by the same person no matter what, other tasks are done by a project leader which is different depending on the client.
The problem I'm having is that, within the macro, I need to reference an email address in a cell X cells to the left in the ".TO" line.
So, in Column A I have the CLIENT, Column B The PROJECT LEADER, and Column C The PROJECT LEADERS EMAIL. Then the next 22 Columns are labeled steps with drop down boxes, once the have selected "COMPLETED" it triggers the macro and send the email, just not on the ones when it needs to email the PROJECT LEADER, since it's a variable. Below is the macro, how I can have the ".TO" line in the email reference the email address in Column C to the left of it?
Sub Mail_Workbook_1()
Dim OutApp As Object
Dim OutMail As Object
[Code]....
if this is possible without becoming a circular reference.
Aim: to have a Macro that takes user selected cell and converts it the result and place it back in the same cell.
Example: could have a typed value in A10 say 500, and when the cell i selected and the Macro is run is converts the value by B10 (.5) and places the value back into A10. ie A10= A10*B10 (250)
I know this is a circular reference but could the macro say take the Value A10 and hold it in a temporary string of some sort before calculating and then returning the new value in there?
I've got 3 sheets, A, B, and C. In sheet C, I have a cell named "element". That cell can have either the letter A or the letter B in it. In my VB code, I want to reference the sheet which correlates with the "element" cell. So,
Worksheets("element").Select
when the user clicks my "go" button, it calls this logic, and I want the worksheet that correleates to the letter in the cell in worksheet C - to open.
The reason for my posting - this is not working, and may not even be possible. Perhaps someone has experience in this and knows how to do it - or knows a different way to do this.
I have a template workbook and a macro that finds lines of data in a source workbook and copies parts of it to the template workbook. It then deletes left-over blank rows, leaving a summary section just below the last row. There is a formula in column C of the summary section that gets messed up slightly by the deleted rows, specifically a cell reference within the formula that refers to data on another sheet within the same workbook.
On the template the original formula is in cell C1667 of a sheet entitled "2014" and reads...
[Code] .....
After the macro is run, lets say that for argument sake, we end up with 13 rows of data that got copied across to the template, the data exists in rows 3-13 and excess rows have been deleted. The above formula now sits in cell C16, and reads....
[Code] .....
The last cell reference in the formula has not updated itself to row 13, I believe because it refers to another sheet.
I would like to add in a line of code at the end that will find which row the formula sits at in column C after excess rows have been deleted, and correct it, so that for this example, it would end up being this....
[Code] .....
The formula will always be in columns C but what row it ends up on will vary.
I have a situation where I need a macro to reference another cell in the sheet if the cell is left blank. If the user wants to edit the value, they have the option to manually input a value but if they decide to leave it blank, it autopopulates the referenced cell.
View 1 Replies View RelatedI want to insert a cell reference into the code below to replace the hard coded "100500" so the value in cell A1 replaces the criteria below. Is this possible ?
Rows("3:3").Select
Selection.AutoFilter
ActiveSheet.Range("$A$3:$B$17").AutoFilter Field:=2, Criteria1:="100500"
Range("A3").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Copy
Range("A22").Select
ActiveSheet.Paste
Is there anyone who can suggest a solution to my problem below ?
Basically, what I need is a macro which would ideally work like this:
if D32 = 1, then the background colour of D4 should be red
if D32 = 2, then the background colour of D4 should be orange
if D32 = 3, then the background colour of D4 should be yellow
if D32 = 4, then the background colour of D4 should be green
And then I plan to use it for columns E, F, G
I have a UDF in Cell Sheet1!A1 that inputs some ranges from Sheet1 and calculates a number. Then I have a sub that calculates the value of this function with Evaluate(Sheet1!A1.formula). However, this only works when I am in Sheet1. Otherwise, I get the wrong calculation. How can I avoid this? I will post the code in the open source forum as it otherwise is quite good and automatically resizes array functions to their proper size.
View 2 Replies View Relatedif it is possible to increase one cell by 1 when the date was changed in another cell. I installed the code that was given to me and it worked perfectly, thanks agin JB and royuk, UNTIL the cell that was to increase by 1 was locked and the sheet protected.
The date cell is not locked.
I need to increase the cell value on a spreadshhet that contains over 50,000 cells. I know how to do this on a cell by cell basis. I need to know if there is some way of doing this to multiple cells. Here is my example;
$603
$712
$649
I need to increase each cell value and roundup to the next number. I have been doing the following formula: =ROUNDUP(603/.97,0) to increase the cell value to $622.
If a cell is not blank, then increase that amount by a percentage identified in another cell and display the value only without any formalas in a new cell. To this end I wrote this IF statement:
=IF(I2>0,CP9=(CA9*I2/100)+CA9,CP9="")
Observation: I see a FALSE in CS9 where this IF statement exists, however, CP9 does not display the required value.
I need to open a customer-submitted workbook which has a list of items in column B, marked by an 'X' in column A on selected rows. Each customer's list is tailored to them with, say, 25 rows each.
I have a master list with identical formatting but which has the data from ALL lists combined.
I want to insert an 'X' in column A of my master workbook for any matching items for which there is an 'X' in column A of the customer's workbook.
I could do this with a formula in column A of my master list, but each customer's workbook has a unique filename and I don't know how to make the formula use a changing lookup array, so I figured this is something that I have to accomplish with VBA.