Excel VBA自定义序列

Question

使用Excel VBA，我试图创建自定义序列。我怎样才能继续自定义序列范围的IP地址范围：10.168.187.0 - 10.168.187.100？

我到目前为止的代码发布在下面。

Sub Sequence() 
' 
' Sequence Macro 
' Macro recorded 13/02/2013 by Don 
' 
' Keyboard Shortcut: Ctrl+Shift+M 
' 
Range("A1").Select 
ActiveCell.FormulaR1C1 = "10.168.187.0" 
Range("A2").Select 
ActiveCell.FormulaR1C1 = "10.168.187.1" 
Range("A3").Select 
ActiveCell.FormulaR1C1 = "10.168.187.2" 
Range("A4").Select 
End Sub 

Answer 1

假设你正在寻找自动化细胞的完成，下面应该工作：

Sub CompleteRange() 

For i = 1 To 101 

    Cells(i, 1) = "10.168.187." & (i - 1) 

Next i 

End Sub