Excel VBA Custom Sequence

Question

Using Excel VBA, I am trying to create a custom sequence. How can I continue a custom sequence for a range of IP Addresses ranging from: 10.168.187.0 - 10.168.187.100?

The code I have so far is posted below.

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

Formula: ="10.168.187." & ROW()-1 (starting in A1)

Tim Williams
– Tim Williams

2013-02-13 22:38:20 +00:00
Commented Feb 13, 2013 at 22:38 — Tim Williams
– Tim Williams, Commented Feb 13, 2013 at 22:38

DomW · Accepted Answer · 2013-02-13 22:32:00Z

1

Assuming that you're looking to automate the completion of the cells, the following should work:

Sub CompleteRange()

For i = 1 To 101

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

Next i

End Sub

answered Feb 13, 2013 at 22:32

DomW

264 bronze badges

Sign up to request clarification or add additional context in comments.

1 Comment

Omar Khan Over a year ago

Thanks Dom that has worked exactly how need it. I'm very new to VBA so appreciate the help :)

Collectives™ on Stack Overflow

Excel VBA Custom Sequence

1 Answer 1

1 Comment

Your Answer

Linked

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

1 Comment

Your Answer

Sign up or log in

Post as a guest

Linked

Related