如果您能帮助我解决这个问题，我将不胜感激。我想让vba为我提供从1到单元格G1中从1到1的所有数字，并将其填充到C列中。然后，我希望vba从C1开始检查C列中的每个单元格是否值大于一个数字并填充到其旁边的列中（从D1列开始）
例如，单元格G1的编号为5。
因此，我应该在c列中看到以下内容，即1，2,3,4,5，而在DI列中应该仅看到大于说3的单元格的值。所以这意味着只有值4和5是填充在列D中。
我将不胜感激，因为我对VBA还是很陌生，并且正在努力了解它。
谢谢
试试看：
Sub elyas()
Dim i As Long, MagicNumber As Long
Dim k As Long
MagicNumber = 3
k = 1
For i = 1 To [G1]
Cells(i, "C").Value = i
If i > MagicNumber Then
Cells(k, "D").Value = i
k = k + 1
End If
Next i
End Sub
本文收集自互联网，转载请注明来源。
如有侵权，请联系[email protected] 删除。
我来说两句