markdown table has min len of 3 per col

This commit is contained in:
Paul Trowbridge 2017-09-28 14:34:55 -04:00
parent c2fc14e50b
commit d886dd0f0c

View File

@ -2094,13 +2094,13 @@ Public Function markdown_from_table(ByRef tbl() As Variant) As String
If r = 2 Then
md = md & "|"
For c = 1 To UBound(tbl, 2)
md = md & "---" & String(msl(c) - 3, "-") & "|"
md = md & "---" & String(Me.MISCe_MaxInt(msl(c), 3) - 3, "-") & "|"
Next c
md = md & vbCrLf
End If
md = md & "|"
For c = 1 To UBound(tbl, 2)
md = md & tbl(r, c) & String(msl(c) - Len(tbl(r, c)), " ") & "|"
md = md & tbl(r, c) & String(Me.MISCe_MaxInt(msl(c), 3) - Len(tbl(r, c)), " ") & "|"
Next c
md = md & vbCrLf
Next r