Location:
Search - vba count
Search list
Description: 用PowerPointVBA编写的算24游戏，内附算法说明，打开后可用Alt+F11查看VBA源码。-PowerPointVBA prepared with count 24 games, containing algorithms that can be used to open after Alt+ F11 view the VBA source code.
Platform: |
Size: 47104 |
Author: leosimon |
Hits:
Description: 本人自己用PowerPoint VBA编写的随机抽奖和倒计时程序，很多公司在搞活动时需要这个，特此发布出来-I own PowerPoint VBA prepared by random draw and countdown procedures, many companies engaged in activities need this, is hereby released from
Platform: |
Size: 46080 |
Author: leosimon2 |
Hits:
Description: 以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
Platform: |
Size: 37888 |
Author: flaglong |
Hits: