Roman number series (macro)
Closed
Caines87
Posts
1
Registration date
Wednesday April 27, 2011
Status
Member
Last seen
April 27, 2011
-
Apr 27, 2011 at 10:37 PM
RWomanizer Posts 365 Registration date Monday February 7, 2011 Status Contributor Last seen September 30, 2013 - Apr 28, 2011 at 03:50 AM
RWomanizer Posts 365 Registration date Monday February 7, 2011 Status Contributor Last seen September 30, 2013 - Apr 28, 2011 at 03:50 AM
Hey guys.
I need to make macro witch makes series of Roman numbers (Similar to built in excel series- http://i63.photobucket.com/albums/h129/Edds87/fillseries.jpg )
So I made user-form and recorded built in "fill series" in macro and I'm trying to combine and modify them but I'm out of luck. I'm sure that this is maximum five minute job for experienced person, but I'm newbie to VBA and I'm really stuck.
Please help me.
P.S. Sorry for my terrible english.
I need to make macro witch makes series of Roman numbers (Similar to built in excel series- http://i63.photobucket.com/albums/h129/Edds87/fillseries.jpg )
So I made user-form and recorded built in "fill series" in macro and I'm trying to combine and modify them but I'm out of luck. I'm sure that this is maximum five minute job for experienced person, but I'm newbie to VBA and I'm really stuck.
Please help me.
P.S. Sorry for my terrible english.
Excel
Related:
- Roman number series (macro)
- Best scandinavian crime series on netflix - Guide
- Spell number in excel without macro - Guide
- Xbox series x 3d blu ray - Guide
- How to zoom out on xbox series x - Guide
- Audio track download for series - Guide
1 response
RWomanizer
Posts
365
Registration date
Monday February 7, 2011
Status
Contributor
Last seen
September 30, 2013
120
Apr 28, 2011 at 03:50 AM
Apr 28, 2011 at 03:50 AM
Use the following macro :
Once the custom series added you can delete the codes.
Sub CustomRomanSeries() Dim i As Long On Error Resume Next For i = 1 To 4100 Range("A" & i).Value = WorksheetFunction.Roman(i) Next i Application.AddCustomList ListArray:=Range("A1:A3999") End Sub
Once the custom series added you can delete the codes.