Copy and paste this macro into module through VBA interface:
Sub svgImport()
'
' svgImport Macro
' importing .svg via fixed width text from .svg usg Import dialog in XL
'
' sn.svg is svg file
'
' svgImport.xls is target XL spreadsheet
'
With ActiveSheet.QueryTables.Add(Connection:= _
"TEXT;C:\Users\SN\svgImport\sn.svg" _
, Destination:=Range("$A$1"))
.Name = "snsvg"
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.RefreshStyle = xlInsertDeleteCells
.SavePassword = False
.SaveData = True
.AdjustColumnWidth = True
.RefreshPeriod = 0
.TextFilePromptOnRefresh = False
.TextFilePlatform = 437
.TextFileStartRow = 1
.TextFileParseType = xlFixedWidth
.TextFileTextQualifier = xlTextQualifierDoubleQuote
.TextFileConsecutiveDelimiter = False
.TextFileTabDelimiter = True
.TextFileSemicolonDelimiter = False
.TextFileCommaDelimiter = False
.TextFileSpaceDelimiter = False
.TextFileColumnDataTypes = Array(2)
.TextFileTrailingMinusNumbers = True
.Refresh BackgroundQuery:=False
End With
ChDir "C:\users\sn\svgImport"
ActiveWorkbook.SaveAs Filename:= _
"C:\users\sn\svgImport\svgImport.xls", FileFormat:= _
xlExcel8, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
, CreateBackup:=False
Columns("A:A").ColumnWidth = 147.6
End Sub
Excel 2007 doesn't interpret .svg, of course, so nothing gets embedded as an image. The fixed-width text nature of the input at runtime does no wrapping so with any luck no truncation will occur. Huge .svg files might be another matter.