I'm having trouble at getting the overall fastest time to show up. There are tree racers in two heats. Also the times are set up like 0;00.000 because i cant get it to work like MM:SS:MS .
Daytona GTR34.xlsx
Formula to calculate time allotted minus time used and show the difference in hour and minute.
View 1 Replies View RelatedWhat's the fastest way to accomplish the following:
I have many of these in my code and inside nested loops, so they significantly slow down my code
jRow = Worksheets("Sheet4").Columns("O").Find("orange", _
LookIn:=xlValues, LookAt:=xlWhole).Row
I thought i had worked it out, but for some reason the names aren't updating when i add a new time, and the same names appear when i add the same code for a different track. I was using this code {=INDEX(A2:A32,SMALL(IF(C2:C32<>0,ROW(C2:C32)),1),1)} as you can seen in cell A34, then added a 2 onto it for the second fastest time eg.....{=INDEX(A2:A32,SMALL(IF(C2:C32<>0,ROW(C2:C32)),2),1)}, but doesn't seem to update when adding a new fastest time in. Am i using the wrong code to match the names with the fastest times?
View 4 Replies View RelatedI have a large data (more than 50k rows) in a spreadsheet and i want to consolidate the information's.
here is the sample source data.
Source Data
codeamt1amt2amt3
123456$16.00 $0.00 $0.00
789011$0.00 $18.00 $0.00
123456$12.00 $5.00 $0.00
123456$0.00 $0.00 $7.00
111111$11.00 $1.00 $3.00
789011$22.00 $0.00 $0.00
and the output should be.
Output
codeamt1amt2amt3
123456$28.00 $5.00 $7.00
789011$22.00 $18.00 $0.00
111111$11.00 $1.00 $3.00
currently i'm using the consolidate function of excel inside my vba (which is working fine) but i took forever before it finished, i'm just wondering if there is an alternative way which is more faster.
I have workbook #1 sheet1 that is linked to a master workbook sheet1. The master workbook has a bunch of sheets. I need to make copy of my sheet1 in workbook #1 and change the links from a sheet1 in my master workbook.
So for example, if my worksheet in workbook#1 is linked to master workbook in worksheet1 tab1, i want to make a copy of my sheet in workbook#1 but now have it linked to tab2 in the master workbook.
I know i can just highlight and do a find replace right? Is there a faster way to do this because i have a bunch of sheets.
I got a lot of cells that i would like to save to a worksheet database
What is the best way to do it? Is building a text string containing the datas ,separated them with coma, then convert this textstring in the database is a good way to do it
I currently have almost 20,000 rows of data and I am filting down to a particular value in column D. However, as the filter runs you can see that after it finds the fields it keeps running like it should to the end to make sure there are no additional values. Is there some faster way to search this many lines? Would it be faster to sort the worksheet first and then do something with a sorted worksheet or what are my other options?
How can determine if a range is empty without looping it till the first value is found? On a 5x5 range a for loop is not that bad but what if its the whole worksheet? Is there a fast way to do this?
View 3 Replies View RelatedI have a bit of code that deletes row by row and takes a long time to process. I've seen people suggest deleting by range processes more quickly. How can I modify this to delete by range?
lngLastRow = Sheets(2).Range("A65536").End(xlUp).row
For lngRowCount = lngLastRow To 1 Step -1
If Application.WorksheetFunction. CountIf(Sheets(2).Range("A1:A" & lngRowCount), Sheets(2).Range("A" & lngRowCount)) > 1 Then
Sheets(2).Range("A" & lngRowCount).EntireRow.Delete
End If
Next
I have a plot of data in a chart. I've added a worksheet to the same workbook which has data that I want added to this plot. The data is in the SAME columns/rows, the only difference is the worksheet name. I'm looking for the quickest way to add the data to this chart as I have to do this many number of times. Perhaps if possible to somehow copy the
=SERIES("Title",sheet_name!$A$11:$A$18882,sheet_name!$R$11:$R$18882,5)
And paste it back in with just a sheet name change?
I have a loop that executes roughly 7.7 million times when my VBA program runs. Neednless to say it take a long time to run - usually a couple days.
The inner-most loop contains a line of code from way back in my early vba programming days when I knew even less than the small amount I know about programming now (and if you can follow that sentence you might be able to understand some of the spaghetti code I write :-) ).
for k = 1 to n
if Worksheets("Personell").Range("D" & Trim(Str(k))) > dtCompleted then ...
Would it be faster to use this syntax (which I just found out about):
if Worksheets("Personell").Cells(k,4) > dtCompleted then ...
It would cut out 2 functions calls, trim() and str(), so it would be faster, right?
I am almost embarassed to post the Range("D" & Trim(Str(k)) line of code because it looks so convoluted now, but that's how I learned to program, just fumbling through until it ran...
So in short, I just wanted to confirm that the cells() syntax run faster before I spend an hour editing and tested.
for example i have this data in rows B and D:
austriaaustria
icelandaustria
austriaiceland
austriagermany
icelandaustria
germanyiceland
germanygermany
germanyiceland
germanyiceland
germanyiceland
germanyiceland
germanyiceland
austriaiceland
austriaiceland
and need to input in rows A (date in this example) and C(number in this example) which are adequate for each country so to look like this in rows A,B,C,D:
19 20 austria1,25austria
20 30 iceland1,25austria
19 20 austria2,2iceland
19 20 austria6,6germany
20 30 iceland1,25austria
22 00 germany2,2iceland.......
I'm trying to count the number of unique values from a list of over 8,000 records -- and it's very likely that nearly all of the records are unique. At the moment, I am keeping track of an array where I store every unique value I find, expanding the array and adding values as I go, and at the end return the size of the array to tell me how many unique values there are in the range. My method works, but it is very slow, even when I turn on manual calculation.
Here is what I have so far:
Function CountUniqueCases(inputRange As String)
Dim i, j As Integer
Dim cCaseID As Range
Set cCaseID = Worksheets("Results").Range(inputRange)
Dim uniqueCases() As String
Redim uniqueCases(1)
uniqueCases(1) = cCaseID.Cells(1).Value
Is there a faster way to do this? I was hoping there was an array search function built in to VBA, but apparently not. My first attempt at running this function returns about 7904 out of ~8000 as being unique.
I have a range of purchase order rows, with the formulas stored in the first row (TemplateRow) which is hidden. The users may add any number of rows to this range, depending upon the number of different products being purchased.
Code:
'Copy the template row into the first newly inserted row
Rows(TemplateRow).Copy Destination:=Rows(insertionPoint)
'fill down from the inserted row down to the last new row
With Rows(InsertionPoint & ":" & NumberOfInsertedRows.Rows.Hidden = False
.FillDownEnd With
The problem is copying the formulas down to the new rows can take terribly long (minutes) in scenarios of thousands of products. Is there a faster method of copying down my formulas?
Basically each line signifies a date & time that a deposit was placed and a date & time that a withdrawal was actioned. My goal is to be able to determine what kind of average response time we have between the time a withdrawal was requested and the time a withdrawal was actioned.
View 2 Replies View RelatedI have a macro which downloads data from website. But takes some more time to complete a work. I want that a time should display at the bottom bar of excel where "Ready" is written. THe time should be in hh.mm.ss format.
View 9 Replies View RelatedI have an excel spreadsheet that has about 40,000 rows....and about 30 columns across. The two columns I'm writing this about is column "PO#" and column titled "VALUE". The PO# column will have a number such as 4500234567...and the value column will have the cost of the PO#, for example $5,000.
Now within the the spreadsheet the PO# number and value will be listed multiple times....and there are hundreds of PO#'s listed, with its value.
I would like to perform some kind of filter on a seperate worksheet (? or whatever i needed) that would show the PO# number and value once.
I need a MsgBox to show one time for five seconds, and not repeat.
Here is a sample of where I'm at. But this code repeats.
Public Sub timebox()
MsgBox "Let Me See You Work"
Application.OnTime When:=Now + TimeValue("00:00:05"), Name:="timebox"
End Sub
I am trying to create a spreadsheet that will show vacation time; accrued, taken, leftover. There are different accrual rates for years of service, and caps on carryover.
I have been trying to figure this out, however the accruals for employees over 1 year are higher than they should be.
Breakdowns are as follows:
1-2 years - 1 week vacation - 40 hours eligible for carryover each year
3-4 years - 2 weeks vacation - 80 hours eligible for carryover each year
5-9 years - 3 weeks vacation - 120 hours eligible for carryover each year
10+ year - 4 weeks vacation - 160 hours eligible for carryover each year
I have data entry in a spreadsheet which shows minutes, seconds and thousandths of a second - example looks as follows:
12:48:589 or 04:21:998. I would like to be able show the time difference between two data entries, so for example:
09:57:145 and 08:12:055 would give a difference of 1:45:090
12:07:985 and 18:59:788 would give a difference of 6:51:803
To be honest, I even struggled to work out the values on paper. Is this even possible? If so, can you let me know the number format I should be using as well as the formula or even better, post an excel sheet with the example.
How to use conditional formatting to show a certain criteria. I need to know if an event happens between 07:30 and 16:30, I can work this out so that the cells show in green. I cannot solve the problem of formatting in red if the time is after 16:30 but before 07:30.
=IF($E3>=$P$3,IF($E3<$Q$3,TRUE,FALSE))
P3 = 07:30 and Q3 = 16:30
I have 2 cells in which time is given in format hh:mm:ss , I have differentiated both whatever difference is their between them it get showed in different cell , but my cell is not showing exact time difference its showing up as ######.
View 6 Replies View RelatedI have a spreadsheet which shows information based on what a person has picked and how long it took them to pick.
What I now want to show is an extract which will show - in a separate area - what shift & person still has not completed the pick (completed time section remains blank) together with the type of product they are picking plus the 'operation number'.
My current spreadsheet is as follows;
[IMG]C:Documents and Settingschristine.lawsonDesktop[/IMG]
Table shows as follows:
SHIFT
PRODUCT TYPE
MSN
OP NBR
PICKER NAME
DATE PICKED
START TIME
COMPLETED TIME
OVERALL TIME TAKEN
AVG LINES PER HR
BLUE
T&F
4
001
FRED
6/11/12
17:55
18:40
00:45:00
4
[Code] ........
As you will see from the attached picture/table there are 2 lines which do not have 'completed' times shown. It is lines, such as these that I need to be able to show in a separate area.
I want to make a Word Clock. Instead of showing the time as "12:30" I want it to show the words "It is half past twelve"
To Do this I've created a Square of Letters on an excel sheet (one letter per cell!) with black letters and black back grounds, when it is 12.30 I want the relevant letters to (cells) to change the text coulor to white so it shows up.
The cell I'm using are from D8 to P19 and the time is shown in A1
So lets say at 12.30 Cells D9, F12, H14 and M16 need to change from Black Text Colour to White Coulour,
I need a code or some VB that says "If A1 = 12.30 the Cells D9,F12,H14,M16 = White Text Colour, if not Black Text Colour".
I'm working with data as displayed below. My objective is to create a table by Model with summed quantitiies in two columns representing On-Time and Late. On-Time is achieved when Date Shipped is on or before the Promised Date. I have included the required format to be achieved in the second example. I'm willing to work with macros or VBA for the solution. I just need guidance to learn how to accomplish this task.
CREATE TABLES LIKE BELOW?
----B---- -----C------ --D-- ----E-----
6 Promised Date Shipped Inspection
7 Date Mod #
8 11/30/07 11/01/07 780 15216
9 10/10/07 11/01/07 230 15174
10 11/20/07 11/07/07 665 16314
11 9/13/07 11/07/07 230 15008
12 12/10/07 11/08/07 780 14452
13 11/15/07 11/08/07 780 15233
14 12/18/07 11/12/07 665 15219
15 12/3/07 11/12/07 780 15224
16 10/14/07 11/12/07 230 15011
CREATE TABLES LIKE BELOW?
-N-- ---O--- -P--
7 Mod On Time Late
8 225
9 230
10 335
11 555
12 665
13 780
14 1120
I have two sheets. In the first sheet, I have cell F4 is 00:00:00 (countdown). G9, G10 and G11 are cells that receive data (decimal numbers) live. In the second sheet, I have three cells linked from shhet1 G9 ='Sheet1'!G9, G10 ='Sheet1'!G10, G11 ='Sheet1'!G11 (which update themselve when data is modified in the first sheet). Now I want to set in sheet 2, (assume) cells B9, B10 and B11 to show me (copy) the values from G9, G10 and G11 from sheet 1 when the countdown was 00:00:05 (5 seconds before Start) and not update again if the data changes in the cell it pulled the data from.
Like G9 ='Sheet1'!G9 at 00:00:05 and stop here, do not update anything. OK?
I can do a part, but the real problem is: I can not make it stop cells to update.Stand frozen, freeze, not move, calm .. however. I do not want to seem pretentious (but my knowledge in excel are limited), the most appropriate would be a formula, not macro or VBA, if possible..
I have a column filled with dates in DD/MM/YYYY format. They go back to 2006.
I want to filter all dates from last monday onwards how do you do this?
How to show progress bar for both percentage completion and time left.
The code below is already created with percentage completion. Just to add time left.
[Code] ........
I have columns in my spreadsheet that will be getting updated periodically with a number. 1 week it might be 24, the next it might be 26.... and they would go in January's price, February's price....
The problem is, if a price is entered into the column, we don't know when it was entered other than the fact that it was entered in that month.
Is there a way to show the date and time of when a number gets entered or edited in a cell? This date/time could perhaps show up in a column right next to it.