I have one sheet where I am entering the necessary parts of the particular order. Once I have it completed I need to run a macro to copy only the elements that I have marked.
From rows 3-17, if cells in E3-E15 are greater then 0 then I need the rows
from Column "C" to Column "G" and Column "I" copied to another sheet. With rows 20 - 97 if cell in column "E" is > 0 then copy the relevant row from column "B" to column "E". I am attaching the file.
I'm creating a POS system for my wife's business. The workbook has three sheets.
On the first sheet are all the articles that her shop sells.
On A1 to D1 is the following text:
Quantity Discription Price Totalprice
B1 to D1 is already filled in. When a customer buys something, a employee only has to fill in A1, how many of what item the customer buys.
So it is possible that only 5 items have a number filled in, in A1.
Now, i have a vba, which has to search all the items which have filled in quantity and then copy row A to D to a sheet called Receipt. (Later I want to print this receipt)
Now this vba work when all the filled in cells are above each other. When there is a gap between the cells, it only copies the first row.
Here is the VBA:
Sub test()
Dim r As Range, c As Range
With Worksheets("Kassa")
Set r = Range(.Range("A1"), .Range("A1").End(xlDown))
For Each c In r
If WorksheetFunction.IsNumber(c) Then
Range(.Cells(c.Row, "A"), .Cells(c.Row, "D")).Copy
[Code] ........
When I change the second A1 in the fourth line to A200. I works, but is extremely slow. It's almost like if Excel is responding anymore. Also, when no quantities are filled in, it's also slow.
I have a sheet that I populate with data, and I would like to create a formula (or some code) that will look down column A, and if any of the cells contain a value >1 copy the cell and the adjacent cell (column B) and paste both values into a new sheet.
View 2 Replies View RelatedI’m trying to write a macro to look down two different columns in my work sheet and if the is a value >0 then copy a set range of cells to another sheet,
I need to search column (k) and (x) range (“K2 : K147”) and (“X2 : X147”) in (sheet1) for values >0 if there is, then copy from (“f : m”) if it is found in the (k) column, or copy from (“s : z”) if it is found in the (X) column, and paste value only to the next empty cell in sheet2 . Sheet2 is empty so (A) on down is fine for paste range. There is a spin button in the copy range column (L) and I don’t want that picked up in the copy. Manually I (paste text) only but I think (values only) will do the same thing.
[Code] .........
I have to make a table that shows that a if someone purchases
less than 5 items they receive no discount
5-10 items they receive 2% discount
11-20 items they receive 5% discount
21-50 items they receive 8% discount
over 50 items they receive 10%
and it has to be done in a way that the discount rate can be calculated using Vlookup I am struggling to find the best way to write this table. i tried numbering 1 to 50 and writing the corresponding discount rate in the second column but this looks untidy and can't calculate greater than 50 as i am not sure how to write it in the cell so it reads as >50 and not just 50.
Basically I have three sheets. MAIN, Sheet 1 and Sheet 2
Sheet 1 and 2 are in the same format
A3 down is a list of country names and then B3:I71 contains the data im interested in.
I've been trying to create a function that looks at B3:i71 to see if any cell in that range contains a value greater then $0.00. If it does then the row that contains the cell with a value greater then $0.00 (between col A to K) should be copied to sheet MAIN from cells B3 down. This should ultimatley produce a list of data for any row containing a value greater then $0.00. This process should then be repeated on Sheet 2 and should join the list below sheet 1.
I have 2 sheets, i need to transfer every cell value criteria >0 from sheet2 to sheet1. See the code below
Sub datatransfer()
Dim rngqty As Range
Dim nextcell As Range
Set nextcell = Sheet1.Cells(Sheet1.Rows.Count, 1).End(xlUp).Offset(1, 0)
Sheets("Reqorder").Activate
For Each rngqty In Sheets("Reqorder").Range("c4", "n57")
Do While rngqty>0
Cells(rngqty.Row, 1).Copy
nextcell.PasteSpecial (xlPasteValues)
Cells(1, rngqty.Column).Copy
nextcell.Offset(0, 1).PasteSpecial (xlPasteValues)
rngqty.Copy
nextcell.Offset(0, 2).PasteSpecial (xlPasteValues)
Loop
Next rngqty
End Sub
Basically I have 12 sheets of data, if column H (in any of these sheets & rows) has a currency value greater than 40;
I want to copy the entire row/s to Sheet16 named "Major" - which has the exact same columns and formatting. I need this to be automatic.
What code do I need, where do I put the code?
I have been working on this issue for some time, searches let me down paths to tell me of the color of the cell, but can't put all the pieces together. What I am trying to do, is upon Clicking Command Button 1 it will go row by row of column D (there are 2 headers so D3 would be the first fillable data) looking for dates that is past todays date, if past, it will color the cell red then copy it to the next available row in sheet2 then continue, date past due, color red, copy entire row to sheet 2 looping until the end is reached
View 8 Replies View RelatedHere is what i want to do. # I have a workbook say 'Template', which has two columns: ColA -> Names , ColB -> Value, his acts as a template, i.e a budget. # Another workbook 'sample' which has similar ColA(may contain additional rows) and corresponding value in ColB.
Here is what i need::
I need to copy the contents of ColA and ColB of 'sample' wholse ColB valules are greater than ColB values of 'Template' for corresponding ColA values in both, into a new workbook. SO basically, template acts as a budget check for the sample workbook, and if any value in ColB goes above the budget in template, it will show up in the new workbook. I have attached both the workbooks. Basically the red highlighted cells in Sample are the ones i want in a new workbook.
I would like to change the name of all cells withen xrange with a text value greater than nothink.
View 4 Replies View Relatedis possible to have a cell's text color change if the value of the cell is greater than a certain amount. For example, if the cell is $200 or more the text would change to red.
View 3 Replies View RelatedIf I wanted to highlight a cell if any cell in the range to the right was greater than zero, what formula would i use. I have tried =IF(L1:AD1>0,1) with the result returning for only the cells in column L. Row 3 has no value in column L but a value in column N with no result to highlight the cell.
View 4 Replies View RelatedI would like to create a cell that will tell me if a dimension has failed.
I have a tolerance that the value must be between and if it is not then i would like a cell that will input an X
I have three spreadsheets.
I need to have an automatic macro where if the Cell Value in SPREADSHEET 2 for example Cell J5 is greater than 0 (Zero is the default value in the cell).
Then the macro will open up a msgbox that says "You Are Not Eligible" in SPREADSHEET 1.
I would like the macro to run on its own if the cell value is greater than 1
i have data comming into the excel sheet using sql,
and j1005 cell calculates the entire data displays 1 if condition of j1005 is met else display 0 . the data refreshes on its own and j1005 keeps check every time and display the value 1 or 0
I have a spreadsheet that records "Audit Date" in column C & "Audit Due Date" in column D. "Audit Due Date" is always 2 years from "Audit Date". I think I learnt the correct forumla to use =EDATE(C2,24). What I would like Excel to do is to highlight "Audit Due Date":
Red: If the audit was completed 1.5 years+ Amber: If the audit was completed between 1 & 1.5 years Green: If the audit was completed less than 1 year The colour key will show me which audits need chasing.
how to include a condition in the condition? What I mean is in this set of numbers:
1000(A) 1000(B) 1000(C) 1200(D) 500(E) 1000(F)
I want excel to point out (with a 1, True, x, whatever) if (B) is greater than (A) by 10% or more and if (C) is greater than (B) and so on. I know I cant use =if(C>B,1,0)...Im just unsure how to include the % in the function
I have a protected worksheet with most cells locked and some that are unlocked. I also know the password to unlock the sheet. VBA code to monitor a cell(B29 in my case) and if it has a value of 6.00 or more than it will unlock cell B34?
View 7 Replies View RelatedI want to be able to count how many instances Primary Price is >= Price 2. And, secondarily how many times Price 1 was, at a minimum, >= to Price 2 and then also >= Price Price 3.
Ultimately I want to compare Primary to 100 or so "Prices" over a years time
I figure it would be a sumproduct function, but can't get it dialed in
I have a lot of cells containing numbers. Some numbers are small, some are big.
I want to divide all numbers which are greater than 300 by 1000.
IF cell A2 > 300 THEN divide by 1000.
How to do that? Is it possible to convert value in the same cell like using conditional formatting principle?
I want to count the times that a value in one column has a value of one greater than the value of the corresponding cell in another column.
(For example, A1=1 and B1=2, A2=1 and B2=2, etc.)
I've tried =COUNTIFS(A1:A180, (B1:B180)+1) and =COUNTIFS(A1:A180, "="&(B1:B180)+1) with no luck.
(It gives me a value of zero, but I can tell just by looking at the numbers that there should be at least a few times when this event occurs.)
I want to create a formula which will add 0.20 to the value of a cell if its greater then 0.
Basically i have a list of cells some of which will have a value and i want to sum this list and add 0.20 if there is a number in the cell.
I am trying to create a quoting system and basically its a list of rooms etc with the wall lengths and i am adding 0.20 to each wall to allow for excess but for example if there are no measurements in bedroom5 i dont want the 0.20 added.
Basically, I have data that have the titles:
Year Max allowed A B C D E F
1999 55 45 23 60 53 53 57
2000 59 45 23 60 53 53 57
2001 51 45 23 60 53 53 57
And data for several years. Each year has a particular maximum allowed exceptions per process (A, B, C etc)
I basically would like =countif(columns that contain A through F, for values greater than Max allowed for that specific yeat)
Is there a way that I can get the countif to recognize the value under max allowed as the "tripping" value for the row A through F?
So I would get a value of 2 for row 1999, 1 for 2000 and 4 for 2001
I'm comparing budgeted dollars vs. actual dollars spent by month. So row 10 has 13 columns (column A is title and then B-M is Jan-Dec) with each cell containing a budgeted dollar amount. Row 26 is same setup but contains actual dollars spent for those months. I want to highlight any cells in row 26 that are greater than the same cell in row 10. So if H26 is $1,000 and H10 is $500, I want H26 to be highlighted in red. How can I do this without having to conditionally format each individual cell as I can't seem to make this work with a cell range in Conditional Formatting?
View 3 Replies View RelatedI know that if true the following formula would return a 1
=IF(I7= 500000 and if I wanted to return a 2 if the cell value was greater than 500000 but less than or equal to 1000000
I have a certain range to start, and want to exclude rows if a defined cell is not greater than zero. I cannot figure out the syntax to achieve. The following code selects the range even if the single cell is NOT greater than 0...
View 5 Replies View RelatedI need a formula for: If cell c is greater than 0 and cell c is<> cell b return value of cell c in cell d; else value of cell b in cell d.
View 4 Replies View Relatedi have table of values if any value in the coulomb G and I greater than or equal to 1 the entire row must be deleted how can i do this ?
View 4 Replies View RelatedI have students Kg-5th Gr. I need to identify the ones over-aged when I enter the information. The following is what I'm trying to use but I get Y1 for ever cell. I need it to Identify the student as Y1 for One year overage and Y2 for tow years overage.
View 3 Replies View Related