I had a matrix like this
0 4 0 0
1 0 0 0
0 0 0 2
2 3 0 0
then I used vba to put number between 1 to 4 (since this is an 4x4 matrix) when there is a 0 in the matrix, but the numbers in row need to be no repeat??
so i need something like this for my output. Is there any code for search the number in the row?? How can I do this??
1 4 2 3
1 2 3 4
1 3 4 2
2 3 4 1
sorting data I use in a workbook for athletics. I've really chopped down my workbook for upload, In the worksheet "Leaderboard" I can call up stats for different lifts, and it finds (in this case) the top 5 lifts and the names for the kids that have those corresponding lifts.
My problem is that when two or more kids have the same lift, it will only call up the name of the first instance of that lift. You can see this in the "Leaderboard" worksheet, and the name "Adams, Andrew" appears for both lifts of 75. I would appreciate any help on how to correct this, as I've searched the Internet for weeks now looking for a solution. I've tried experimenting with different things as well, all to no avail.
I have several columns of data representing a shop operation along different years. Now I try to see how will it look like if I have 10 shops like this, all summed up. The problem is that each shop will have the same numbers as the other 9, just that it's first year of operation will be different.
Now, I don't want to have different sheet for each and every shop since their data is exactly the same. I only want to have 1 type of shop which I can add to a consolidated sheet but 10 times, and each time the first year shoud be different.
Just an example: If I have this data for my shop:
YR1 YR2 YR3 YR4
Sales: 10 12 14 16
Costs: 5 6 7 8
Operation: 2 2 3 3
Tax: 1 1 1 1
profit: 2 3 3 4
And lets say I have 4 shops opening in 2000,2001 and 2 in 2002 than my consolidated should look like this:
2000 2001 2002 2003
Sales: 10 12+10 14+12+10*2 16+14+12*2
Costs: 5 6+5 7+6+5*2 8+7+6*2
Operation: 2 2+2 3+2+2*2 3+3+2*2
Tax: 1 1+1 1+1+1*2 1+1+1*2
profit: 2 3+2 3+3+2*2 4+3+3*2
But again, I don't want to open a different table for each shop and than sum them up - I want to have only my one shop, and have a possibility to say when will I open my next shop and the consolidation will be automatically.
my document column "M" ,this type of numbers are there.
column "M"
125468A-B
125468A-B
458962
256897
412589A-C
412589A-C
412589A-C
01.i need to remove A-B,A-C part.
02.after that any number are repeating that all the number's end part should add (A,B,C,,,,)it's like this.....
[b]
column "M"
125468A
125468B
458962
256897
412589A
412589B
412589C
Okay, so this is what I am using:
[Code] .......
It is finding the name for a value from a table of values, the only problem is that there are more than one names which correspond to the same value. It doesnt matter to me which name it retrieves, but it lists the same name over and over again, where i'd prefer if it used a different name each time. Any way to keep it from using the same one?
Example1 (pcb).xls
What i need is that result of these counting is 2. Count all without repeating.
I need to find out how many different days are in these fields.
1.6.2009
1.6.2009
1.6.2009
1.6.2009
1.6.2009
1.6.2009
1.6.2009
1.6.2009
2.6.2009..........
it repeats by increasing range from RZ1 to RZ2, RZ3 till RZ50. For each of the range below calculation needs to be performed.
View 6 Replies View RelatedVBA code. My sales data is arranged as months in columns and customers in rows. I have about 36 months of data that must be formatted as a single date column for pivot table manipulation.
View 9 Replies View RelatedI am creating several worksheet where the first two rows are repeated so that I can see those two rows as I proceed down the sheet. That feature works on some but not all sheets. What am I missing? I even tried copying the pages that are correct to another worksheet and that format doesn't copy to the next worksheet.
View 9 Replies View RelatedI have the below macro that I need to have it repeat until the end of the data, I'm not brilliant with how macro's actually work,
Range("A2:Q5").Select
Selection.Borders(xlDiagonalDown).LineStyle = xlNone
Selection.Borders(xlDiagonalUp).LineStyle = xlNone
With Selection.Borders(xlEdgeLeft)
.LineStyle = xlContinuous
.Weight = xlMedium
.ColorIndex = xlAutomatic
End With
Suppose I have a following set of data in Sheet1...
FT 1
DD 2
MC 1
AD 1
EE 3
FL 2
GC 1
Under the first column, I have a series of text and under the second column, I have numbers, 1 - 4.
and I want the ouput from the data to be like
FT
DD
DD
MC
AD
EE
EE
EE
FL
FL
GC
in Sheet2, and the process will continue until there is a blank cell under the first column. Can someone help me with this? I have a very little experience in VBA.
How can I have a sub repeat itself? I have a code and I want it to ask the user at the end if they would like to do it again. If so the whole sub needs to be repeated. I'm sure this has something to do with looping, but I don't know how to manage this.
View 3 Replies View RelatedI have a list of colours from A1 to A10. This list may change, get longer or get shorter. In B1 I would like this list to repeat over and over again. but changes. I have attached the list in question, and what I would like it to do.
So to clarify - add a colour to Column A, it will add to the repeated list in Column B.
LISTA.xlsx
I have a spreadsheet in which data is dumped from a database, there is a dump (on a new tab) for each site.
I need a summary sheet which will add up the two tabs. My problem is however is that I can not use Vlookup as the same codes are used and it will only return the first occurrence.
e.g.
444588 Prime Wages/salaries
This code appears under Production prime labour and Distribution Labour but will only ever return the production prime labour value
Another example would be
444586 Ohd Wages & salaries
This code appears under Production Overhead, Site Overhead, Sales overhead and Admin Overhead this would only ever return the production overhead value only
Is there any way that I can get the summary sheet to use a formula where it looks up the department and then the code? I was thinking index and match but I was unsure if this was possible also.
Worth noting is that the summary sheet has a list of all codes that could be used but the dumps will only ever have values if a cost has been occurred, there for the number of rows in each department is not consistent. There will be a number of tabs however in the attached example I have only provided two.
Got a huge dataset with a list of non-repeating names. For example, among the dataset is about 1,500 names that dont repeat itself in a column. How can I isolate just that list of non-repeating names from that huge dataset?
View 4 Replies View Relatedrepeating the code on the same worksheet.
i am trying to input this code to my worksheet
I have some code that copies and pastes data from one cell into a range. The one cell is B4, and the range is A6:A10. This same action must be done every 30 lines (so the next time the cell is B34 and the range is A36:A40).
What do I need to do to make this action repeat/loop every 30 lines?
I have a list of energy consumption records by address. The utility that supplied the data had to manually pull each record one by one from their 'database'. If two individuals shared one account, the record is repeated.
So, I have a 500,000 row table with some records with identical addresses and identical consumption amounts. How would I go about separating the duplicates (to then delete them)?
It's sorted by address then consumption. The logic is...
if the address value in column A repeats and the consumption field in column B also repeats, then...(place a marker in column C so I can sort and delete)
I'd like to this number 48,267,135.91 to read as follows:
48,000,000
I tried combine both the substitute abd the Mid functions didn't work?
I have completed the first section of my spreadsheet.
Section 1 has a number of mandatory fields. Once these are complete and the user changes a combo box then Section 2 opens
I now want to repeat the same again for section 2. Making fields mandatory before a user can change a combo box to yes, which then opens Section 3
From looking around the forum / google I think I can only have one worksheet_change per sheet. If this is the case, how do I now start my next section (to basically repeat Section1 again)
The code I have is:
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Range("E20"), Target) Is Nothing Then
'Section 1
Range("A22:A130").EntireRow.Hidden = True
[Code] ........
I have a file that I converted to excel and am trying to now convert from rows to columns. So far I have set up the code to do it 3 times but need it to repeat every 12 rows. Here is what I have so far:
Sub rowtocolumn()
'
' rowtocolumn Macro
[Code]....
Not sure what to do to make it repeat?
I'm trying to repeat a pattern which outputs 4 equal numbers and then increments that number by 1 for another four row as follows
1
1
1
1
2
2
2
2
and so on
how to do this?
I have a macro which is shown below.
Range("E1").Select
Application.CutCopyMode = False
Selection.Copy
Sheets("Sheet1").Select
Range("A3").Select
ActiveSheet.Paste
Sheets("Sheet2").Select
Range("I1").Select
Application.CutCopyMode = False
Selection.Copy
What im trying to do is to be able to run the same macro but start on the last cell that I had selected and work on down the sheet until the end. What im also trying to do is to be able to post into next avail line on sheet 1 so it dosent overwrite.
I have a macro that is working fine. It calculates some values based on a SQL database and then copy the values and paste them into another spreadsheet.
However, I need to repeat the same procedure 1296 times.
Please see below the macro.
Sheets("QUERIES").Select
Range("C1").Select
ActiveCell.FormulaR1C1 = "2"
Range("C5").Select
Selection.QueryTable.REFRESH BackgroundQuery:=False
Range("D5").Select
Selection.QueryTable.REFRESH BackgroundQuery:=False
Range("C5:G5").Select
Selection.Copy
Sheets("AWB RANGE").Select
Range("K2").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
I need to increment the line #3 (ActiveCell.FormulaR1C1 = "2") that should start with 2 and end with 1296.
Also, I need to increment the line #11 (Range("K2").Select) that should start with K2 until K1296.
The other parts of the macro will not change.
Would you be able please to give me a hand on this explaining how to create a counter to start on 2 and stop with 1296 ?
I'm having trouble delivering a MAX value within a range.
In column A I have a running list of numbers, in column B I have a yes or no answer and in column C I'm trying to write a formula that will deliver a MAX value from the A column inbetween occurancies of the Yes and No values from the B column.
I'm trying the SUMIF function but it seems to be proving problematic.
This is what it would look like.
A B C
1 Y 1
2 Y 2
3 Y 3
2 Y 3
1 Y 3
2 N 2
7 N 7
6 N 7
5 N 7
3 N 7
2 N 7
6 Y 6
9 Y 9
3 Y 9
It is almost as if I'm trying to get the formula in the C column only find the latest MAX value from where it currently is to when the last changeover happened from Y to N.
I can't find the Max dependent on a yes or no answer, but I'm struggling to make it only look at the last batch of Yes's or No's!
I download an extract from our company's website (.csv). After that, I need to do certain actions (such as deleting certain rows etc.).
The parts I am struggling with in VBA is:
- I need to trim B:B and give back the values to the same cells it came from;
- I need to add three columns behind the data: a date (same for all rows), a simple sum of two cells (A2-D2), and a vlookup.
I vaguely remember that I need to build a loop until the end of the rows (number of rows varies with every download, column headers are the same always), but I cannot remember how.
It has several steps and i will now just explain the least complicated one, and hopefully once i get this done i will figure out the rest myself. If not then i will need some more help
I have 500 entries (names) in column A and each entry has a coresponding category in Column B (Large, Medium, Small).
I want to see how many entries are there for each category, but i need to count the names which appear in the list only once. If the name is entered more than once then i dont need to count it.
I hope i made it clear as i am not able to provide excel table as an example do to security settings.
I am usinng Excel`03
How can I modify the codes below so that the results in the listbox would reflect only the actual data? Some previous information stays in the listbox making the search inaccurate. I have tried to clear the listbox first before querying another but results are the same.
On the first loop, the queried items are accurately listed in Worksheets("Search"). For example, if the data being searched on has only one result, entries in this sheet would only show one. But when it is shown in the listbox, it at most times show previously queried information.
Also, how can I dynamically adjust the array so that no vertical scrollbar would appear if the queried results fit perfectly in the listbox? The array below would automatically assign 10 rows in the listbox even if the information shown consumes only less than 10 rows.
Option Explicit
Dim MyArray(10, 5)
Public MyData As Range, c As Range
Sub FindCaseNo()
Application.ScreenUpdating = False
Dim FirstAddress As String 'what to find
Dim rSearch As Range 'range to search
Dim fndA, fndB, fndC, fndD, fndE, fndF, fndG As String
Dim fndH, fndI, fndJ, fndK, fndL, fndM, fndN, fndO, fndP, fndQ, fndR, fndS As String
Dim head1, head2, head3, head4, head5 As String ' heading s for list
Dim i, intFind, intCount As Integer
i = 1
I made a code that automatically checks the date and then compares it to the date of the last save. If it is a new date then the colors of the tabs will randomize. It can also be done manually via a button. The problem is that I have now realized that the colors are always have the same pattern. Every day the first color is an orange color, no matter how many times I randomized yesterday...and so on. Is there a way to make the randomness not have a repeating pattern?
Sub MMVII_4_9_b()
Dim NewDate
If Sheets("Scrappaper"). Range("F2") = Date Then
NewDate = 0
Else
NewDate = 1
End If
'Determines whether it is a new day or not
Sheets("Scrappaper").Range("F2") = Date
'Updates the date
If NewDate = 0 Then
'Does nothing if the date is the same
Else
I have a column that tells whether an adjacent cell is positive or negative. I'm trying to come up with a macro/formula that will tell me how long (# of rows going down) a negative or positive sign repeats before changing.
So it would go down the column and count the rows where the same sign repeats. Once the SIGN switches from + to - or - to + the number goes back to 0. Essentially counting the cells that move in one direction (+ or -).
For example. if A1 = +, A2 = +, A3 = +, A4 = +, A5 = -, A6 = + then it would count A1:A4 and output 4 in B4, meaning that the numbers have stayed negative for 4 rows. For A4:A5 nothing should appear as this sign change we don't want to record. Same for A5:A6. I don't know how to make a formula/macro to identify a repeating SIGN, and then dynamically count all those rows until the sign changes. Does this make sense? I've been beating my head against the desk trying to figure it out with no luck.