时间戳

首页 > 解决方案 > 如何在 EasyXLS 中命名表？

vbscript - 如何在 EasyXLS 中命名表？

问题描述

我已经购买了 easyXLS Professional，但我不知道如何为工作表创建表格 - 并为其命名...在 Microsoft Excel 中，可以使用 ctrl+t 创建表格并为其命名。在此处查看屏幕截图： https ://1drv.ms/u/s!Ak5nrcTR_zUIzG50tE9svzfhifxx

所以我想在easyXLS中做同样的事情——所以我可以为特定的表格设置一个主题......

我已经尝试了文档中的所有不同示例 - https://www.easyxls.com/manual/basics/features.html - 在 VBS 中。

而且我试图在 API Docs 中找到相关的方法，但没有任何运气。

有谁知道如何在 easyXLS 中创建一个简单的表并为其分配名称。？

标签： vbscript

解决方案

目前，EasyXLS 唯一具有名称的表是数据透视表。

但是您可以创建一个没有名称的简单数据表，并为其格式化元素设置自动格式。

Set workbook = CreateObject("EasyXLS.ExcelDocument")

Set worksheet = CreateObject("EasyXLS.ExcelWorksheet")
workbook.easy_addWorksheet(worksheet)

Set xlsTable = worksheet.easy_getExcelTable()

'define an autoformat for the table
Dim AUTOFORMAT_COLORFUL1
AUTOFORMAT_COLORFUL1 = 21
Dim xlsAutoFormat
Set xlsAutoFormat = CreateObject("EasyXLS.ExcelAutoFormat")
xlsAutoFormat.InitAs(AUTOFORMAT_COLORFUL1)

'apply autoformat
xlsTable.easy_setRangeAutoFormat_2 "A1:F10", xlsAutoFormat

'export excel file
workbook.easy_WriteXLSXFile ("C:\excel.xlsx")

此代码使用excel 的预定义自动格式之一，可用预定义格式的完整列表在这里。

如果您不喜欢任何预定义的自动格式，您可以定义自定义格式，例如：

'define an autoformat for the table
Dim AUTOFORMAT_COLORFUL1
AUTOFORMAT_COLORFUL1 = 21
Dim xlsAutoFormat
Set xlsAutoFormat = CreateObject("EasyXLS.ExcelAutoFormat")
'xlsAutoFormat.InitAs(AUTOFORMAT_COLORFUL1)

'set the formatting style of the header
Dim xlsHeaderStyle
Set xlsHeaderStyle = CreateObject("EasyXLS.ExcelStyle")
xlsHeaderStyle.setBackground(&hff90ee90)
xlsHeaderStyle.setFontSize(12)
xlsAutoFormat.setHeaderRowStyle(xlsHeaderStyle)

'...more formatting for the table elements

此外，如果您想在 MS Excel 主题之间进行切换，您可以为 Excel 文档设置主题并使用主题颜色设置自动格式化颜色。

Dim THEME_COLORS_APEX
THEME_COLORS_APEX = "Apex"
workbook.setTheme_2(THEME_COLORS_APEX)

'define an autoformat for the table
Dim xlsAutoFormat
Set xlsAutoFormat = CreateObject("EasyXLS.ExcelAutoFormat")

Dim xlsThemeColor
Set xlsThemeColor = CreateObject("EasyXLS.Themes.ThemeColor")
xlsThemeColor.setColor 4, 2

' Set the formatting style of the header
Dim xlsHeaderStyle
Set xlsHeaderStyle = CreateObject("EasyXLS.ExcelStyle")
xlsHeaderStyle.setBackground_2(xlsThemeColor)
xlsHeaderStyle.setFontSize(12)
xlsAutoFormat.setHeaderRowStyle(xlsHeaderStyle)

'...more formatting for the table elements

有一堆预定义的主题，您也可以创建自己的主题。有关Excel 主题的更多信息。

推荐阅读