Skip to Contents
Document

CutterTableP-PZ40 macro

Version 9

View Properties

Title:CutterTableP-PZ40 macro
Summary:Creates an LC Cutter for literary authors from the P tables using selected text. Last updated: 22 May 2006.
Description:A text file containing the macro.
Keywords:
Handle: Document-20015
Owner: Nickeson, Walt (User-54, waltn:LibStaff)
Create Date:Tuesday, June 21, 2005 12:55:14 PM EDT
Modified Date:Wednesday, January 30, 2008 12:08:28 PM EST
Modified By: Nickeson, Walt (User-54, waltn:LibStaff)
Expiration Date:
Locked By:
Abstract:
  • ' Convert the characters to uppercase for manipulation Do Char$ = Mid$( Text$, Character% ) Check% = Asc(Char$) Select Case Check% Case 32 ' If the cursor is on a space, and this loop of the macro is just ' starting, keep searching to the right until a character is reached; ' otherwise assume the end of the word has been encountered and ' create the Cutter If Counter% > 1 Then GoTo Continue: Else Counter% = 1 End If Case 39 'Skip an apostrophe Case 65 to 90 CutterString$ = CutterString$ + Chr$(Check%)...
Add Versions:Allowed
Author:
Content Type: Text Format (.txt) - text/plain
File name:CutterTableP-PZ40.txt
Is Placeholder:
Max Versions:4
Size:7527
Ready for Declare:No
Appears In: OCLC Connexion macros
Preferred Version: CutterTableP-PZ40 macro