求vb循环代码

mjol 2016-11-25 12:07:42
从单元格A2至A721共720个依次循环:12个1→12个2→12个3......→12个60;然后再从A722至A1441共720 个重复循环:12个1→12个2→12个3......→12个60。
...全文
272 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
熊孩子开学喽 2016-12-02
  • 打赏
  • 举报
回复
引用 2 楼 Chen8013 的回复:
[quote=引用 1 楼 WallesCai 的回复:] 嵌套的双重循环.
一层循环搞定。 填入的数字通过计算得到。 for i = 2 to 1441 ....... 就行了。 [/quote] ......开洞脑筋
舉杯邀明月 2016-12-02
  • 打赏
  • 举报
回复
引用 4 楼 WallesCai 的回复:
[quote=引用 2 楼 Chen8013 的回复:] [quote=引用 1 楼 WallesCai 的回复:] 嵌套的双重循环.
一层循环搞定。 填入的数字通过计算得到。 for i = 2 to 1441 ....... 就行了。 [/quote] ......开洞脑筋[/quote] 其实不过是很简单的算法问题而已。 比如:
For i = 2 To 1441
   Sheet1.Range("A" & i).Value = 1 + ((i - 2) Mod 720) \ 12
Next
赵4老师 2016-11-28
  • 打赏
  • 举报
回复
舉杯邀明月 2016-11-26
  • 打赏
  • 举报
回复
引用 1 楼 WallesCai 的回复:
嵌套的双重循环.
一层循环搞定。 填入的数字通过计算得到。 for i = 2 to 1441 ....... 就行了。
熊孩子开学喽 2016-11-25
  • 打赏
  • 举报
回复
嵌套的双重循环.

7,763

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧