Tag: 值

Spreadsheet :: ParseExcel $ cell-> value（）返回undef

我是新来的Perl和电子表格Excelparsing器模块遇到麻烦。 当我在它自己的行上使用$ cell-> value（）时，似乎没有问题，但是当我尝试使用它将值插入数组时，它将返回undef，代码如下所示： for my $row ($row_min .. $row_max) { my @line; for my $col ( $col_min .. $col_max) { my $cell = $worksheet->get_cell( $row, $col ); $value = $cell->value; push @line, $value if defined($cell); print $cell->value; print Dumper $line; } } } 这里打印$ cell-> value; 返回单元格的内容，但打印Dumper $行; 返回undef

如何将Excel中单元格的值引用到公式中

我想在参考公式中使用单元格的值。 例如： 我有一张名为“815108”的表格，里面有我需要的所有数据。 现在在Sheet1（新工作表）中，在A1中input= 815108！A3，它从工作表'815108'中的A3中获取数据。 但是我有这个问题 – 在我的新工作表中，815108是一个已定义的属性（例如：SO = 815108在单元格F5中定义。）而不是使用'815108'！A3我想要使用当前工作表中的位置。 我试过='= F5'！A3哪个不行。 任何帮助表示赞赏。 谢谢。

更快的方式来运行小的VBAmacros？

我正在使用这个需要运行近250ms的小代码:( i是一个循环的增量） Sheets("sheet1").Select val1 = Sheets("sheet2").Range("D" & Sheets("sheet1").Range("A" & i).Value + 1) val2 = Sheets("sheet2").Range("E" & Sheets("sheet1").Range("A" & i).Value + 1) Sheets("sheet1").Range("G" & i).Value = val1 Sheets("sheet1").Range("O" & i).Value = val2 我不知道为什么现在这么久了。 是因为我把数据从一个表格移动到另一个表格？ 也许使用一个variant会更快？ 你有什么指示我可以做些什么来加快速度？ （这个循环完成300-400次，所以总的时间太长。） （不知道这里是否有更好的地方，或在“代码评论”，让我知道如果我错了） 感谢您的帮助！ [编辑]这是您的build议更改后的循环，谢谢大家，这减less了30％的时间。 不过对我来说还是太长了，我已经注意到了你的build议，把表格sh1和sh2全部复制到一张表中，我会尽力去实现。 如果您有其他想法，请保留我的发帖=） i = 2 While sh1.Cells(i, 1).Value <> "" val5 = sh1.Cells(i, 1).Value2 + 1 […]

根据Excel中的值更改图片

第二张图上有22张不同的设备图片。 在Sheet 1和“结果图片”中，我还有4个下拉菜单，它们必须是相同的大小，并且在所有可能的图像选项的相同位置。 在第一个菜单中，我有3个选项，第二个菜单2选项，第四个菜单3选项和第五个菜单2选项。 Menu 1: Electric = 1 Manual = 2 Pneumatic = 3 Is giving to the cell A1 on Sheet 3: 1 or 2 or 3 Menu 2: 1 Spindle = 1 2 Spindles = 2 Is giving to the cell A2 on Sheet 3: 1 or 2 Menu 3: Mounting plate […]

在Excel Pivot中应用多值filter

使用Excel 2013，我想将一个前10名filter应用到一个数据透视表，同时也将一个filter应用到一个额外的值字段。 这可能吗？ 我想从“个人理赔专栏”的总和中筛选出所有的1，但是仍然有平均前十的理赔（减去只有1的理赔量）。 表1和个人索赔总额列表1 结果表应该是这样的。

xlrd＆openpyxl提取错误的单元格值（Excel）

需要帮助，请！ 看起来像一个简单的任务 – 我需要从特定的电子表格单元格中提取值并总结出来。 但是，即使在第一步，我也失败了 – 取而代之。 起初，我认为模块是错误的（openpyxl正在定期升级，我错过了一些东西），但是xlrd模块产生了相同的错误结果！ 代码如下： import xlrd, xlwt wb = xlrd.open_workbook(r"E:\Projects_working (11).xlsx") sheet = wb.sheet_by_name('Language Process') for i in range(1, 100): cellVal = sheet.cell(i, 14).value #need to find "5" in column 14 if type(cellVal) == float and cellVal == 5.0: #need to read corresp. print(sheet.cell(i, 11).value) #values в column 11 结果，而不是一个整数（比如22），代码结束了一个浮点数42782.61458。 […]

Excel更改单元格值时会自动添加边框

我一直在同一个电子表格上工作超过4个月。 截至今天上午，每当我更改单元格值时，excel都会添加一条从A延伸到ZZZ的边框线。 我已经从工作表中删除了所有格式（工作簿中没有VBA编码），但无论如何更改边框的值，边框都会显示。 由于这本书是我报告的内容，边界正在慢慢地杀死我。 我已经search了互联网寻找解决scheme，但似乎我是唯一的。 任何意见，将不胜感激，我用尽了所有的select。

单击某些单元格时调用macros

我想在用户单击特定工作表上的某些特定单元格时调用macros。 诀窍是，特定的工作表只能在另一个macros之后打开。 在此之前，没有用户可以看到该工作表，因此它不活跃。 我必须告诉工作表，如果发生了工作表的macrosA比用户单击这些特定的单元格，运行macrosB. 我认为，如果我在macrosA的末尾声明一个variables为“1”，那么如果我检查工作表的私人小组，如果它是“1”，“Worksheet_SelectionChange”可以运行，但我不能做到。 此外，打开工作表的macrosA将创build该工作表的.pdf报告，因此它会检查并select该页面中的几乎每个单元格，子句我不应该在macrosA结束。 这里是代码; 我把这个代码放在macrosA的一开始（打开工作表（“Baskanlik_TEMP”） Carry_Value = "0" 这是macrosA的结尾; Carry_Value = "1" 这是工作表的私人部分（“Baskanlik_TEMP”）; Private Sub Worksheet_SelectionChange_Q(Carry_Value As String) If Carry_Value <> "1" Then GoTo Son_XYZ_Q_Z Else If ActiveCell.Address = Worksheets("Baskanlik_Temp").Range("$J$16") And Worksheets("Baskanlik_Temp").Range("$J$16") <> "" Or Worksheets("Baskanlik_Temp").Range("$J$21") And Worksheets("Baskanlik_Temp").Range("$J$21") <> "" Or Worksheets("Baskanlik_Temp").Range("$J$26") And Worksheets("Baskanlik_Temp").Range("$J$26") <> "" Or Worksheets("Baskanlik_Temp").Range("$J$31") And Worksheets("Baskanlik_Temp").Range("$J$31") <> "" […]

search后从下一列的单元格input数据

我无法find我需要的解决scheme，所以我正在寻求帮助。 我有3列数据，我需要sorting通过我的项目。 列A包含我的search词，列B是我的数据库，列C是另一组数据，列D是我的输出。 所以一个例子是这样的：单元格A1包含apple 。 我想通过列Bsearch短语apple 。 假设在单元格B50find它，那么我想将C50的值输出到D1 。 目前我有这个： =if("A1"=B:B,1,0) 但是我不知道如何将C50输出到D1因为find了这个短语。 只是要清楚，没有价值的重复任何地方。 谢谢。

用户窗体combobox只取第一个值 – Excel VBA

我有一个用户表单，其中包含一个combobox。 combobox填充了来自dynamic命名范围“List1”的值..每一件事情都很好..当我从列表中select第一个值的作品，我可以完成我的任务..但是当我从列表中select另一个值该值消失，combobox值变为空。这里是代码： Private Sub ComboBox1_Change() ComboBox1.RowSource = "'[" & ActiveWorkbook.Name & "]DATA'!List1" ComboBox1.DropDown Worksheets("TEMP").Range("A3").Value = ComboBox1.Value End Sub 谁能给我一个解决scheme，请.. 更新：我按照本教程中的说明..但我做一个用户窗体中： http : //trumpexcel.com/2013/10/excel-drop-down-list-with-search-suggestions