vba将select的值直接赋给变量

最新推荐文章于 2023-03-23 11:21:52 发布
最新推荐文章于 2023-03-23 11:21:52 发布
阅读量522 收藏
点赞数
原文链接：http://www.cnblogs.com/zigewb/archive/2013/02/06/2900645.html
版权

strSql = ""
strSql = strSql & " select max(number)  from dbo.#DATA" & vbCrLf
rss.Open strSql, cnn
  numb = rss.Fields(0)
rss.Close

转载于:https://www.cnblogs.com/zigewb/archive/2013/02/06/2900645.html

weixin_30577801
关注
  • 0
    点赞
  • 踩
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
仿制简单的SQL select查询语句，用于对二维数组的查询，建立环境-Excel Vba，可移植到VB环境中
04-10
建立运行环境-Excel Vba，可移植到VB环境中（需修改一些代码） '仿制简单的SQL查询语句，用于对二维数组的查询 '参照SQL语句：Select * From array [Where conditions] [Distinct fields] [ResultWithTitle] ' '实现功能： ' 依条件设置查询数组，返回包含查询字段（或全部字段）的数组，可多条件组合。 ' 条件运算符包括：> = < >= <= <> , like(正则表达式) ' '附注： ' 使用此函数，需要在文件中引用正则表达式脚本 Microsoft VBScript Regular Expressions x.x ' （根据不同的电脑配置和环境此处会有差异） '算法简要： ' 1、查询条件运算符：仅有 >, =, <, >=, <=, <> , like(正则表达式) ' 本函数中仅有上述运算符。原因在于，更多的运算符编制逻辑过于复杂，又不太常用。 ' 为了尽可能多地容纳各种运算关系，添加了正则表达式匹配运算， ' 在某个单一条件中，正则几乎可以容纳绝大部分的比对运算关系了。 ' 2、数字比较： ' 采用了将数字型字符串类型转换为数字之后再比较的方法，结果更为准确。 ' 3、其他算法和运算速度： ' 编制过程中，试验过使用 正则+逻辑分支+表达式引用 的方法， ' 可以实现几乎等同于SQL查询语句的复杂功能，而且代码更简捷。 ' 但运算速度相差过于悬殊（大概几十到上百倍 - "一闪而过"和"一袋烟"的差距！），最后不得不放弃。 ' 所以现在的版本相当于一个简化了的select语句，但对于大多数查询情况而言够用了。
在Excel VBA中将SQL查询的结果赋值给变量的方法
weixin_30791095的博客
08-21 2268
直接上代码示例： nowdate为日期型变量 strSql = "select DISTINCT 日期 from new_ubi_data ORDER BY 日期 DESC Limit 0,1" nowdate = AdoConn.Execute(strSql)(0) 在执行SQL查询语句后添加(0)即可 转载于:https://www.cnblogs.com/daifibonacci...
VBA中，将一个区域赋值给变量（定义为一个变量），然后其中进行操作
yuzhongdexia的博客
02-06 5224
VBA中，将一个区域赋值给变量（定义为一个变量），然后其中进行操作。这样可以简写。 Sub Macro1() Set 表格区域 = Range("A9:H40") 表格区域.Cells(4, 8).Select End Sub
用Select对变量赋值的细节
回首
05-08 1162
1. select top 1 @a = a from bb     这样可以把a的值放在@a中，因为这样筛选出来的a值只有一个，不会出现困惑2. select @a = a from bb    这样将会把筛选出来的最后一个a值放在@a中，例如筛选出来的结果集如：     123     456     789     那么@a的值是789 只对SQL ser
[Excel VBA] 在VBA中如何将SQL得到的数据直接赋值到数组？
小许在北京
11-07 1万+
Q：在VBA中如何将SQL得到的数据直接赋值到数组？ A：可以利用RecordSet的GetRows方法获取数组。 Sub SQL2Arr()      Dim AdoCN As Object      Dim AdoRe As Object      Dim SQL As String      Dim Arr1, Arr2, Arr3      Set Ad
vba mysql select_Excel VBA | 配置数据库以及Select初体验
weixin_39655689的博客
01-19 179
继续往下Dim sql As Stringsql = 'select * from [source$] where [姓名]='张三''不知道各位通过我们赋予sql这个变量的内容，是否可以猜出这个语句将要做的事情？对，我们要从Excel文件中，表单名称叫做source的页面里，挑选出所有姓名叫做张三的数据，source内容如下如果我没猜做，经过系统的筛选，应该可以定位到第一行数据了，我们继续。rs...
WPS VBA 7.0 插件
02-07
1. **变量与数据类型**：VBA中，变量用于存储数据，有多种数据类型，如Integer（整数）、Double（双精度浮点数）、String（字符串）、Boolean（布尔值）等。了解并正确使用这些数据类型对于编写有效代码至关重要。 ...
Excel VBA 经典代码应用大全
06-17
1. **VBA基础知识**：了解VBA的基础语法，如变量声明（Dim、Static、Public、Private），数据类型（Integer、Double、String、Boolean等），以及控制结构（If...Then...Else、For...Next、Do...Loop）。 2. **子...
Excel-VBA宏编程实例源代码-以Select Case使用Like运算.zip
12-15
本压缩包“Excel-VBA宏编程实例源代码-以Select Case使用Like运算.zip”包含了一个名为“以Select Case使用Like运算.xlsm”的文件，它是一个VBA宏启用的工作簿，展示了如何在Select Case语句中使用Like运算符进行...
VBA手册，VBA手册全代码
最新发布
08-10
3. **控制结构**：VBA中的流程控制包括条件语句（If...Then...Else）、循环（For...Next、For Each...Next、Do...Loop）以及选择性执行（Select Case）等。 4. **函数和过程**：VBA中的函数返回一个值，而过程则...
VBA.rar_VBa_vba help
09-21
首先，VBA的基础包括变量、数据类型和控制结构。变量是存储数据的地方，如Integer、Double、String等是不同的数据类型，用于存储整数、浮点数和字符串。控制结构包括条件语句（If...Then...Else）、循环（For...Next...
vba编辑多条Mysql程序_用VBA 比较Excel多行数据，请高手优化程序
weixin_39843986的博客
01-30 152
一个工作簿中有Sheet1和Sheet2两张工作表。要求：Sheet1中从第五行开始，分别与前第4、3、2、1行同列位置比较，若数据值相同，则把该数据放在Sheet2中，并在该行12列算出相同个数；每...一个工作簿中有Sheet1 和Sheet2两张工作表。要求：Sheet1中从第五行开始，分别与前第4、3、2、1行同列位置比较，若数据值相同，则把该数据放在Sheet2中，并在该行12列算出相同...
VBA提高篇33 静态变量和Select...Case
pigerr的博客
03-23 250
VBA指的是模块级的变量,不会因过程结束而消失,声明在所有过程的前面。
全民一起VBA提高篇 第三十二回 Select 简化分枝结构，静态变量坐看沧海桑田
06-06 799
相关知识点 静态变量：模块级的变量都是静态变量，无论是Pubic还是Private，execl关闭静态变量就消失了 例1 运行多少次都是1，每次都要重新分配内存 Sub a() dim x x=x+1 msgbox x End Sub 如果将dim x放在模块前面，每点击一次就会累加 Option Explicit di...
VBA中给变量赋值使用set和不使用set的区别
热门推荐
eclipse_xu
11-21 1万+
VBA中给变量赋值使用set和不使用set的区别 '给普通变量赋值使用LET ，只是LET 可以省略。 '给对象变量赋值使用SET，SET 不能省略。例如ADODB.RecordSet等对象。 Sub AA() Dim arr As String arr = "hello" '本句也可写成LET arr = "hello" End Sub Sub bb() D
sql将select结果赋值给变量
weixin_38759773的博客
04-03 7814
使用navicat建了个查询 不知道为啥写的sql一直报错，问了一下实验室大佬 select @auu := uuid as auu from m_activity where activity_id=12; :=是赋值

“相关推荐”对你有帮助么？

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值