Question

excel 的vba写了个简单的程序，为什么不执行呢？

Sub Macro4()

Dim x, d, f, g, h, j, k, l, c, u As Integer

x = 4

For j = 2 To [a65536].End(xlUp).Row

If Cells(j, 4) = "sif0901" Then
Cells(x, 17) = "sif0905"
x = x + 1
End If
Next j

'
' Macro4 Macro
' 宏由 USER 录制，时间: 2009-1-16
当然点执行了啊， 什么错也不报@！！！ 就是不执行

Answer 1

你的程序没有错，但是[a65536].End(xlUp).Row的值可能为1，那么程序执行一瞬间就结束了，你按F8一句一句执行试试看。

Answer 2

你点执行了吗？如果不执行，报的又是什么错？

Answer 3

新手吧.一开始就定这么多不用的变量干嘛呀?还有就是你必须让参加计算的工作表处于活动工作表,并且里面有东西.