通过 VB 脚本，我无法获得由数据验证控制的单元格格式

Question

我正在尝试获取设置了数据验证的单元格的值和背景颜色。当从下拉菜单中选择了错误的值时，cell/Drop down bg-color 变为红色。这需要在另一个 excel 中捕获 drop downs/Cell 值的所有组合。

我正在使用 VB 脚本在设置了数据验证的 excel 单元格中设置值，并使用相同的脚本尝试提取设置值及其格式。

obj_Exl_WS_input.Cells(in_row,in_col).Copy
obj_Exl_WS_output.Cells(out_row,out_col).PasteSpecial -4122
obj_Exl_WS_output.Cells(out_row,out_col).PasteSpecial -4163

预期结果：所选单元格的值及其背景颜色应粘贴到输出中 excel。

实际结果：只有单元格的值被粘贴到输出中excel，而不是背景或字体颜色。

[注意：代码在.vbs文件中]

Answer 1

好吧，我能够使用代码解决我的问题。 obj_Exl_WS_output.Cells(out_row,out_col).Interior.ColorIndex =Cint(obj_Exl_WS_input.Cells(in_row,in_col).DisplayFormat.Interior.ColorIndex) 由于我的输入和输出 excel 不同 -4104 有些方法对我不起作用。

通过 VB 脚本，我无法获得由数据验证控制的单元格格式

Through VB script I am unable to get formatting of cells controlled by Data validation

vbscript

excel

vba