Tag: 返回

Excel / VBA:不能得到Variant /布尔返回(应该是微不足道的)

我不能得到这个函数将我的值返回到Excel中的输出列: 为了克服一些激烈的查找表并加速计算,我使用切片器的数据透视表来输出来自过滤的行号。 这些行然后需要被转换成一个真正/假的单元格列的大表,从那里我然后要执行更多的计算。 为了避免查找或匹配,我只需要遍历行列表,并在输出向量中将这些单元格变为“真”。 Function IncludedinSlicer(input_range As Variant) As Variant Dim n As Long, j As Long, r As Long n = input_range.Height ' Height of the column of reference values ' every row in the input_range contains a row number which in the output should be TRUE ' all other rows should be false […]

Excel:将字符返回到最后(或倒数第二)出现的左侧和右侧?

我有这样一个string:100愚蠢的街道; 政府大楼7号; 芝加哥棕榈,马92111 我想把所有的字符都返回到最后一个分号的左边。 所以,最后一个分号的左边是:100 Stupid Street; 政府大厦7 这是第1步。我还想从string中提取字符:芝加哥棕榈,马92111 我想把所有的字符都返回到第二个到最后一个空格的左边和右边。 所以,在第二个到最后一个空间的右边是:MA 92111 第二个到最后一个空间的左边是:芝加哥棕榈, 如果有办法去掉最后一个公式中的最后一个逗号,那会更好。 这个公式对我有点帮助:= TRIM(RIGHT(SUBSTITUTE(A1,“;”,REPT(“”,LEN(A1))),LEN(A1))) 单元格A1具有原始string。 此公式成功返回最后一个分号右侧的所有内容。 感谢所有来袭的帮助!

在Excel中返回带有负数的最小两个数字

如果我在Excel中有一组数字,如下所示: -5 1 4 -2 我需要返回-5和-2(每个在一个单独的单元格)。 = SMALL(array,1)不起作用,因为我的数组中的数字小于1.是否有解决方法,所以我可以遍历数组并返回两个最小的数字?

清除CSV文件中的回车Java

我已经看到了许多我对这个问题的答案。 我已经尝试了所有这些,他们都没有为我工作。 当我导出我的excel文件时,如果有回车符,它将进入下一列的数据input新行。 我试图删除列级回车,如下所示: String col = columnName.replaceAll("\r", ""); reportColumn.put( "column", col ); 这遍历每个块并填充Excel表单。 此外,我试图删除回车这里包含整个csv文件的string: String csv = ""; CSVReportGenerator generator = new CSVReportGenerator( ); generator.setReportColumns( this.reportColumns ); generator.setReportRows( rows ); generator.setApplicationPath(""); generator.setNL('\n'); generator.setDebuggingON(Config.DEBUGGING_ON); generator.produceReport( ); csv = generator.getCSV( ); csv.replaceAll(",,", ""); csv.replaceAll(".", ""); csv.replaceAll("\r", ""); csv.replaceAll("\n", ""); csv.replaceAll("\r\n", ""); csv.replaceAll("\\r\\n", ""); 正如你可以看到我已经尝试了几个不同的方法来删除回车。 有谁可以告诉我我做错了什么?

在Excel VBA中返回声明

所以,我在处理return语句的VBA编码时遇到了一些麻烦,我不明白是什么原因造成的。 我做了和其他人一样的回复声明,但似乎在某个地方有一个错误。 有人可以告诉我,我的函数的返回语句中的错误吗? Public Function GetPay(Hours, RegHours, OTHours, PayRate, RegPay, OTPay) As Double Const MAX_REG_HOURS As Integer = 40 Dim RT As Double If Hours > MAX_REG_HOURS Then RegHours = 40 OTHours = Hours – MAX_REG_HOURS Else RegHours = Hours End If RegPay = CDbl(txtPayRate.Text) OTPay = CDbl(txtPayRate.Text * 1.5) Return RT = (RegPay * […]

Excel vba函数返回

我为我的问题find了这个解决scheme 。 它的工作正常,如下所示: Dim CNPJs As New Collection, a Dim i As Long Dim rng As Range U_L = Plan2.Range("A" & Rows.Count).End(xlUp).Row On Error Resume Next For Each rng In Plan2.Range("A2:A" & U_L) CNPJs.Add rng.value, rng.value Next 但现在我想build立一个函数,返回这个独特的数组,因为我会用这个很多次…我试过这个: Public Function unArray(myRange As Range) As Collection Dim arr As Collection, a On Error Resume Next For […]

货件跟踪,返回date给出运行时间错误424对象必需

所以我正在为一个同事做一个项目,我遇到了一个问题。 我以前从来没有使用过Excel VBA,而且在编码方面我几乎没有什么培训。 StackOverflow和其他几十个网站已经得到了巨大的帮助。 我只是不知道该去哪里。 目标。 导航到网页 等待页面加载 将交货date返回到Excel(单元格b1) 这是我的代码到目前为止 Public Function RoadRunnerTracking() Dim IE1 As Object Dim DeliveryCollection As Object Dim ProUrl As String Set IE1 = CreateObject("InternetExplorer.application") ProUrl = "https://www.rrts.com/Tools/Tracking/Pages/MultipleResults.aspx?PROS=" & Range("a1") With IE1 .Visible = True .Navigate ProUrl Do Until Not IE1.Busy And IE1.readyState = 4: DoEvents: Loop End With Set DeliveryCollection […]

在VBA中返回,没有做我所期望的

Public Function GetRowToWriteOn(ByVal SheetName As String, ByVal id As Integer) As Integer LastRow = ActiveSheet.UsedRange.Rows.Count myarray = Sheets(SheetName).Range("d7:d" & LastRow).Value For row = 1 To UBound(myarray, 1) If (myarray(row, 1) = id) Then Return row End If Next End Function IDE说预计结束语句,我该怎么做我想要的? (返回id是相同的那一行?) 我对VBA一点都不熟悉,但是当我从微软看这个例子,这应该工作? : Return语句同时指定返回值并退出函数。 以下示例显示了这一点。 Function myFunction(ByVal j As Integer) As Double Return 3.87 […]

将excel文件转换成字典之后,如何返回“none”不是字典中的键和值?

我已经导入了excel文件和一切; 它能够区分一个状态和大写,但是如果我为任何一个variablesinput一些任意的string,例如'fdajfja',那么我只是想返回一个错误,当它返回“none”。 这是代码 d= {} d1= {} with file as f: for line in f: line = line.strip() (key, val) = line.split(",") d[str(key)]=val d1[str(val)]=key def findCapital(state): return d[state] def findState(capital): return d1[capital] 如何正确插入我的代码? else: return None

在PHP函数结束时,“返回”是什么意思?

我正在使用一个PHP库来生成由多个函数组成的Excel文件。 这是其中的一个function: // Excel begin of file header function xlsBOF() { pack("ssssss", 0x809, 0x8, 0x0, 0x10, 0x0, 0x0); return; } 我不确定'返回'返回什么? 请有人澄清这一点。