Skip to content

vba code samples for managing Office documents/workflow/transcription

Notifications You must be signed in to change notification settings

evoingram/docmanagement

Folders and files

NameName
Last commit message
Last commit date

Latest commit

 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 

Repository files navigation

docmanagement

These are sample vba codes for managing Office documents. Some are dependent on an access database.

All code provided as is, no warranty.

I'll be explaining how all this code works and more on my blog at https://transcription.aquoco.co/.

Currently enrolled in Lambda School full-stack web development track.
freeCodeCamp: https://www.freecodecamp.com/evoingram
Hackerrank: https://www.hackerrank.com/evoingram
Pluralsight: https://app.pluralsight.com/profile/erica-ingram
Company: https://www.aquoco.co

i'm a self-taught programmer, working on a portfolio, but here's some of my VBA code for now. There's a whole bunch of good stuff here.

Short Function Description:

 AcrobatGetNumPages:
	gets number of pages from PDF and confirms with you

AddAQCExamStyle:  
	finds specific phrases in activedocument(transcript) and applies a specific style

BuildRCWsAndRCWHyperlinks:
	Acquires RCWs and their hyperlinks, validates them, and adds an entry for each one to CitationHyperlinks table
	
BuildUSCRulesandUSCHyperlinks:
	validates U.S.C. code citations and builds corresponding hyperlinks, no front matter, no appendices
	
AutoCalculateInterest:
	add 1% interest cost after every 7 days payment not made
	
AutoCorrect:
	adds autocorrect entries as listed on form (from matching table row) to rough draft autocorrect in Word
	
CDLabelMergeF:  
	makes CD label and prompts for print or no
	
CommunicationHistoryAdd:  
	adds entry to CommunicationHistory table in Access DB
	
CreateIndexBMKs:  
	replaces #TOC_# notations in transcript with bookmarks and then places index at bookmarks
	
CreateIndexesTOAs:
	creates several TOCs that are marked differently and several sections of tables of authority.
	example: separate TOCs for exhibits, witnesses, and a general index
		 separate TOAs, three sections, one for cases, one for rules/regs/statutes/code/etc, one for other authority
	
CreateWorkingCopy:
	creates "working copy" sent to client
	
FPJurors:  
	does find/replacements of prospective juror shorthand in transcript

FillInPDFfromDatabase:
	inserts page count & other transcript info into invoice PDF

FindAndReplaceCitationHyperlinks:  
	adds citations and hyperlinks from CitationHyperlinks table in transcript
	
GenerateInvoiceAndEmailWithPPButton:
	generates invoice and Outlook e-mail body to include a linked PP button
	
GenerateInvoiceNumber:
	generates invoice number
	
GenericExportandMailMerge:  
	exports to specified template from T:\Document Generator\Templates and saves in T:\In Progress\sCourtDatesID\
	
HeadersFooters:  
	programmatically adds headers and footers
	
OneNoteVBA-CreatePage:  
	Creates pages in a specified OneNote notebook
	
OneNoteVBA-GetNotebooks:  
	Returns list of OneNote notebooks
	
OneNoteVBA-GetPages:  
	Returns pages of a OneNote notebook
	
OneNoteVBA-GetSectionGroups:  
	Returns section groups of a OneNote notebook
	
OneNoteVBA-GetSections:  
	Returns sections of a OneNote notebook
	
OneNoteVBA-SearchPageTitlesReturnResults:  
	Returns OneNote pages that match a search result
	
ReadXML:  
	reads shipping XML and sends "Shipped" email to client
	
SendWordDocAsEmail:  
	sends Word document as an e-mail body with optional attachments

TCEntryReplacementPARENT:
 	parent function that finds certain entries within a transcript & assigns TC entries to them for indexing purposes

TCEntryReplacementCHILD-SingleReplaceAll
	one replace TC entry function for ones with no field entry

TCEntryReplacementCHILD-FieldReplaceAll
	one replace TC entry function for ones with field entry

WordIndexer:  
	builds word index in separate docx & PDF from transcript

WunderlistAdd:
	arguments sTitle as string, sDueDate as string, due date format YYYY-MM-DD
	adds task to Wunderlist
	
WunderlistGetAllLists:
	gets all lists from Wunderlist
	
WunderlistGetList:
	gets tasks from an existing wunderlist list

~MySQLExamples
	samples of actual queries from my database.

About

vba code samples for managing Office documents/workflow/transcription

Topics

Resources

Code of conduct

Stars

Watchers

Forks

Releases

No releases published

Packages

No packages published