If excel school were to be a bar, this post is your last call. Come one, come all and order the course now.
Click here to sign-up for excel school
(on a lighter note, if excel school were to be a pie, we wouldn’t be having this conversation :P)
How many students have joined the school?
At the time of writing this post (Around 11pm on Feb 16) we have 94 students signed up. That is quite a bit more than what I expected. While I am a tiny bit scared, I am very keen to help as many more people as possible. So, go ahead and join the program, because I don’t know when I will re-open it.
Clarification about PayPal:
Few people have e-mailed me and asked, “I don’t have PayPal account, how do I sign-up?”.
Well, you don’t need a PayPal account if you use the one-time payment option. All you have to do is click on the link that says “Continue without creating a paypal account”. See this screenshot.
(You must create a PayPal account if you choose monthly payment option. This will give you ability to review your payment every month.)
When is it closing exactly?
I will be closing new registrations by 11:59 PM (Pacific Time) on today. Pacific time is GMT-8:00. See the below list to know when exactly the registration closes at your time zone.
Will the school re-open later this year?
That is my plan. But I don’t know if my kids permit me to fool around too much. You see, by then they would be talking.
So, Sign-up already!
Click here to sign-up for excel school
Bonus Excel Tip: How to convert times from one time zone to another?
Just because 100 people are joining excel school doesn’t mean that rest 7,900 of you should read a sales pitch. So here is a bonus tip.
If you want to convert times from one time zone to another (like above), you can use simple date arithmetic.
- Enter the date and time you want to convert in a cell (say in A1)
- Now, let us say you want to convert this to time zone 6 hours ahead of it.
- Simply write the formula
=A1 + 6/24to get the time in new time zone. - Hint: change
+6/24to-7/24if you want time in a zone that is 7 hours behind.
That is all. Happy time traveling.
PS: You would need a real time machine if you miss the dead line for excel school sign-up. You know what to do.
6 Responses to “Make VBA String Comparisons Case In-sensitive [Quick Tip]”
Another way to test if Target.Value equal a string constant without regard to letter casing is to use the StrCmp function...
If StrComp("yes", Target.Value, vbTextCompare) = 0 Then
' Do something
End If
That's a cool way to compare. i just converted my values to strings and used the above code to compare. worked nicely
Thanks!
In case that option just needs to be used for a single comparison, you could use
If InStr(1, "yes", Target.Value, vbTextCompare) Then
'do something
End If
as well.
Nice tip, thanks! I never even thought to think there might be an easier way.
Regarding Chronology of VB in general, the Option Compare pragma appears at the very beginning of VB, way before classes and objects arrive (with VB6 - around 2000).
Today StrComp() and InStr() function offers a more local way to compare, fully object, thus more consistent with object programming (even if VB is still interpreted).
My only question here is : "what if you want to binary compare locally with re-entering functions or concurrency (with events) ?". This will lead to a real nightmare and probably a big nasty mess to debug.
By the way, congrats for you Millions/month visits 🙂
This is nice article.
I used these examples to help my understanding. Even Instr is similar to Find but it can be case sensitive and also case insensitive.
Hope the examples below help.
Public Sub CaseSensitive2()
If InStr(1, "Look in this string", "look", vbBinaryCompare) = 0 Then
MsgBox "woops, no match"
Else
MsgBox "at least one match"
End If
End Sub
Public Sub CaseSensitive()
If InStr("Look in this string", "look") = 0 Then
MsgBox "woops, no match"
Else
MsgBox "at least one match"
End If
End Sub
Public Sub NotCaseSensitive()
'doing alot of case insensitive searching and whatnot, you can put Option Compare Text
If InStr(1, "Look in this string", "look", vbTextCompare) = 0 Then
MsgBox "woops, no match"
Else
MsgBox "at least one match"
End If
End Sub