# How do you get an Exell Spreadsheet to count up to 4,294,967,296

#### scharfshutze009

##### [H]ard|Gawd
How do you get an Exell Spreadsheet to count up to 4,294,967,296 in Decimal without having to type each Formula into each cell if this is possible? I tried =IF(A2=INT(A2),0,LEN(MID(A2-INT(A2),FIND(".",A2,1),LEN(A2)-FIND(".",A2,1)))), but it didn't help much and I could only find three pages of relevant answers in my webpage search using Google Chrome. I'm using LibreOffice actually and not Microsoft Excel because I can't afford the subscription.

#### Nobu

##### [H]F Junkie
Special copy: copy formula. Should automatically change cell values as if you used the copy handle, although I'm not certain on that.

#### scharfshutze009

##### [H]ard|Gawd
Special copy: copy formula. Should automatically change cell values as if you used the copy handle, although I'm not certain on that.
Thank and sorry I should have been more specific. By that I mean I'm trying to create a Non-Printable ASCII character chart and I want a formula or function that will automatically fills the rows in decimal up 4,294,967,296. Then I want it to count up to automatically fill the rows up to 4,296,967,296 in Octal, Hexidecimal, ASCII, and Binary. I don't think this is the right forum to ask, but where should I ask such a question if not here on hard forum. I did up to 255 so far, but it was all manuallly and very tedious, which if I actually knew what I was doing it would even be necessary to fill each cell manually in dot docx using libre writer.

#### modi123

##### Supreme [H]ardness
I would think you would use a macro.

Example - this fills the rows 1 -> 10, of the A column, with it's row number.

Rich (BB code):
``````sub testFill

dim document   as object
dim dispatcher as object

dim maxVal as integer
maxVal = 10 '!! change this to what ever you want.

document   = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")

dim args1(0) as new com.sun.star.beans.PropertyValue
dim args2(0) as new com.sun.star.beans.PropertyValue

dim iCount as integer

for iCount = 1 to maxVal
args1(0).Name = "ToPoint"
args1(0).Value = "\$A\$" + cstr(iCount)  '!! \$A is the A column and it appends the row number to get the specific cell
dispatcher.executeDispatch(document, ".uno:GoToCell", "", 0, args1())

args2(0).Name = "StringName"
args2(0).Value = CStr(iCount)
dispatcher.executeDispatch(document, ".uno:EnterString", "", 0, args2())
next iCount

msgbox "Completed!"
end sub``````

Last edited:
Nobu
like this