diff --git a/Version Control.accda.src/modules/modSanitize.bas b/Version Control.accda.src/modules/modSanitize.bas
index 07a1e661..c60adf18 100644
--- a/Version Control.accda.src/modules/modSanitize.bas	
+++ b/Version Control.accda.src/modules/modSanitize.bas	
@@ -495,6 +495,13 @@ Public Sub SanitizeXML(strPath As String)
     Perf.OperationStart "Sanitize XML"
     curStart = Perf.MicroTimer
     
+    ' Exporting Table Def as XML does not properly encode ampersand character (See #314)
+    ' Most likely if any ampersands are encoded correctly, all of them will be.
+    If InStr(1, strFile, "&", vbTextCompare) = 0 Then
+        ' Properly encode any embedded ampersand characters to make valid XML
+        strFile = Replace(strFile, "&", "&")
+    End If
+    
     ' Split into array of lines
     varLines = Split(FormatXML(strFile), vbCrLf)