Fixed JuliaEvalVBA - broken in 0.2.5

PGS62 · Dec 18, 2021 · 7552afd · 7552afd
1 parent 42c61ee
commit 7552afd
Show file tree

Hide file tree

Showing 4 changed files with 3 additions and 2 deletions.
diff --git a/Project.toml b/Project.toml
@@ -1,7 +1,7 @@
 name = "JuliaExcel"
 uuid = "661490ff-676f-49f7-9f60-bdb0e4e6656a"
 authors = ["Philip Swannell"]
-version = "0.2.5"
+version = "0.2.6"
 
 [deps]
 DataFrames = "a93c6f00-e57d-5684-b7b6-d8193f3e46c0"

diff --git a/vba/JuliaExcel.xlam/AuditSheetComments.txt b/vba/JuliaExcel.xlam/AuditSheetComments.txt
@@ -1,4 +1,5 @@
 Version	Date	Time	Author	Comment
+87	18-Dec-2021	18:39	Philip Swannell	Fixed bug in JuliaEvalVBA - bug was introduced by previous change and made JuliaEvalVBA fail whenever returning strings.
 86	15-Dec-2021	16:17	Philip Swannell	Improved handling of string length limits.
 85	15-Dec-2021	12:31	Philip Swannell	JuliaLaunch now checks for existence of wsl.exe
 84	14-Dec-2021	19:33	Philip Swannell	Amended method GetStringLengthLimit. Now returns 256 on Excel 2013.

diff --git a/vba/JuliaExcel.xlam/modSerialise.bas b/vba/JuliaExcel.xlam/modSerialise.bas
@@ -127,7 +127,7 @@ Function Unserialise(Chars As String, AllowNesting As Boolean, ByRef Depth As Lo
               Case 35    '# vbDouble
 4                 Unserialise = CDbl(Mid$(Chars, 2))
 5             Case 163    '£ (pound sterling) vbString
-6                 If StringLengthLimit >= 0 Then 'Calling from worksheet formula, StringLengthLimit applies to elements of an array
+6                 If StringLengthLimit > 0 Then 'Calling from worksheet formula, StringLengthLimit applies to elements of an array
 7                     If Len(Chars) > IIf(Depth = 1, 32768, StringLengthLimit) Then 'Remember Chars includes an initial type indicator character of "£"
 8                         If StringLengthLimit = 32768 Then
 9                             Throw "Data contains a string of length " & Format(Len(Chars) - 1, "###,###") & _

diff --git a/workbooks/JuliaExcel.xlam b/workbooks/JuliaExcel.xlam