' search for a string starting at a given index' and return the index of the character that follows' the searched string (case insensitive search)Function InstrAfter(Source As String, Search As String, _ ByVal index As Long) As Long InstrAfter = InStr(index, Source, Search, vbTextCompare) If InstrAfter Then InstrAfter = InstrAfter + Len(Search) End IfEnd Function

7 Ways Technology Has Changed Traditional Payments
In today’s digital world, technology has changed how we make payments. From contactless cards to mobile wallets, it’s now easier