正文 

当前位置： 首页 > 代码 > java教程

vbscript自定义函数根据条件连接到或多个字符串。(代码片段)

author author     2023-01-25     503

关键词： 

Public Function CONCATIF(ByVal compareRange As Range, ByVal xCriteria As Variant, Optional ByVal stringsRange As Range, Optional Delimiter As String, Optional NoDuplicates As Boolean) As String
Rem CONCATIF(Site!$G$1:$G$9000,H2,Site!$AE$1:$AE$9000,", ",TRUE)
Dim i As Long, j As Long
    
    With compareRange.Parent
        Set compareRange = Application.Intersect(compareRange, Range(.UsedRange, .Range("a1")))
    End With
    If compareRange Is Nothing Then Exit Function
    If stringsRange Is Nothing Then Set stringsRange = compareRange
    Set stringsRange = compareRange.Offset(stringsRange.Row - compareRange.Row, stringsRange.Column - compareRange.Column)
    
    For i = 1 To compareRange.Rows.Count
        For j = 1 To compareRange.Columns.Count
            If (Application.CountIf(compareRange.Cells(i, j), xCriteria) = 1) Then
                If InStr(CONCATIF, Delimiter & CStr(stringsRange.Cells(i, j))) <> 0 Imp Not (NoDuplicates) Then
                    CONCATIF = CONCATIF & Delimiter & CStr(stringsRange.Cells(i, j))
                End If
            End If
        Next j
    Next i
CONCATIF = Mid(CONCATIF, Len(Delimiter) + 1)
End Function

将 IBAction 连接到自定义类

】将IBAction连接到自定义类【英文标题】：ConnectIBActiontocustomclass【发布时间】：2017-11-0518:24:05【问题描述】：我编写了一个名为PressableView的自定义类。它识别水龙头，然后在其委托对象上调用协议函数。由于是UIView的子类，所... 查看详情

UrlFetchApp 请求在菜单函数中失败，但在自定义函数中失败（连接到外部 REST API）

】UrlFetchApp请求在菜单函数中失败，但在自定义函数中失败（连接到外部RESTAPI）【英文标题】：UrlFetchApprequestfailsinMenuFunctionsbutnotinCustomFunctions(connectingtoexternalRESTAPI)【发布时间】：2020-11-1109:56:12【问题描述】：我正在使用以下函... 查看详情

dplyr：连接到外部数据库时在 summarise() 中使用自定义函数

】dplyr：连接到外部数据库时在summarise()中使用自定义函数【英文标题】：dplyr:useacustomfunctioninsummarize()whenconnectedtoexternaldatabase【发布时间】：2021-05-2620:57:57【问题描述】：在使用dplyr从外部数据库中提取数据时，是否可以在摘要... 查看详情

目前是不是有将两个或多个字符串文字类型连接到 TypeScript 中的单个字符串文字类型？

】目前是不是有将两个或多个字符串文字类型连接到TypeScript中的单个字符串文字类型？【英文标题】：IstherecurrentlyanywaytoconcatenatetwoormorestringliteraltypestoasinglestringliteraltypeinTypeScriptrightnow?目前是否有将两个或多个字符串文字类型... 查看详情

目前是不是有将两个或多个字符串文字类型连接到 TypeScript 中的单个字符串文字类型？

】目前是不是有将两个或多个字符串文字类型连接到TypeScript中的单个字符串文字类型？【英文标题】：IstherecurrentlyanywaytoconcatenatetwoormorestringliteraltypestoasinglestringliteraltypeinTypeScriptrightnow?目前是否有将两个或多个字符串文字类型... 查看详情

如何定义一个函数来根据多个条件汇总和选择数据？

】如何定义一个函数来根据多个条件汇总和选择数据？【英文标题】：Howtodefineasinglefunctiontosumandselectdatabasedonmultipleconditions?【发布时间】：2019-09-1216:45:18【问题描述】：我编写了几行代码来根据2个不同的条件获得3种类型的分数... 查看详情

Apache Kafka 的自定义连接器

】ApacheKafka的自定义连接器【英文标题】：CustomConnectorforApacheKafka【发布时间】：2022-01-0908:27:24【问题描述】：我希望为ApacheKafka编写一个自定义连接器，以连接到SQL数据库以获取CDC数据。我想编写一个自定义连接器，这样我就可... 查看详情

VBScript 连接到 SQL Server 2005 并更新表

】VBScript连接到SQLServer2005并更新表【英文标题】：VBScripttoconnecttoSQLServer2005andupdateatable【发布时间】：2009-07-1413:42:11【问题描述】：我是VBScript的新手。有人可以帮我使用VBScript连接到SQLServer2005(OLEDB)并更新数据库中的表。我的服... 查看详情

js或jquery根据字符串类型的方法名，找到对应的方法并且调用

我自定义了一个input标签的属性，例如：<inputid="id1"onclick="clickFunName()"callFunc="funcName">callFunc是自定义属性，funcName是方法名称，我现在需要在js中调用funcName这个方法，该如何操作？其实这种方式理论上... 查看详情

带有外部 GPS 的自定义定位服务通过 android things 连接到 Raspberry Pi

】带有外部GPS的自定义定位服务通过androidthings连接到RaspberryPi【英文标题】：CustomLocationServiceswithexternalGPSconnectedtoRaspberryPiwithandroidthings【发布时间】：2020-10-3010:49:05【问题描述】：您好，我想通过I2C或串行将外部GPS单元连接到... 查看详情

Javascript竞争条件多个承诺连接字符串

...2021-04-2201:59:49【问题描述】：我有一个接收用户名数组的函数。对于每一个，我需要获取连接ID并连接到另一个数组中。但我认为我确实遇到了一些竞争条件问题，这些问题可能会发生冲突并连接更少的结果......constgetConnections=a 查看详情

Google Apps 脚本：自定义函数，仅根据条件连接多行中的首字母

】GoogleApps脚本：自定义函数，仅根据条件连接多行中的首字母【英文标题】：GoogleAppscript:Customfunctiontoconcatenateonlytheinitialsfrommultiplerowsbasedonacriteria【发布时间】：2015-05-0507:49:43【问题描述】：抱歉，如果我不能很好地解释它，... 查看详情

在自定义视图中连接到 UIButton 的 AddTarget 不起作用。 （斯威夫特 5，iOS）

】在自定义视图中连接到UIButton的AddTarget不起作用。（斯威夫特5，iOS）【英文标题】：AddTargetconnectedtoUIButtonincustomViewdoesnotwork.(swift5,iOS)【发布时间】：2020-10-2806:52:27【问题描述】：有一个带有UIButton的自定义UIView。viewController尝... 查看详情

从 VBScript 连接到 Sybase 时出错 - 内部客户端库错误

】从VBScript连接到Sybase时出错-内部客户端库错误【英文标题】：ErrorwhenconnectingtoSybasefromVBScript-internalClientLibraryerror【发布时间】：2015-06-2420:20:43【问题描述】：我正在编写一个连接到Sybase数据库的VBScript，从表中读取一些数据并... 查看详情

UICollectionView - 连接到自定义单元格

】UICollectionView-连接到自定义单元格【英文标题】：UICollectionView-Connecttocustomcell【发布时间】：2014-04-2215:33:13【问题描述】：我正在尝试构建一个uiCollectionView，其中每个数据部分水平页面-该应用程序适用于私人教练，每个部分... 查看详情

具有连接到一个数据库的 liquibase 的多个应用程序

...库的SpringBoot应用程序（微服务）。每个应用程序都有自定义的dbschema，例如AppA连接到schema_a，AppB连接到schema_b，等等。这些连接到该数据库的应用程序 查看详情

Colab - 连接到自定义 GCP 虚拟机

】Colab-连接到自定义GCP虚拟机【英文标题】：Colab-connectiongtoacustomGCEVM【发布时间】：2021-12-2522:39:19【问题描述】：如何从googlecolab连接到GCP上用户管理的VertexAI笔记本实例。我已尝试提供以下详细信息，但由于实例不存在而抱怨... 查看详情

将参数化 BigQuery 自定义查询连接到数据洞察

】将参数化BigQuery自定义查询连接到数据洞察【英文标题】：ConnectingparameterizedBigQuerycustomquerytoDataStudio【发布时间】：2019-12-0517:33:57【问题描述】：我正在尝试创建从BigQuery到GoogleDataStudio项目的参数化自定义查询数据源。在Google... 查看详情