Tag: 更改

根据价值改变颜色: 我正在制作一个带有三个button的表单和一个小数据表格。每个button将与可接受结果的不同范围相对应。当你按下第一个button时，如果它们在38和44.4之间，我希望它将表格中的结果高亮显示为绿色，并以红色突出显示结果。对于第二个button，我想要的范围是33到39.4，第三个button是33到39.4（相同的结果范围，不同的testingtypes）。基本上我需要不同的条件格式与每个button制定。我目前正在使用： Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Range("C16") > 44.4 Then Target.Interior.Color = vbRed If Target.Range("C16") < 38 Then Target.Interior.Color = vbRed If Target.Range("C16") >= 38 And Target <= 44.4 Then Target.Interior.Color = vbGreen End Sub 我不熟悉select更改属性，而这是行不通的。不知道从哪里去。任何帮助，将不胜感激。谢谢！

VB 2010 Excel自动化: 我试图从datagridview元素中的选定行自动填充主Excel文件。我已经将数据库连接到数据网格，并且我试图根据数据网格的选定行填充Excel电子表格中的某些字段。 Dim objExcel As New Excel.Application objExcel.Workbooks.Add("path of master workbook") ' objExcel.Visible = True 'Select and modify cells 'Site(Name) objExcel.Range("B2").Select() objExcel.ActiveCell.FormulaR1C1() = 'Where I want to specify the value 从我所做的研究中，我将需要使用我的datagrid的selectionchanged事件来识别选定的行，然后根据列索引填充电子表格，然后使用循环为其余字段填充。我还想添加创build多个工作表的function，方法是循环访问datagrid视图中的选定行。我已经看过许多不同的代码示例，用于将整个数据网格导出到Excel中，但是我不能一辈子都知道如何获取所选行的值，然后再根据列。有人能指引我正确的方向，还是让我知道我完全脱离基地？

VB – Visual Studio 2010中的自动化Excel – select已更改的问题: 我目前正在编写一个实用程序，它从Excel文档中获取两组不同的数据并将其发送到两个不同的Web服务。每组数据都有自己的button，将数据发送到Web服务。当单击abutton时，相应的Web服务将根据input值返回数据。我所要做的是让这个工具可以被各种各样的人所使用。他们将要做的是将他们自己的Excel文档中的特定单元格与我实用程序中的相应单元格同步。使用简单的Excel公式。例如： c:\temp\[book1.xls]sheet1'!a1 现在我想要做的是自动“点击”button，或更新，当用户将他们的单元格连接到我的实用程序相应的单元格上的工具。我已经尝试了我的页面上的select更改事件。但是，直到我的实用程序处于活动状态或点击状态，它才会真正处理。有没有办法让我的工具自动更新？如果不知何故，当我的公用事业被closures时，这将是特别真棒。所以当用户打开它时，它已经充满了他们的信息，输出是正确的。

worksheet_change运行时错误: 下面的代码适用于工作表上的数据透视表数据范围，当“SelectionChange”被激活时（每次点击），它将更新每个工作表上的所有“数据透视表3”。它通常工作，除非我编辑它，然后重试问题：如何使用“Worksheet_Change”？我总是得到一个运行时错误，无法弄清楚语法 Private Sub Worksheet_SelectionChange(ByVal Target As Range) For Each ws In ActiveWorkbook.Worksheets Call PivRefresh Next End Sub Sub PivRefresh() ActiveSheet.PivotTables("PivotTable3").PivotCache.refresh End Sub