Tag: 枚举

Excel VBA枚举types定义:成员定义更改大小写

我会尽我所能来正确地说出这个问题。 VBA IDE具有此function,它将把variables名称中的字符大小写更改为最后inputvariables名称的情况。 例如,让我们说我开始在SUB中的以下行: VAR1 = 1 现在,让我们说我input以下行: var1 = 2 整个子现在变成: var1 = 1 var1 = 2 我知道我可以通过使用Dim语句或任何范围声明声明variables来阻止这种情况的发生。 问题:我在类模块中使用Enum。 而且该类的公共属性之一与Enum相关联。 我已经在成员名称中使用某些字符来使其可读(骆驼大小写)。 现在,当用户在其标准代码模块中设置该属性时,如果将它们全部以小写formsinput,则类模块中的Enum定义随之一起更改。 有没有办法阻止这种情况的发生?

我想在所有枚举中使用CLASS的通用方法

public class TableContent { public static String EXCEL_SHEET_NAME = Nit.THEAD.getName(); public static String FILENAME= Nit.FILENAME.getName(); public enum Nit { FILENAME("Nit-workorder-list"), THEAD("NIT WORKORDER"), TENDERSPECNO("TENDER SPECFICATION NO."), FEE("TENDER FEE"), SDAMOUNT("SD AMOUNT"), TYPE("NIT TYPE"), PRE_BID("PRE BIDDING DATE"), OPEN_DATE("OPENING DATE"), STATUS("CONTRACTOR STATUS"); private final String name; public String getName() { return name; } private Nit(String name) { this.name = […]

如何在Excel中枚举重复的行?

我有这样的数据: Monkey Donkey Elephant Panda Donkey Donkey Monkey 我想通过一个数字来区分这些行,计算每个重复: Monkey 1 Donkey 1 Elephant 1 Panda 1 Donkey 2 Donkey 3 Monkey 2 我已经设法得到行的重复数量,但我不知道如何去像这样枚举它们。 是甚至可能与Excel,或者我将不得不写一个脚本?

在UDF的单元格公式中使用内置枚举

我有一个用户定义的函数,它需要一个具有关联内置enum的参数: Public Function bgrcolor_cells(rng As Range, xlcl As Long) As Integer 我想在单元格中写出这样的公式 =bgrcolor_cells($A2:$B2,vbRed) 代替 =bgrcolor_cells($A2:$B2,255) 那可能吗? 怎么样? PS:我发现如何在Excel UDF中使用枚举标识符 ,但它引用了用户定义的枚举。 我不知道我是否想要使用内build的枚举实际上有所作为。 编辑1也许一些自动阅读内置枚举定义的代码可能有助于定义由Jean-FrançoisCorbett或命名范围的类,然后将避免从头打字。 我已经看到了这样的自动parsing,可能的指针是: http://www.cpearson.com/excel/EnumNameList.aspx http://www.excelforum.com/excel-programming-vba-macros/356892-programmatic-generation-of-enum-to-string-functions.html 编辑2 (按照这个 )评论已经发布,指出“有没有区别的内置和用户定义的枚举”,这是一个骗局。 我认为这不是,而且如果引用的评论是正确的,那么对于当前的具体和不同的问题,这可能是答案的一部分(也许值得一提)。

如何在Python中导入COM对象名称空间/枚举?

我是相对较新的编程/ python,所以我会很感激任何帮助,我可以得到。 我想通过COM使用Excel将excel文件保存为特定的格式。 这里是代码: import win32com.client as win32 def excel(): app = 'Excel' x1 = win32.gencache.EnsureDispatch('%s.Application' % app) ss = x1.Workbooks.Add() sh = ss.ActiveSheet x1.Visible = True sh.Cells(1,1).Value = 'test write' ss.SaveAs(Filename="temp.xls", FileFormat=56) x1.Application.Quit() if __name__=='__main__': excel() 我的问题是如何指定FileFormat,如果我不明确知道它的代码? 浏览文档我find关于FileFormat对象的引用。 我无法知道如何访问XlFileFormat对象 ,并以我可以find它的枚举值的方式导入它。 谢谢!