表格宏vb代码将图片更改为嵌入图片这句代码： Set tbl = ThisWorkbookSheetsSheet1ListObjectsTable1提示下标越界

"下标越界"错误通常表示代码中引用的对象或数组的索引超出了有效范围。在这种情况下，可能是因为工作簿中不存在名为"Sheet1"的工作表或名为"Table1"的表格。

请确保工作簿中存在名为"Sheet1"的工作表，并且在该工作表上有一个名为"Table1"的表格。如果表格的名称不是"Table1"，请将代码中的"Table1"更改为正确的表格名称。

如果确认工作簿中存在相应的工作表和表格，但仍然出现"下标越界"错误，则可能是因为表格不是以表格形式存在，而是以其他形式存在（例如，作为一个范围）。在这种情况下，您需要根据具体情况调整代码以正确引用表格。