网站首页 网站地图
首页 > 经典句子 > currentregion

currentregion

时间:2023-05-12 15:14:04

Excel请问arr是什么意思,是几维的数组?

1、arr主要是Excel中VBA声明的数组的一种习惯表达方式2、一般习惯什么数组为arr,例如,dim arrarr=[a1].currentregion.value3、一般普通的arr只是文本,和VBA中的arr声明为数组后,自然是不同的。

Excel VBA代码如何实现股票数据汇总?

Sub test() For r = 3 To Range("A1").CurrentRegion.Rows.Count dm = Cells(r, 1).Value If Val(dm) = sh000001 Then '判断上证还是深证,规则比较简单,无法准确判断创业板 URL = "http://qt.gtimg.cn/q=" & dm '从腾讯证券接口获取数据 Else If Val(dm) < 600000 Then URL = "http://qt.gtimg.cn/q=sz" & dm Else URL = "http://qt.gtimg.cn/q=sh" & dm End If End If With CreateObject("msxml2.xmlhttp") '打开腾讯接口数据 .Open "GET", URL, False .send sp = Split(.responsetext, "~") If UBound(sp) > 3 Then '把腾讯证券接口的数据分别写入excel对应单元格 Cells(r, 2).Value = sp(1) Cells(r, 4).Value = sp(3) Cells(r, 5).Value = Format(sp(30), "0000-00-00 00:00:00") Cells(r, 6).Value = sp(4) Cells(r, 7).Value = sp(5) Else Cells(r, 3).Value = "代码错啦!" End If End With Next End Sub

excel中指定几列为0时隐藏该行?

这是一个我用VBA 编程序的实例: (假设你的表放在当前页,从第1行连续共N行,要判断第M列单元是否0值或空白,如果该单元=0则自动隐藏该行。 你用快捷键时,VBA自动对整个表的每一行按M列是否为零作隐藏或维持原状处理) 在EXCEL中选菜单Tools-Macro-RecordNewMacro建立一个用快捷键呼叫的VBA模块,再进入VBA编辑窗口将下列语句加入该VBA模块。 Sub ZZZ()'' ZZZ Macro' Macro recorded 5/30/2008 by CNYIZHO'' Keyboard Shortcut: Ctrl+Shift+N'M = 1 ;指定列号N = ActiveSheet.[A1].CurrentRegion.Rows.Count ' 取该表有效非空行数(指有数据的连续行) For I = 1 To N '扫描表中所有行 If Cells(I, M) = Empty Then ' 如果I行第M列的单元值=0或空白 则隐藏它 Rows(I).Hidden = True '隐藏I行 End If NextEnd Sub