fix vb syntax error

OfficeDev · Jan 2, 2024 · 5a358a3 · 5a358a3
1 parent 8528f4d
commit 5a358a3
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/samples/spreadsheet/insert_a_chartto/vb/Program.vb b/samples/spreadsheet/insert_a_chartto/vb/Program.vb
@@ -21,7 +21,7 @@ Module MyModule
         Using document As SpreadsheetDocument = SpreadsheetDocument.Open(docName, True)
 
             ' <Snippet1>
-            Dim sheets As IEnumerable(Of Sheet) = document.WorkbookPart.Workbook.Descendants(Of Sheet)() _.Where(Function(s) s.Name = worksheetName)
+            Dim sheets As IEnumerable(Of Sheet) = document.WorkbookPart.Workbook.Descendants(Of Sheet)().Where(Function(s) s.Name = worksheetName)
 
             If sheets.Count() = 0 Then
                 ' The specified worksheet does not exist.