[已解决]一表的a2到a取值为4怎没写代码

oob111 · 发表于 2010-8-17 22:53

不知用range怎末表达。一列的第二行到末尾取值为4

range("a2:a")=4怎么不对，

不知谁会，并把全部值4改绿色

最佳答案

月排行榜 / 总排行榜

xmlinxinzhi

2010-8-17 22:59

range("a2:a65536")=4

跳转到最佳答案楼层

那么的帅 · 发表于 2010-8-17 22:54

是字体绿色还是单元格底色绿色

oob111 · 发表于 2010-8-17 22:55

是字体绿色

那么的帅 · 发表于 2010-8-17 22:57

还有末尾指什么？

是所有单元格的最后一行，那就有65536行，还是指原来有数据的最后一行？

xmlinxinzhi · 发表于 2010-8-17 22:59

这个最佳答案由 xmlinxinzhi 给出，感谢 xmlinxinzhi 的回答。

单击隐藏图章

range("a2:a65536")=4

oob111 · 发表于 2010-8-17 23:00

我见过columns("a:a")，类似的简单的不要想到循环

fjmxwrs · 发表于 2010-8-17 23:10

sub aa ()

    Dim R As Long
    Dim I As Range
    R = Range("A65536").End(xlUp).Row
    For Each I In Range("A2", Cells(R, 1))
        If I = 4 Then
            I.Font.ColorIndex = 10
        End If
    Next I

end sub

fjmxwrs · 发表于 2010-8-17 23:15

不循环怎么找到值是4的？如果你只是表示单元格区域而已

表示方法为range("A2:A65536")就是A2到A列最末单元格区域

dim R as long

R=Range("A65536").End(xlup).Row 就是指A列最后一个非空行，R代表这个行号

Range("A2",cells(R,1))就表示A2到最后非空单元格区域

oob111 · 发表于 2010-8-17 23:17

range("a2:a65536")=4
为何对呢？是正解

		自动登录	找回密码
密码			注册