I am looking for a way for a cell to equal another cell but the cell that it looks at is controlled via another cell.
So, for example, cell A1 I type in “E5” and this tells cell B1 to display the contents in cell E5.
I am trying to write a macro that will make the bottom cell in a column equal to the top cell. The top cell will not always be in the same row and there won't always be the same number of cells.
View 1 Replies View RelatedI have a monthly forecast document that is updated by an operator monthly. At the end of the month, the operator presses a "Copy Accrual" macro that copies accruals for the month and stores them on a seperate tab. After sending the document back to the Finance team (necessary step due to software complications), Finance will send the operator back an updated file at beginning of next month. The operator than presses a "Paste Reversal" macro that is supposed to input the negative of the accrual stored in the seperate tab. The problem is that it is posting as the same value (not negative of value). I tried recording a Macro to fix this, but it did not work. An example of the code that came up with is:
Worksheets("Weekly Forecast").Select
Range("B9").FormulaR1C1 = "=-Accruals!RC[-4]"
Range("H9").Select
Selection.Copy
Range("H10:H33").Select
ActiveSheet.Paste
Thoughts on what to do? I think the two things that are throwing me off is the negative, and moving between the different sheets.
I am trying to make my textbox on the userform equal a cell value in a column. I need the userform to look at the last cell that has a value in a column and display that value into the textbox on the userform.
Ex. I am starting my data from Cell "O8" and the last possible row would be "O51" Starting with O8 I need my textbox in the userform to read this cell value. After each entry the next row in Column O will have a value, so I would need my userform textbox to read cell "O9" value the next time the user form opens. Here is what I got thus far:
[Code].....
It gives me a Compile Error: Invalid or unqualified reference.
A column of cells can be 1o different shades of green according to their value (achieved by using conditional formatting.) I want to arrange that at a certain time all the cells of a part of the row of a formatted cell are the same colour.
View 4 Replies View RelatedI need to figure a way to make to cells with dates equal each other if the
day,month and year are the same but are placed into a cell at different times during the day. "Making Date Now () = (06/29/09) In another cell". Therefore, A1= Now() and E11 = 06/29/09
How to correct my formula because it does not work?
Here the formula: =COUNTIFS(Data!C2:C24005,A17,Data!M2:M11149,"<=0")
I need to insert the formula in column C (Findings tab) which counts the rows in Column M (tab named "Data") that equal A17 (Column A in "Findings" tab) and which are less or equal zero. In addition if I drag the formula down I want to only the values be entered in highlighted in blue cells in column C (SKUs With Zero Sales in "Findings" tab) and empty cells in not highlighted cells. I attached images of these two tabs: Data and Findings.
I have a sheet in Excel 2004 for Mac that is a patient list with over 2000 patients. I need a rule that will compare values (patient IDs and responsible party ID) in two adjacent cells, if the values are different, to delete the entire row. The goal is to get rid of patients (rows) that are not the responsible party (responsible party ID).
View 3 Replies View RelatedI am not sure if I am using the correct terminology when I see "array". What I want to do in VBA is what I know how to do in non-vba excel functions (cntrl + shift + enter). For example, I have a range of cells that need to meet one condition ( ""):
Code:
If Sheet8.Range("C" & rw) "" Or Sheet8.Range("D" & rw) "" Or Sheet8.Range("E" & rw) ""...etc Then
How do I bundle this in one package. What you see below is obviously incorrect, but I am trying to accomplish this with proper syntax.
Code:
If Or(Sheet8.Range("C" & rw & ":Z" & rw) "")
I have two cells, both of which have drop down lists for options 'a' & 'b'. When one equals 'a' the other should be restricted into only saying 'b' and vice versa. I would also like the user to be reminded that he can only select 'a' once from the two menus. Ideally I would like to do this in a formula rather than VBA?
View 2 Replies View RelatedSimply need a cell to count another cell is equal to certain value.
For example if B3 has a value of 6 then I need J3 to equal 1 or if B3 is equal to 3 than I need G3 to equal one. I tried the the COUNTIF but I am sure i am using it incorrectly.
I would like to create a VBA code where it will delete the entire column if the cell value is equal to value in D2
For example:
Sub Delete_Columns()
Dim rng As Range, cell As Range, del As Range
Set rng = Intersect(Range("G2:S43"), ActiveSheet.UsedRange)
For Each cell In rng
If (cell.Value) = D2 _
Then
If del Is Nothing Then
Set del = cell
Else: Set del = Union(del, cell)
End If
End If
Next cell
On Error Resume Next
del.EntireColumn.Delete
End Sub
======
But I think this line is wrong but I am not sure how to fix it - If (cell.Value) = D2 _
I have a spreadsheet with some cells which return values using INDEX and MATCH to bring back the entire details of a person based on there membership number. However I require the comments to be attached with the returned values. The comments have there image in, rather than just text.
I have found some answers with vba, which do the process, however you had to manually enter the cell, from which the comment was to be copied from, into a pop up box. This involved finding the box myself to then select the box to take the comment from. In doing this I had found and read the comment, which is the is the process I'm trying to bypass.
I've been pounding away at a project for two days trying to determine a way to identify a solution, to no avail.
Here is some experimental code. Under the assumption that in Column "A", every fifth line contains some text (a, b, c, etc) I want to place a function in column B that would identify the closest occupied cell above and to the left of the cell containing the function. The sub achieves this, but the function has a problem because of the Activecell line. Is there a way to identify the location of the cell containing the function to act as a reference point for the range?
Sub find_last_heading()
Application.ScreenUpdating = False
x = ActiveCell.Address
ActiveCell.Offset(0, -1).Select
last_heading = ActiveCell.Text
Do Until last_heading ""
ActiveCell.Offset(-1, 0).Select
last_heading = ActiveCell.Text
Loop
MsgBox last_heading
Range(x).Select
End Sub
Function cathead(Optional reference)
Dim cell
I need to identify rows where the contents of a given cell are equivalent to the cell below. I have managed to get this working based on iterating through the cells and selecting them both for cutting.
However it doesn't work effectively: It seems to be leaving blank lines in the original sheet and further fails after the first execution. I would be grateful for any suggestions on a good method to perform the following operations:
(1)to compare the cell with the cell below
I have used
If cell = cell.Offset(1, 0) Then
(2)to act on the rows for the two connected rows
Sub Test4()
' Loop through rows
Dim TheExtract As String
Dim cell As Range
'Application. ScreenUpdating = False
For Each cell In Worksheets("Sheet 1"). _
Range("A1", Worksheets("Sheet 1").Range("A65536").End(xlUp))
TheExtract = cell
If cell = cell.Offset(1, 0) Then
cell.Rows("1:2").EntireRow.Select
Selection.Cut
Sheets("Test").Select
ActiveCell.Offset(3, 0).Rows("1:1").EntireRow.Select
Selection.Insert Shift:=xlDown
End If
Next cell
'Application.ScreenUpdating = True
End Sub
How do I come up with a price that will make my profit and my customers savings equal.
Example:
Retail price $178.99
My cost $113.46
If I charge $142.23 then my profit is $28.76
Customer pays $142.23 plus $8.00 shipping ($150.23)
$178.99 Retail minus $150.23 = $28.76 savings
I receive a large file every month with 30K+ rows of data that need to be manipulated manually before I can send it off. Within the data are "chunks" of data that are anywhere from 1 to 90 rows each. Each chunk needs to total 100 or less, and while they do for the most part, some end up over 100 due to rounding (usually 100.02 or so). The rows above and below each chunk are blank, and I currently have a calc to add each chunk, and flag it if it's over 100. Then, I have to go through each of the flagged chunks and manually decrease one of the lines to make the total 100.
Is there any way to automate any or all of this procedure?
I have attached a sample file with two chunks of data. The actual files contains 14 more columns to the left that aren't shown.
Sample.xlsx
code that will go to a cell in Sheet1 column A that has the same or closest value to cell B11 in another workbook. The number values in the column are to three decimal places and the run in order down the column from lowest value to hightest.
View 6 Replies View RelatedI need to be able to select a checkbox on my form and when selected, fill data from other cells on the form to other cells. Here is what I have so far
Sub CheckBox1_Click()
If CheckBox1.Value = True Then
Cell(F13).Value = Cell(B13).Value
Else If CheckBox1.Value = False Then
'do nothing
End If
End Sub
But it does not work I get a compile error on the: Cell(F13).Value = Cell(B13).Value
I would like to run a calculation based on selected active range in sheet. I tried several methods and cannot make it work.
View 2 Replies View RelatedWhat I have is a sheet that checks for the current date when it opens, if the day is a Thursday (payday) then it does stuff. What I am having an issue with is setting a cell equal to another cell by formula, but rather than using the cell reference itself, sheets.cell, I have that cell in a variable Var6. When I run the code I am getting an application or object defined error.
The variable set is as follows:
Var6 = "Budget!AI26"
Formula ....
Code:
If ActiveCell.Value = "B5 in Sheet 2" Then
How do I define the search for B5 in sheet 2?
I found this not to work:
Code:
If ActiveCell.Value = Sheets(2).Range("B5") Then
I'm doing a spreadsheet where there is ten cells or top ten positions. Where there is one sheet for where the ten values and another sheet with cells that might or might not match the other sheet. For instance.
If any cell A1 on sheet 1 matches cell A1 on sheet 2 Then give cell A15 the value of 10. The If cell A2 on sheet 1 matches A2 on sheet 2 Then add another 10 giving A15 a total of 20. And so on up To A10. Then If it doesn 't match exactly lets say If cell A4 on sheet 1 match cell A2 the Minis 4 from 2 giving you 2 Then minis 2 from 10 giving 8 While still totaling In cell A15, which would equal 18 now.
how to make a cell a color depending on a number in a different cell? Example...if A2 is 92.6 how would I make D2 blue? But if A2 were 91.9 how would I make D2 red?
View 5 Replies View RelatedIs there a way to create a multiple dropdown (Similar to Windows Start menu) so that the user can select the item and its properties then the selections be placed into multiple cells? For example, i select wood from drop down list and i get another drop down list asking for the type of wood, I select MDF and another drop down ask for thickness. when I finished my selections, then the selected Items copy themselves into 3 different cells.
I have a drop down in (A1) cell and I select an item from it. I want (A2) cell to check the name in (A1) then call up another drop down i already made in (A2).
I have several hyperlinks that may or may not contain data, the linked cell will display "0" if there is no data. When I print I dont want the "0"s printing.
How do I make the cell display nothing when a hyperlink cell is nothing?
I want to make a cell blank if nothing is written in another cell. I have used this formula in C4: =IF(ISNUMBER(C3),IF(C3<180,C3+180,C3-180),"")
View 1 Replies View RelatedHow can I make a cell mandatory, if another Cell states XX?
For example:
If column B has "agency" then column C must be completed stating which agency was used?
However sometimes column B could say "no agency" therefore column c doesn't need filling!
I would like to program an Input Box that looks at the cell next to it to see if there is a value equal to zero in it. If there is a Zero in the cell an Input Box will popup and ask "what was the result". It would keep going down the column until there are no more values in column A.
In this example the Input Box would popup for the second line and the third line and then populate the values entered into C2 and C3 accordingly.
Ex
Col A Col B Col C
1 1 52
2 0
3 0
I have 2 worksheets, and I was wondering if I can have a cell from Sheet2 equal to the subtotal of the Autofilter criteria of a column in Sheet1.
I do have something working with macros but it takes a long time. This would make things a lot easier.