Posted by Aladin Akyurek on December 04, 2001 12:16 PM
Troy --
Activate an empty cell, type =, select 10 rows of your auction data, and hit CONTROL+SHIFT+ENTER at the same time. Activate this cell again, got to the Formula Bar, select the formula, hit F9, copy what you see between two braces and paste it in the follow up post.
Aladin
=========
Posted by Troy on December 04, 2001 5:29 PM
I guess I should have been more descriptive:
{"Item","Amount","MaxBid","Name";
"Item 10",10,0,"karen10";
"Item 11",15,22,"CJ Ned";
"Item 11",12,15,"Mary Jane ";
"Item 12",32,32,"Mary Jane ";
"Item 13",20,22,"Mary Jane ";
"Item 13",20,22,"Mary Jane ";
"Item 15",15,20,"Mary ";
"Item 16",15,16.69,"Cheryl "}
The first line is the header row. Some bids have
only onebid, while others have many. Thanks
Posted by Aladin Akyurek on December 05, 2001 7:55 AM
Troy --
Thanks for providing the sample data. It looks like I expected.
I'll assume that A1:D9 houses this sample data.
We need a unique list of auction items say in F. In order to get this list there:
activate A2
activate Data|Filter|Advanced Filter
enter as List Range: $A$1:$A$9
check Copy to another location
enter $F$1 for Copy to
check Unique records only
click OK.
Enter "Highest Bid" and "Name" in G1:H1.
In G2 enter: =SUMPRODUCT(MAX(($A$2:$A$9=F2)*($C$2:$C$9)))
In H2 enter: =INDEX($D$2:$D$9,MATCH(G2,$C$2:$C$9,0))
Select G2:H2 and dubble click on the little black square of H2 (or just copy down the selected cells as far as needed.
I believe the above covers what you want. I expect that there will be always a single maximum bid value for each time at any time.
Note. I don't understand the bit [ if "max bid" is higher add .50 to
the nighest bid ] that appeared in your original post. If this is something I overlooked, let me know.
Aladin
=========
Posted by Troy on December 05, 2001 8:59 AM
Hi John,
You can use the OnTime method of the Excel application object to schedule you macro to run a a particular time. Say your macro is named "PrintReport". To schedule the macro to run at midnight, run this macro:
Sub SchedulePrint()
Application.OnTime Date()+1, "PrintReport"
End Sub
Your PrintReport macro must be in a macro module rather than a worksheet or workbook event code area. The Date()+1 argument simply sets the time to run the macro to 00:00:00 tomorrow. And of course, as you mentioned, Excel and the workbook containing the macro will have to be open from the time you run SchedulePrint to midnight.
Keep that water clean.
Damon
Posted by Aladin Akyurek on December 05, 2001 10:02 AM
Troy: Have a look at your latest post. It's not yours...
Posted by troy on December 05, 2001 2:59 PM
Re: Troy: Have a look at your latest post. It's not yours...
I just noticed that!
What I sent (no telling where it is), is that That
should help me. The second part that adds to the
puzzle is the max bid.
2 bids:
Tom bid: 10 max: 15
Bob bid: 14 max: 20
We would want to increase Bob's bid to 15.50 since
we maxed out Tom's bid and then increased that by
$.50.
Hope this post
Posted by Aladin Akyurek on December 06, 2001 11:11 AM
Re: Troy: Have a look at your latest post. It's not yours...
Troy --
I don't think I understand what is needed. I don't know much about auctions and the rules that are used. If you like, you can send me a copy of the relevant worksheet(s) along with somewhat more elaborate explanation and expected results.
Regards,
Aladin