带你入门VBA（2004第一期）

jakk123

这个贴帮助很大.谢谢斑竹!!!

kingsoft01

QUOTE:

以下是引用great在2005-8-30 15:57:00的发言：
Value = Application.WorksheetFunction.CountA(Range("a1:a40000"))是什么意思？CountA(Range("a1:a40000"))是什么意思/

     CountA(Range("a1:a40000"))是什么意思/

    这个是指A列第一个单元格到第40000个单元格计数.

   Count 不包括字符,只是数字计数

  CountA 包括字符计数

kingsoft01

我以前也不懂VBA看过别人的作品,都不错,无意间看见了这个帖子,也从中学了不少的东西,

但是我一直都很疑惑,为什么刚开始的时候都是一些经典的帖子,可是到后面了,都是一些无关痛痒的类似灌水的帖子

斑主能不能放点好的帖子上来,不要让这个地方被水淹没了

kingsoft01

QUOTE:

以下是引用zhiguoabc在2006-10-10 19:11:00的发言：

想在

B1：B15单元格输入101~105，这个错在哪了？

Sub 矩形1_单击()

Dim i As Integer
For i = 101 To 115
Dim x As Integer
For x = 1 To 15
Sheets("sheet1").Cells(x, 2) = i
Next
Next

End Sub

我是这样做的,

Sub 矩形1_单击()

Dim i As Integer
Dim x As Integer

For i = 1 To 15
      x = 100 + i
Sheets("sheet1").Cells(i, 2) = x

Next
End Sub

个人认为For x = 1 To 15是错的

因为这个和变量i是没有关系的,应该使用嵌套语句吧,具体的还望斑竹解释

[此贴子已经被作者于2007-1-5 3:14:30编辑过]

xyz_1_2_3

是不是 《中文 Excel 2000 编程 24 学时教程》这本书呀 我可读过了 真可谓是“好差一本书”呀

学习为了进步

[em02]兰色,我就是看你的书开始学的,你很厉害啊

tancl

大侠，你讲的教程能不能按在编辑框里输入的形式一样啊？

就好比说：在什么位置，输入什么样的内容，可能更形容给初学者理解，谢谢！

像上面的第一、二句我还知道，但第三句应该在哪里输入，输入什么内容就搞不懂了，麻烦您了！

第一行：Sub 矩形1_单击()
第二行：Sheets("sheet1").Range("a1") = 100
第三行：Sheets("sheet1").Cells(2, 1) = 200
第四行：End Sub

再输入下面的循环程序

Sub 矩形1_单击() Dim X As Integer 声明 X为整数型变量 For X= 1 To 20 X的值为从1到20循环 Sheets("sheet1").Cells(x, 1) = x 单元CELLS(X,1)的值班等于X值 Next End Sub

jefk

非常好

rxrxrxrx119

我来了.怎么学?

pzcussons

我想学，可以吗？