The VBA procedure still works. (The smiley button is not there). I loaded all data for Ontario into the SymbologyToolcanvec.mxd from the 11 File Geodatabases.
Assuming the .style file is in "C:\Users\USERNAME\AppData\Roaming\ESRI\Desktop10.0\ArcMap"
Open VBA Customize -> VBA Macros -> Visual Basic Editor from the main menu. Once in VBA Expend the Project -> Modules and click on the SEEM1 module. In the main code window place your cursor anywhere inside the MapSymbology procedure and hit run (green run button) on the main menu. There is no progress bar so wait until the hourglass disappears. (The Ontario data took about a minute to run on my machine) Done. Close VBA. All layers are properly symbolized, buildings symbols have correct orientation, categories named and layers arranged.
The only issue that remains is labeling the Named Features layer (Code 1580010). There does not appear to be a procedure for that.