Tag: excel 2010

如何给单元格添加一个值: 我正在使用电子表格进行库存扫描部分我试图添加一个A2值旁边的(Target.Row, 5)(row 6) 我如何使A2或A9或下一个扫描值显示在F栏，所以如果E栏和F栏不匹配我知道零件坐在错误的箱子我试过.Value = Target.Worksheet.Cells(Target.Row, 1).Value但不工作这是我完整的代码 Option Explicit Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) If Target.Cells.Count > 1 Or IsEmpty(Target) Or Target.Column <> 1 Then Exit Sub If Not SheetExists("WarehouseInventory") Then Exit Sub Dim Result As Variant Set Result = Sheets("WarehouseInventory").Cells.Range("E:E").Find(Target) If Result Is Nothing Then Target.Worksheet.Cells(Target.Row, 2) […]

Excel：使用多行将回归线添加到现有graphics中: 我有一个与四个不同生产地点相对应的生产废物线图。但是，我想在同一个图中包含趋势线（回归）。这个回归应该对生产场地的总生产浪费进行趋势线。也就是说，如果生产场地1到4每个月都有2个单位的生产浪费，我希望在y = 8时回归是平坦的。这可能吗？我正在使用Excel 2010。编辑：我已经意识到，它是不可能做一个回归线没有将常规graphics转换为散点图第一（或是..？）。但是最初的问题依然存在。

在Excel中自动插入时间戳数据: 我有6分钟的时间收集现有的数据。时间戳在A列，相应的值在B列。我想插入这个数据来获得分钟细分，使用基本的插值方法计算。所需输出的样本显示在D和E栏中。有没有一种方法来自动计算？

粘贴单元格值而不是公式: 我正在search多个工作表的string，一旦find这个string它将其复制到合并数据表。我遇到的问题是应付公式，而不是价值。我一直在寻找小时，似乎无法find解决办法。这是我目前正在使用的代码。任何援助，您可以提供非常感谢！谢谢阿隆 Private Sub CommandButton1_Click() Dim FirstAddress As String, WhatFor As String Dim Cell As Range, Sheet As Worksheet With Application .ScreenUpdating = False .EnableEvents = False .CutCopyMode = False End With WhatFor = Sheets("SUB CON PAYMENT FORM").Range("L9") Worksheets("MergedData").Cells.Clear If WhatFor = Empty Then Exit Sub For Each Sheet In Sheets […]

无法扩展VLOOKUP公式: 关于VLOOKUP的一个简短的问题。我有两张纸（“Sheet2”充当元素的来源或列表，而“Sheet1”是VLOOKUP公式的使用位置）我创build了一个名称，以便我可以重用A2（Sheet1）的vlookup公式。问题是当我将公式拖到Sheet1（我想要应用VLOOKUP）的B2中时，它向我显示错误，并且在检查后发现我创build的“qw”variables对于每一行都是dynamic变化的。见下文：题：有人可以告诉我如何将VLOOKUP公式应用于Sheet1中的B2？

Excel VBA – 使用macros汇总数据: 我想知道如果有人愿意给我一个新手VBA的帮助。在表一中，我有这样的数据格式：表1 我想要做的是使用VBA吐出下面的图dynamic填充该区域取决于它find多less：表2 这是我的第一个VBA，所以我徘徊了一下。这是我如何解决这个问题的想法：我的想法是向下滚动Sheet1 col A中的数据中的string，并确定它是否是我们以前见过的date： Public Sub Test() ActiveSheet.Range("Sheet1!A1:A5000").AdvancedFilter Action:=xlFilterCopy, CopyToRange.Range("Sheet2!A1"), Unique:=True End Sub 问题这个stream程图是否采取了正确的方法？如果是这样的话，我该如何实现这种“这是否独一无二，如果是这样做，如果不这样做”那种设置。我真的很感谢一些帮助实现这个代码的开始，所以我有一些东西要build立。这是我到目前为止： https : //gist.githubusercontent.com/employ/af67485b8acddce419a2/raw/6dda3bb1841517731867baec56a0bf2ecf7733a7/gistfile1.txt

VBA“编译错误：参数不可选”debugging子: 我正在尝试debugging这个简单的代码部分： Public Sub FunctionNotValidVarType() MsgBox "VarType " & VarType & " is not supported. Please check spelling." End Sub

VBA Excelmacros通过外部文件更新列表: 我有一张有两张纸的Excel表格。隐藏一张表，其中包含名为“位置”的值列表。在主表单上，我创build了一个从隐藏表单中拉出的下拉菜单。如何将这些值存储在外部文件（Excel，.txt等）中，这样我就可以打开一个macrosbutton（VBA），它将使用任何/所有新的位置值replace/更新隐藏工作表上的列表存储在一个外部文件？

Excel：列出2个数字之间的数字: 我想知道是否有人知道一个公式列出所有的数值之间的2个值，所以例如，如果单元格F2有12个，G2有17个，我想要一个公式，将显示13,14,15,16在H2单元格中。谢谢

VBA Excel 2010 msoFileDialogOpen Path.Open运行时错误“424”：需要的对象: 我有一个简单的函数，让用户使用Excel 2010的VBA的msoFileDialogOpen属性select一个文件来select一个文件。当我运行它时，我得到了错误：运行时错误“424”：所需对象这是违规的路线： Path.Open 这是整个function： Public Sub Function4_FileExplorer() Dim file As Variant ' Start File Explorer to select file containing data (simple GUI, much easier than coding vFileName) With Application.FileDialog(msoFileDialogOpen) .AllowMultiSelect = False If .Show Then file = .SelectedItems(1) Path = file End If Path.Open End With MsgBox file Exit Sub ErrorHandler: […]