Morning all,
Have been browsing this site for a while, trying to learn as much as I can about OFFSET and FIND but have come unstuck.
I would like to be able to use a userform to find a student number, and then add the student score to the next blank cell, from COT 1 onwards.
I have attached a dummy worksheet with what I would like to do, but it is proving a bit of a headache with my basic knowledge of VBA.
Many thanks in advance. :D
Last edited by maninjapan; 12-01-2011 at 01:46 AM. Reason: changed title
Any thoughts or pointers please?
Your current code actually copies the data in the Student name column instead of the scores. My question to you is, should the scores be added in the COT 1 column alone or should it be added to the other columns as well? Do you mean to say, that if the user is entering a score for a student, if COT 1 already has a value, it should move to COT 2?
If I have helped, Don't forget to add to my reputation (click on the star below the post)
Don't forget to mark threads as "Solved" (Thread Tools->Mark thread as Solved)
Use code tags when posting your VBA code: [code] Your code here [/code]
Originally Posted by arlu1201
Thank you for your reply.
What I would like the code to do is this:
1) Teacher enters the student number
2) Teacher enters the students score
3) Using the find/vlookup, to find the students number, and add the score to the next free cell, ie if COT 1 has a value, then it should move to COT 2.
Pl see the attached workbook.I have edited your userform and code.
Clarifications welcome.
Last edited by kvsrinivasamurthy; 11-30-2011 at 05:32 AM.
Dropdown menu! sugoi!
arigaou gozaimasu!
I try to use on Excel for Mac 2011 but I get "run time error '380'.
Is this because Mac?
Sorry. I don't know about MAC. It works ok in excel 2007 version.I have changed code slightly.Pl see once again.
Last edited by kvsrinivasamurthy; 12-01-2011 at 01:21 AM.
I had to use the list function
Please Login or Register to view this content.
Pl change code like this and try.
code
StudentNumber.List = Worksheets("M1").Range("A1:A" & WorksheetFunction.CountA(Range("A:A"))).Value
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks