Tag: 的

访问VBA将基于查询的数据导出到预先devise为接受导出数据的xlsx模板中

目前，我们能够在Access中build立报告。 但是，他们希望在Excel中创build相同的报告。 这些报告是规范的，需要根据规范进行devise。 我devise了Excel模板（工作簿），其中一个选项卡具有报告，另一个选项卡具有数据。 期望的结果：用户将点击一个button导出数据。 打开预devise的Excel模板，填写数据标签，将具有特定名称的Excel文件保存在预定义的目录中，在报告选项卡上查看报告。 下面是我迄今为止所构build的，只能创build一个不使用预先devise的Excel模板的新文件。 其实这个代码现在不行 任何build议或指导将不胜感激。 🙂 Private Sub Button_ExhP2_XLSX_Click() DoCmd.SetWarnings False Set db = CurrentDb Dim mysql As String Set fso = CreateObject("Scripting.FileSystemObject") 'Create filepath for data to be saved in Const xlsxPath = "\\Path\Access dBase\O-Blank Exhibits\" 'Create Filname used to save data to excel FileName = "BlankPart2 " & [Forms]![Frm_Main]![Frm_Main_ListBox_BU] […]

在导出的excel文件中包含链接

我正在创build一个查询，然后将其下载到一个Excel文档中。 我想在Excel文档中包含一些链接，但不知道如何去做。 我试着把一个锚标签放在querySetCell()值中，但是只是把html打印到excel文件中，html不会被parsing。 我正在使用CF10。 以下是我的代码，任何意见表示赞赏。 <cfset q = queryNew("#columnNames#")> <cfset queryAddRow(q)> <cfset querySetCell(q, "Attributes", "Part Number")> <cfset querySetCell(q, "PrimaryPart", "#local.primaryPart.getProductNumber()#")> <cfset i = 0> <cfloop array="#local.comparableParts#" index="part"> <cfset i++> <cfset querySetCell(q, "alternatePart"& i, "#part.getPartNumber()#")> </cfloop> <cfspreadsheet action="write" query="q" filename="partCompare.xls" overwrite="true" /> <!— Make a spreadsheet object —> <cfset s = spreadsheetNew()> <!— Add header row […]