![]() |
|
![]() |
|
Thread Tools | Display Modes |
|
#1
|
||||
|
||||
![]() Quote:
Code:
Sub EmbellishCell(cll, x, z, Absences, Lates) CuttingSizeAM = 1: CuttingSizePM = 1 If x(Application.Match("Absent AM", z, 0) - 1) = True Then Absences = Absences + 0.5 If x(Application.Match("Absent PM", z, 0) - 1) = True Then Absences = Absences + 0.5 If x(Application.Match("Late AM", z, 0) - 1) = True Then AddTriangle cll, "AM", "LATE", 1 Lates = Lates + 1 CuttingSizeAM = 0.5 End If If x(Application.Match("Late PM", z, 0) - 1) = True Then AddTriangle cll, "PM", "LATE", 1 Lates = Lates + 1 CuttingSizePM = 0.5 End If If x(Application.Match("Cutting AM", z, 0) - 1) = True Then AddTriangle cll, "AM", "CUTTING", CuttingSizeAM Absences = Absences + 0.5 End If If x(Application.Match("Cutting PM", z, 0) - 1) = True Then AddTriangle cll, "PM", "CUTTING", CuttingSizePM Absences = Absences + 0.5 End If End Sub |
#2
|
||||
|
||||
![]()
Thank you again Cal. I feel guilty monopolizing your time in this forum. this thread had gone 4 pages already. I can't thank you enough so God bless you. I created a userform for data entry and I am now trawling the web for codes that would make the command buttons run.
![]() |
#3
|
||||
|
||||
![]()
Hi there.. I copied the enhanced macro that Cal posted for the SF2 into my own workbook. I tried creating a quick button for "reset" by inserting a shape >> assign macro>> then selected reset in the macro list but it jumped to a new module instead of the module in which I pasted the codes. I cancelled the new module, copied the "reset" button of Cal's worksheet then pasted it in my own. But when I clicked on the reset button, it opened Cal's file. How do I create a button from the "reset codes" of my own sheet?
|
#4
|
||||
|
||||
![]() Quote:
Quote:
'cancelled'?! What does this mean? There are 3 ways you can try to be sure that you're choosing the right macro in that dialgue box: 1. Choose This Workbook in the Macros in: field: 2. Close all workbooks except the one you're working on. 3. Rename the copied macro to say ResetMe then you'll be able to identify it for certain in that dialogue box. (Who's Cal? He seems to just beat me to it each time, and yet I can't see any of his posts.) |
#5
|
||||
|
||||
![]()
understand 'jumped to a new module' - When I clicked Assign macro, a new module is opened where i was asked to enter the codes
'cancelled'?! What does this mean? - I deleted the automatic "private sub" codes in the new module above Rename the copied macro to say ResetMe then you'll be able to identify it for certain in that dialogue box. - The ResetMe name did it. The ResetMe button is now running okay. (Who's Cal? He seems to just beat me to it each time, and yet I can't see any of his posts.)[/quote] - I am so embarrassed by my assumption that I could shorten your username to Cal. I feel uncomfortable communicating to somebody without mentioning for once the name of the person I am having a conversation with. I'm very sorry if i overstepped the bounds by seemingly getting too personal with addressing you as Cal. |
#6
|
||||
|
||||
![]()
Don't take this too seriously.
|
#7
|
||||
|
||||
![]() Yeah, I know. Can i post a picture in this thread? I would like to post a picture of the core group of teachers from the public schools and mission-oriented teachers of an Anglican Church school who are being trained in the program that this forum helped create. |
![]() |
|
![]() |
||||
Thread | Thread Starter | Forum | Replies | Last Post |
New learner need help - convert tables in word format to ppt slides. | sas | Word VBA | 5 | 09-21-2017 08:33 PM |
![]() |
dwirony | Word VBA | 1 | 01-03-2017 01:01 PM |
Need conditional formatting formula | namedujour | Excel | 1 | 05-27-2016 08:58 AM |
![]() |
teza2k06 | Excel | 1 | 08-22-2014 02:49 AM |
Conditional Formula | UICOMP | Excel | 1 | 05-18-2012 12:59 PM |