PHPmyadmin中sql语句 SELECT * FROM `hz_article_type` WHERE FIND_IN_SET( 5, items_id ) LIMIT 0 , 30 结果
标签:VBA 有时候,工作簿中可能有大量的命名区域。...然而,如果名称太多,虽然有名称管理器,可能名称的命名也有清晰的含义,但查阅起来仍然不是很方便,特别是想要知道名称引用的区域时,如果经常要打开名称管理器查找命名区域,会非常麻烦,也浪费时间。...Sub NamesList() Dim wks As Worksheet Dim nm As Name '可以修改为你想置名称和引用区域的工作表 Set wks = Sheet1...'忽略错误 On Error Resume Next '遍历名称 For Each nm In Names '在列A中列出名称 wks.Range...("A" & Rows.Count).End(xlUp)(2) = nm.Name '在列B中列出名称指向的区域 wks.Range("B" & Rows.Count)
学习Excel技术,关注微信公众号: excelperfect 要在Excel工作表中获取最大值或最小值,我们马上就会想到使用MAX/MIN函数。...例如,下图1所示的工作表,使用公式: =MAX(A1:D4) 得到最大值18。 使用公式: =MIN(A1:D4) 得到最小值2。 ?...图1 然而,当遇到要在多个工作表中查找最大值或最小值时,该怎么做呢?例如,示例工作簿中有3个工作表:Sheet1、Sheet2和Sheet3,其数据如下图2至图4所示。 ? 图2 ? 图3 ?...图4 很显然,这些数据中最小值是工作表Sheet2中的1,最大值是工作表Sheet3中的150。 可以使用下面的公式来获取多个工作表中的最小值: =MIN(Sheet1:Sheet3!...A1:D4) 使用下面的公式来获取多个工作表中的最大值: =MAX(Sheet1:Sheet3!A1:D4) 结果如下图5所示。 ?
我们给出了基于在多个工作表给定列中匹配单个条件来返回值的解决方案。本文使用与之相同的示例,但是将匹配多个条件,并提供两个解决方案:一个是使用辅助列,另一个不使用辅助列。 下面是3个示例工作表: ?...图3:工作表Sheet3 示例要求从这3个工作表中从左至右查找,返回Colour列中为“Red”且“Year”列为“2012”对应的Amount列中的值,如下图4所示的第7行和第11行。 ?...图4:主工作表Master 解决方案1:使用辅助列 可以适当修改上篇文章中给出的公式,使其可以处理这里的情形。首先在每个工作表数据区域的左侧插入一个辅助列,该列中的数据为连接要查找的两个列中数据。...VLOOKUP函数在多个工作表中查找相匹配的值(1)》。...先看看名称Arry2: =ROW(INDIRECT("1:10"))-1 由于将在三个工作表中执行查找的范围是从第1行到第10行,因此公式中使用了1:10。
在某个工作表单元格区域中查找值时,我们通常都会使用VLOOKUP函数。但是,如果在多个工作表中查找值并返回第一个相匹配的值时,可以使用VLOOKUP函数吗?本文将讲解这个技术。...最简单的解决方案是在每个相关的工作表中使用辅助列,即首先将相关的单元格值连接并放置在辅助列中。然而,有时候我们可能不能在工作表中使用辅助列,特别是要求在被查找的表左侧插入列时。...图3:工作表Sheet3 示例要求从这3个工作表中从左至右查找,返回Colour列中为“Red”对应的Amount列中的值,如下图4所示。 ?...,我们首先需要确定在哪个工作表中进行查找,因此我们使用的函数应该能够操作三维单元格区域,而COUNTIF函数就可以。...B:B"}),$A3) INDIRECT函数指令Excel将这个文本字符串数组中的元素转换为单元格引用,然后传递给COUNTIF函数,同时单元格A3中的值作为其条件参数,这样上述公式转换成: {0,1,3
excelperfect 一些情形下,我们需要在工作表中使用ActiveX控件,这通常使用VBA来实现。...要使用VBA从控件工具箱(ActiveX控件)中添加控件,可以使用OLEObjects集合的Add方法。...图1 下面的代码用来在工作表中添加复选框: Sub RefreshList() Dim oCheck As OLEObject Dim rCell As Range, rRange As...Range Dim lLastRow As Long '清除已经存在于工作表中的复选框 For Each oCheck In Sheet1.OLEObjects...接下来,在确定数据范围后,在第一列添加复选框并设置了一些属性值以方便以后操作。这里,有一些通用的适合于其他控件的属性,也有一些专属于复选框的属性。
直接上代码: # -*- coding: UTF-8 -*- import re #使用正则库 # 打开文件...hello.txt", "r"); co = open("world.txt", "r"); colines = co.readlines(); #读取所有world文件中的行...#去掉每行头尾空白 matchObj = re.search( line, "%s" % colines, re.M | re.I); #正则匹配开始,使用
学习Excel技术,关注微信公众号: excelperfect 在VBA中,InStr函数是一个非常有用的函数,可用于查找某字符串在另一个字符串中第一次出现的位置。...InStr函数的语法如下图1所示: ? 图1 其中: 1.参数Start,可选,指定搜索的起始位置。如果省略该参数,则会从String1的第一个字符开始查找。...如果省略该参数,比较模式由Option Compare语句值决定。 简单地说,InStr函数就是查找String2在String1中第一次出现的位置。...图2 示例2:统计字符串中包含某子字符串的数量 下面的代码统计字符串str1中发现字符串str2的个数: Sub InstrSample2() Dim str1 As String Dim...图3 示例3:获取字符出现的多个位置 如果一个字符串在另一个字符串中多次出现,要获取该字符串出现的这些位置值,示例代码如下: Sub InstrSample3() Dim str1 As String
今天把学习的源文件共享了出来,供大家学习使用 上次想到要学习这个 结合网友也提出意见,做一个,如果有用,请下载或复制代码使用 【问题】我们在工作中有时要在某个文件(工作簿)中查找一些数据,提取出来...想要做好了以后同样的工作就方便了 【想法】 在一个程序主控文件中 设定:数据源文件(要在那里查找的工作簿) 设定:目标文件(要保存起来的那个文件) 输入你要查找的数据:如:含有:杨过,郭靖的数据。...要复制整行出来 主控文件设定如图 数据源文件有两个工作表 查找到"郭靖"的数据保存到目标文件的【射雕英雄传】工作表 查找到"杨过"的数据保存到目标文件的【第一个】工作表 【代码】 Sub...从一个工作簿的某工作表中查找符合条件的数据插入到另一个工作簿的某工作表中() Dim outFile As String, inFile As String Dim outWb As...Exit Sub End If ' 在找到唯一匹配项时继续查找
15.如何指定函数要返回的值? 通过将值赋给函数名称。 16.过程中的局部变量能否在调用过程之间“记住”其值?如果要这样,怎么办? 能够,通过使用Static关键字声明变量。...17.VBA可以识别通用格式的日期,例如2020/11/11。在VBA代码中,如何表明该值是日期? 通过将其括在#字符中。 18.哪个VBA函数用于为日期添加间隔? DateAdd函数。...19.哪两个函数用于搜索文本(在另一个字符串中查找一个字符串)? InStr函数和InStrRev函数。 20.如何转换字符串,以使每个单词的首字母大写,而所有其他字母小写?...22.如何从字符串开头提取一定数量的字符? 使用Left函数。 23.在VBA程序中使用哪个Excel对象引用的工作表单元格区域? Range对象。...Range对象的Value属性返回一个空字符串。 25.Worksheet对象的UsedRange属性引用什么? 包含工作表中所有已使用单元格的最小单元格区域。 26.如何在单元格中添加批注?
要声明变量为字符串,可以使用String或Variant数据类型。要初始化字符串变量,将其值放在双引号中并将其赋值给变量。下面是一些例子。...字符、字符串和过程 将字符或字符串传递给过程 与普通值一样,可以将字符或字符串传递给过程。创建过程时,在过程的括号中输入参数及其名称。然后,在过程的主体中,使用合适的参数。...字符串的左子字符串 如果有一个现有字符串,但希望使用字符串左侧字符中的多个字符创建一个新字符串,则可以使用Microsoft Excel 的LEFT函数或VBA的Left函数。...如果要跳过第一个实例或希望解释器从左侧字符以外的位置开始检查,使用第二个版本。在这种情况下,Start参数允许指定开始在String1中查找String2的起始位置。...InStr函数用于从左侧开始检查字符串。
标签:VBA实用代码 一个单元格区域内有一组数字,这些数字中存在多个相同的数字,想要将这些数字中的唯一值提取出来并组合成一串数字文本,如下图1所示。...图1 可以使用VBA编写自定义函数来实现,代码如下: Function ConcatenateUnique(ByRef rngRange As Range, _ Optional ByVal...ConcatenateUnique = strAnswer End Function 这个函数仅将指定单元格区域中的唯一值使用可选的格式字符串连接起来。...如果未指定格式字符串,则被视为字符串(@)。此函数在每个值之间插入分隔符字符串,默认分隔符设置为” ”。 这段代码来自strugglingtoexcel.com。...通常,我们会考虑使用Dictionary对象,在连接符合要求的值之前获取唯一列表。然而,这段代码另辟蹊径,使用了VBA中的InStr函数,在连接之前检查是否已将值添加到结果中,如果没有则添加。
因为ADO这个东西不仅仅只有Excel VBA可以调用,只要能调用COM组件的语言都是可以使用的,所以ADO实现的方法和属性都是通用性的,对于使用Excel VBA的人来说,有些时候为了方便在Excel...实现OpenDB 打开数据库就是调用ADO的Open方法,在打开的时候,主要是需要写好Provider字符串,前面基本上是使用Excel来做测试的,但是数据库有很多种,不同的数据库Provider字符串是不一样的...(b, vbUnicode) If VBA.InStr(str, "SQLite format 3") Then GetExtByBin = "sqlite"...ElseIf VBA.InStr(str, "Standard Jet DB") Then GetExtByBin = "mdb" ElseIf VBA.InStr(str, "...End Function GetProvider函数把一些常用的连接语句都做到了这个函数中,在外部只需要传入对应的文件路径或者是使用udl文件描述的连接语句都可以。
,使用了《VBA代码库07.功能强大的字符替换函数》介绍的TranslateString函数,将字符串中的分隔符全部替换为分隔符列表中的第一个分隔符。...因此,必须将TranslateString函数代码放置在与本代码相同的工作簿中。...,找到指定位置的子字符串在字符串中开始位置(之前的分隔符位置,即变量iLastPos的值)和结束的位置(之后的分隔符位置,即变量iPos的值)。...如果查找分隔符失败,则iPos1的值为0,退出循环。...图1 示例2:在公式中使用来提取指定位置的子字符串 如下图2所示,演示了在公式中使用ExtractString函数的几种情形。 ? 图2 下面是代码的图片版: ?
这样做表格,虽然能够看懂,可是一旦我们需要使用VLookup等函数查找某一个数据的时候,就非常的不方便了,我们需要转换为下面这种: ?...3、代码实现 这个要用代码实现的话,逻辑上还是比较简单的,就是按照特定的字符把字符串拆开,然后插入行,复制数据。 本人使用一般是先手动选择一些需要处理的单元格,再运行程序。...As String strDefault = "/" Dim strRng As String strRng = rngSelect.Cells(1).Value If VBA.InStr...(strRng, " ") Then strDefault = " " ElseIf VBA.InStr(strRng, "、") Then strDefault...(d.rng.Value) If VBA.InStr(strValue, d.StrSplit) Then tmp = VBA.Split(strValue, d.StrSplit
SQL函数 INSTR 返回子字符串在字符串中的位置的字符串函数,具有可选的搜索起始点和出现次数。...它可以是列的名称、字符串字面值或另一个标量函数的结果,其中基础数据类型可以表示为任何字符类型(如CHAR或VARCHAR2)。 substring - 一个子字符串,被认为出现在字符串中。...起始值为0、空字符串、NULL或非数字值会导致INSTR返回0。 指定start为负数会导致INSTR返回。...描述 INSTR在字符串中查找子字符串,并返回子字符串的第一个字符的位置。 位置以整数形式返回,从字符串的开头开始计算。 如果substring没有找到,则返回0(0)。...人表。 它定位用于将姓氏与name字段的其余部分分隔开的逗号,然后从该位置减去1:
实际中求和的时候可以用:sum(nvl(字段名,0)) 查询表中用不包含的记录 select * from ts_person where id not like '0000%' 修改表字段的数据类型...sql alter table tl_year_task modify course_total varchar2(10) 给表添加字段的sql并设置默认值 alter table TL_YEARTASK...()函数 instr函数为字符查找函数,其功能是查找一个字符串在另一个字符串中首次出现的位置 格式一:instr( string1, string2 ) // instr(源字符串, 目标字符串)...格式二:instr( string1, string2 [, start_position [, nth_appearance ] ] ) // instr(源字符串, 目标字符串, 起始位置,...,将多行值转成一列 wm_concat(列名)这个神奇的函数,他可以把列值用“,”分隔开,而且是显示成一行 lpad()函数 lpad函数从左边对字符串使用指定的字符进行填充。
INSTR INSTR函数用于查找一个字符串在另一个字符串中的位置,可指定从哪个位置开始查找。 示例: 假设我们有一个表books,其中title字段存储书名,我们想要找到包含"奇幻"的书籍。...示例: 同上,使用LOCATE函数查找包含"奇幻"的书籍。 SELECT title FROM books WHERE LOCATE('奇幻', title) > 0; 3....REGEXP_INSTR REGEXP_INSTR函数用于使用正则表达式在字符串中查找子字符串。 示例: 查找所有标题中含有连续两个或更多元音字母的书籍。...SUBSTR SUBSTR函数用于从字符串中截取一段子字符串。 示例: 提取书名中的前三个字符。...REPLACE REPLACE函数用于在字符串中替换指定的子字符串。 示例: 将所有书名中的"奇幻"替换为"魔幻"。
Excel是如何管理加载宏列表的 在后台,Excel使用注册表和一个特殊文件夹来管理存在哪些加载项以及已安装了哪些加载项。...2.注册表 对于与上述位置不同的加载项,Excel将在注册表中查找。当单击“浏览”按钮以查找加载项时,会在此处添加键。...所需的值只是加载项的路径及其名称,如下图3所示。 图3 选择了哪些加载宏 在注册表的另一个位置,Excel会记录选择了哪些加载项(在加载项对话框中检查)。...如果加载项不在加载项文件夹中,则包含完整路径。 注意,这些注册表项在关闭Excel后更新。 如何使用VBA来安装Excel加载宏 编写一些简单的代码来启用加载项,弹出的消息框如下图5所示。...如果单击“否”,则会弹出另一个对话框,询问用户是否希望继续询问有关安装加载项的问题,如下图8所示。 图8 如果单击“是”,代码会存储该响应值,因此不会再次打扰用户。
很多情况下,我们需要使用工作表中的数据来填充组合框,但往往这些数据中含有许多重复值。如何去除重复值并得到唯一值,这是一个永恒的话题,大家也会用到各式各样的方法得到结果。...本文讲解一种技巧,使用Recordset(记录集)来获取唯一值并将其填充到组合框中。 示例数据如下图1所示。在工作表中有一个组合框,需要包含列A中的省份列表,但是列A中有很多重复的省份数据。 ?...单击功能区“开发工具”选项卡中“插入”按钮下ActiveX控件中的“组合框”,在工作表中插入一个组合框,可以看到Excel将其自动命名为“ComboBox1”,如下图2所示。 ?...可以在任何事件或过程中调用它们,例如工作簿打开事件、查询刷新事件或者按下按钮后。 运行或调用过程后,在工作表中单击组合框右侧下拉按钮,结果如下图3所示。 ?...然而,上面的方法更容易,并且使用记录集允许从装载的记录集中快速调整查询来捕获另一个字段或者创建另一个组合框。
领取专属 10元无门槛券
手把手带您无忧上云