Tag: 返回值

从macros返回整数: 我试图循环通过我的Excel电子表格中的特定行。对于第一组即时尝试循环通过每3行，以查看是否隐藏和第二个循环我正在步进每2个。我基本上想要添加什么真正的通过两个循环，并返回该值。 “返回y”部分给我一个错误。 Function FindHiddenRows() As Integer Dim x As Integer Dim y As Integer y = 0 For x = 23 To 38 Step 3 If Rows("x:x").EntireRow.Hidden = False Then y = y + 1 End If Next x For x = 40 To 46 Step 2 If Rows("x:x").EntireRow.Hidden = False Then y = […]

Excel VBA追踪一个单元格的值: 希望有人能够帮助我。我对VBA和编码是全新的。这里是我的代码如下： Private Sub Workbook_Open() For Each Cell In Range("I2:I500") If Cell.Value < Date – 9 And Cell.Value <> "" Then If Cell.Font.ColorIndex <> 22 And Cell.Interior.Color <> RGB(151, 210, 86) Then MsgBox "Status 1 " & ***Cell.Address(False, False)*** Cell.Font.ColorIndex = 22 Cell.Font.Bold = True End If ElseIf Cell.Value < Date – 5 And […]

Excel：使用逻辑testing的返回值作为IF函数的返回值: 这是从没有涉及VBA的Excel工作表中取得的。有什么方法可以重build吗？ =IF(ISERROR(function_return),something_else,function_return) 这样一个术语function_return只会被明确地陈述一次。因为function_return可以有很多参数，我只想在一个地方调整，而不是在两个实例。在其他语言，我会尝试使用 var foo = function_return(many_many_arguments) =IF(ISERROR(foo),something_else,foo) 像这样的事情可以在一个单元格内实现吗？谢谢你的帮助。

Excel查找将水平返回多个值，同时删除重复项: 我想对查找值列表进行垂直查找，然后将多个值返回到每个查找值的列中。我实际上设法做了一个长的谷歌search后，这是代码： =INDEX(Data!$H$3:$H$70000, SMALL(IF($B3=Data!$J$3:$J$70000, ROW(Data!$J$3:$J$70000)-MIN(ROW(Data!$J$3:$J$70000))+1, ""), COLUMN(A$2))) 现在，我的问题是，正如你可以在公式中看到的，我的查找范围包含70,000行，这意味着很多返回值。但是这些返回值中的大部分是双倍的。这意味着我必须拖动上面的公式，直到所有的查找值（大约200）返回#NUM !. 有没有什么可能的办法，我想VBA是必要的，在重复删除后返回值？我是VBA新手，我不知道该怎么做。计算有这么多的细胞也需要永远。

在Excel XLL中返回数组: 我使用Excel 2010和Excel 2010 XLL SDK。我尝试使用这个function： __declspec(dllexport) LPXLOPER12 WINAPI dfutil(void) { static XLOPER12 xlArray; XLOPER12 xlValues[4]; int i; double z = 3.1456; for (i = 0; i < 4; ++i) { xlValues[i].val.num = i*z; xlValues[i].xltype = xltypeNum; } xlArray.xltype = xltypeMulti; xlArray.val.array.lparray = xlValues;//&xlValues[0]; xlArray.val.array.rows = 1; xlArray.val.array.columns = 4; return (LPXLOPER12) &xlArray; } 定义： […]

SQL Query Excel – 如果找不到值，则返回“0”: 我有一个简单的查询使用以下命令文本从SQL Server返回到Excel工作表的值。但是，如果在Material_Location表中找不到“ Material值，则只是省略它。如果在Material_Location表中找不到Material ，如何修改以下代码以将On_Hand_Qty的值返回为“0” SELECT SO_Detail.Sales_Order, SO_Detail.SO_Line, SO_Detail.Material, SO_Detail.Order_Qty, Material_Location.On_Hand_Qty FROM SO_Detail INNER JOIN Material_Location ON SO_Detail.Material = Material_Location.Material ORDER BY SO_Detail.Sales_Order, SO_Detail.SO_Line 谢谢

Excel – 自动replace公式单元格: 我正在试着制作一张表格，将其添加到我的学生作业作业的模板中; 其中有些人是通过发送对方的文件作弊，我想赶上他们。我做了一个公式单元格，填充当前操作系统和文件的目录。我想要做的就是在评估之后把这个文本变成文本，这样如果另一个学生打开这个文件，这个文件就不会改变（但是下面的单元格会等等..）这里是公式：（单元格A1）： =INFO("osversion")&INFO("directory") （单元格A2及以后）： =IF(A1=(INFO("osversion")&INFO("directory")),"",IF(LEN(A1)<2," ",INFO("osversion")&INFO("directory"))) 你知道是否有任何方法可以在不使用VBA的情况下将公式单元格replace为其值？（如果我使用VBA，它会询问你是否想在启动时启用macros，哪种types的游戏不能运行）预先感谢您的帮助！

返回返回在Excel :: load（）函数内工作：Laravel 4.2: 我想导入一个Excel文件到数据库，检查文件格式，我已经成功完成后，我得到一个问题的唯一部分是返回在我的视图页上，错误或成功的消息。我的控制器 :: Excel::load(Input::file('datafile'), function ($reader) use($attr_array) { … //IF DATA MATCH if($data_match == 'true') { … foreach ($reader->toArray() as $row) { $Pdt_data->slug = Util::uniqueSlug($row['attr_name_value'], 'Product'); $rem_value['slug'] = $Pdt_data->slug; $resultant = array_merge($rem_value, $row); //INSERT INTO DATABASE Product::firstOrCreate($resultant); } \Session::flash('success', 'Data uploaded successfully.'); return Redirect::back(); } //IF DATA DOES NOT MATCH else { \Session::flash('error', 'You Are […]

Excel 2010中的VBA：函数的Scripting.Dictionary返回值不会作为parameter passing给包装函数调用: 已经把我的头从桌子上撞了几个小时，而且已经search到了互联网的chuff，所以如果我错过了一个明显的解决scheme，我很抱歉… 我有两个function： Public Function DictFromRanges(rKeys As Range, rValues As Range) As Scripting.Dictionary Debug.Assert (rKeys.Columns.Count = rValues.Columns.Count) Dim rRetDict As Scripting.Dictionary Set rRetDict = New Scripting.Dictionary ' loop through ranges adding values from rValues with keys from rKeys Dim iKey As Integer For iKey = 1 To rKeys.Columns.Count rRetDict(rKeys.Columns(iKey).Value) = rValues.Columns(iKey).Value Next iKey ' set return […]

Excel：如果单元格与列名称匹配，则返回列中的所有值: 只是一个简单的问题：如果单元格与另一个工作簿中的列名称匹配，如何返回列中的所有值？所以这就是我想要做的：有两个工作簿“wb1”和“wb2”。所以在wb2中有1000列，每列中的第一行是产品ID。在每一列中都有几百行的销售数字。我想要做的是，在wb1中，在单元格A1中input产品ID。并希望在wb1的这一列中，它将返回wb2中的所有销售号码，其中wb1中的产品ID与wb2中的名称匹配。无论如何，我可以做到这一点？许多小伙子。干杯，Alex