Replies

Hi,
A quick fix would be: Change your lookup table to 1 – fail, 40 – pass, 76 – merit
This would mean, 1 to 39 = fail, 40 to 75 = pass and 76 and over = merit
Also, grade or points reference should be cell reference (G18 etc.)
Max

Hans,
This macro works fine, with a few modifications to suit my particular situation.
I thank you very much.

I think the credit for this goes to Hans, however, if it is someone else, I apologize
This function will count unique items in a list:

Function CountUniqueValues(InputRange As Range) As Long
Dim cl As Range, UniqueValues As New Collection
Application.Volatile
On Error Resume Next ‘ ignore any errors
For Each cl In InputRange
UniqueValues.Add cl.Value, CStr(cl.Value) ‘ add the unique item
Next cl
On Error GoTo 0
CountUniqueValues = UniqueValues.Count
End Function

You would then use CountUniqueValues(a1:a50) or whatever range

Hans & Jan
IInstead of: Sheets(“Scores”).Range(“B66536”).End(xlUp).Offset(1, 0).PasteSpecial xlValues
on 1 line I used: Sheets(“Scores”).select
Range(“B65536”).End(xlUp).Offset(1, 0).Select
Selection.PasteSpecial xlValues
This seems to work but I don’t know why

At any rate, you guys got me aimed in the right direction.
Thanks tons!

Hans & Jan
IInstead of: Sheets(“Scores”).Range(“B66536”).End(xlUp).Offset(1, 0).PasteSpecial xlValues
on 1 line I used: Sheets(“Scores”).select
Range(“B65536”).End(xlUp).Offset(1, 0).Select
Selection.PasteSpecial xlValues
This seems to work but I don’t know why

At any rate, you guys got me aimed in the right direction.
Thanks tons!

Hans,
Thank you for your immediate reply. The only problem is the macro stops at:
Sheets(“Scores”).Range(“B66536”).End(xlUp).Offset(1, 0).PasteSpecial _
xlValues
Any idea why?
Thanks

Hans,
Thank you for your immediate reply. The only problem is the macro stops at:
Sheets(“Scores”).Range(“B66536”).End(xlUp).Offset(1, 0).PasteSpecial _
xlValues
Any idea why?
Thanks

Legare,
This is exactly what I was looking for. Thank you very much, I really appreciate it.

Legare,
This is exactly what I was looking for. Thank you very much, I really appreciate it.

Subject Edited by HansV to make it more descriptive than “Excel”

I have a problem with an Excel worksheet that I can solve with code but it takes alot of it. This problem relates to golf and a league I’m setting up for the year. On sheet1 I have i.g. 20 names in Col A and their newly updated handicaps in Col B. On sheet2 I have 100 names in Col A and their last years handicaps in Col B. What I would like to do is replace the handicaps on Sheet2 Col B with the newly updated handicaps from Sheet1 Col B. The names on sheet 1, Col A, will not be in the same order as the names on Sheet2 Col A. Sheet1 contains the golfers playing the current week which will change from week to week.
Hopefully I have submitted enough information. I would like to do this with alot less code.
Thank you,
Max

I made the changes to my registry as you suggested. Then corrected file associations. So far (finger crossed) things seem back to normal. I sure don’t have a clue as to how “konvertor” got on my machine but I’m glad it’s gone.
Many thank you’s to all who provided the input that corrected my problems. Thank you very much!

When I double click an image file I get the message “Windows cannot find PSP.EXE. This program is needed for opening files of type ‘JPG File’. So, my image file doesn’t open.
I would like PHOTOED to be my default viewer. ( c:program filescommon filesmicrosoft sharedphotoed ) which used to be until something wierd happened. I corrected the path for PSP.EXE ( which is Paint Shop Pro ) so now when I double click the image file it opens in PSP. I guess my question now is, “How do I change the default viewer?”

O.K. people, attached is a text file containing all the references to “konvertor” in my registry. I surely hope some of you can make sense out of it. I surely can’t. When I run the program “System Mechanic” it shows most of these entries (I haven’t compared them item by item) but to date, I haven’t deleted any of them. I’ve never installed the program “konvertor” on my computer. I do have Paint Shop Pro. So…………..what’s going on???

Attached is the startuplist txt file. I went into windows explorer and checked views. Under “hidden files” it just shows “show all files”. Nothing says “show hidden files”. I must be missing it somewhere. I think I gotta be led.

I did a c:windowssystemkonvertor.dll search but came up with nothing. Under my folder options I have checked to show all files. I did do a search of my registry and found all kinds of references to “konvertor”, but I opted to do nothing since I know very little about the registry. I do have “Systems Mechanic” and that showed alot of references to “konvertor” but I didn’t delete them. I don’t know if I deleted those references something else wouldn’t work or not.