Sure.  You should create a table with each region in a separate record.
Call it tblRegions.  You could have the region name or whatever in it, but
one field it must have is RegionID.  Base your report on a query called
NewQuery (actually, it can be anything you want, but in the example below,
it's called NewQuery).  Then you'll need some code to create your query over
again, once for each region, using the values in the tblRegion table.  Once
you've created the query, you Output your report to a file in the RTF
format.  The code would look something like this:

'*********************************
Dim db As Database
Dim qdf As QueryDef
Dim strSQL As String
Dim rsCriteria As Recordset

Set db = CurrentDb
Set rsCriteria = db.OpenRecordset("tblRegions", dbOpenDynaset)

'*** the first record in the Criteria table ***
rsCriteria.MoveFirst

'*** loop to move through the records in Criteria table
Do Until rsCriteria.EOF
   '*** create the Select query based on
   '    the first record in the Criteria table
   strSQL = "SELECT * FROM MainTable WHERE "
   strSQL = strSQL & "[RegionID] = " & rsCriteria![RegionID]

   '*** delete the previous query
   db.QueryDefs.Delete "NewQuery"
   Set qdf = db.CreateQueryDef("NewQuery", strSQL)
   DoCmd.OutputTo acReport, "rptGLTable", "RichTextFormat(*.rtf)",
"C:\GLTable.rtf", False
   rsCriteria.MoveNext
Loop
'**************************
Of course, you will substitute your actual query SQL statement, query name,
table name, file name, and so forth into the above code, but that's the gist
of it.