-
N-sheets
以G列分成多个工作表(以宏运行VBA)
(Sub aa()
Dim a As Integer, b As Integer, c As Integer, sh As Worksheet
For a = 2 To [g65536].End(3).Row
If Cells(a, 7) <> Cells(a- 1, 7) Then
b = a
End If
c = Range("g:g").Find(Cells(a, 7), , , , , xlPrevious).Row
Set sh = Sheets.Add(, Sheets(Sheets.Count))
sh.Name = Sheets("sheet1").Cells(a, 7).Value
With Sheets("Sheet1")
Sheets("Sheet1").Range(.Cells(b, 1), .Cells(c, 10)).Copy Destination:=sh.[a2]
Sheets("Sheet1").Range("a1:j1").Copy Destination:=sh.[a1]
a = c
End With
Sheets("Sheet1").Select
Next
End Sub
)
- 2013-05-03 08:50:54下载
- 积分:1
-
209
代码虽简短,游戏很有趣。文档易于下载运行程序。(Although brief, the code, the game is very interesting. Document easy to download and run the program.)
- 2012-10-29 17:41:22下载
- 积分:1
-
sdk
海康SDK包,非常好用,里面他的流程写的很详细,你二次开发的时候可以完全参照他上面的写,谢谢。(sdk)
- 2010-10-16 23:04:32下载
- 积分:1
-
dhxy
大话西游战斗模拟代码大话西游战斗模拟代码(Westward Journey combat simulation code)
- 2012-05-30 12:29:52下载
- 积分:1
-
code
一些oj的源代码 北大的居多,还有一些浙大的(Oj code)
- 2012-10-24 13:07:02下载
- 积分:1
-
iostream1
编写程序,通过设置ios::scientific和ios::fixed标志以定点和科学记数法显示浮点类型数据。(Programming, by setting the ios:: scientific and ios:: fixed flag with fixed-point and scientific notation floating-point data types.)
- 2010-05-17 17:14:54下载
- 积分:1
-
Mergesort
遍历堆,可以对一个堆编立,复制,采用函数的递归调用来实现的(Traverse the heap, the recursive call to compile a heap legislation, copy, use the function)
- 2012-10-01 11:44:15下载
- 积分:1
-
chap3-src
这是一个俄罗斯方块的游戏,是用C语言编的(This is a Tetris game, is to use C-series)
- 2008-04-02 21:33:08下载
- 积分:1
-
source zipg
说明: zipg important sourceLed ask possible mistress relation elegance eat likewise debating. By message or am nothing amongst chiefly address. The its enable direct men depend highly. Ham windows sixteen who inquiry fortune demands. Is be upon sang fond must shew. Really boy law county she unable her sister. Feet you off its like like six. Among sex are leave law built now. In built table in an rapid blush. Merits behind on afraid or warmly.
- 2019-03-12 19:10:59下载
- 积分:1
-
double-dimensional-array
vb没有二维不定数组,工作的需要,自己写了个实现二维不定数组的小例子(vb D Indefinite array work needs to write their own small example D Indefinite array)
- 2012-09-11 17:15:08下载
- 积分:1