Skip to Contents
Document

ChangeCase macro

Version 3

View Properties

Title:ChangeCase macro
Summary:Changes the case of selected text. Last updated: 5 September 2007.
Description:A text file containing the macro.
Keywords:
Handle: Document-27020
Owner: Nickeson, Walt (User-54, waltn:LibStaff)
Create Date:Tuesday, September 4, 2007 12:21:06 PM EDT
Modified Date:Wednesday, January 30, 2008 12:03:44 PM EST
Modified By: Nickeson, Walt (User-54, waltn:LibStaff)
Expiration Date:
Locked By:
Abstract:
  • " ) If p > 0 And p < Len( CaseSentence$ ) Then Mid$( CaseSentence$, p + 2, 1 ) = Chr$( Asc( Mid$( CaseSentence$, p + 2, 1 ) ) - 32 ) End If Start% = p + 1 Loop Until p = 0 ' For Initial Case, take the string just transformed for ' Sentence case, and make every character following a space ' uppercase CaseInitials$ = CaseSentence$ Start% = 1 Do q = InStr( Start%, CaseInitials$, " " ) If q > 0 And q < Len( CaseInitials$) Then If Asc( Mid$( CaseInitials$, q + 1, 1 ) ) > 96 And Asc( Mid$( CaseInitials$, q + ...
Add Versions:Allowed
Author:
Content Type: Text Format (.txt) - text/plain
File name:ChangeCase.txt
Is Placeholder:No
Max Versions:4
Size:6602
Ready for Declare:No
Appears In: OCLC Connexion macros
Preferred Version: ChangeCase macro