Excel Crypto Portfolio

Don't download just tried it out and was 23 minutes of child porn.

>>3422124
Good luck in jail friend.

>>3422124
wait seriously?

>>3422157
Yea was an old one with vikki

>>3422157
>>3422147

Did you guys even click the link?

It's an excel file and a module to connect to CoinMarketCap.

>>3422182
its a .bas file and .xlsm file, its not a video files.

Just letting you guys know that if you rename the file, you'll probably need to update the formula for your portfolio value in the middle of the chart shown in >>3422095

The old formula:
=ryza_crypto_template.xlsm!portfolio

The new formula:
=YOURFILENAMEHERE.xlsm!portfolio

Anyone try it out yet?

What do you think?

Could you stop being so paranoid /biz/?

Just check it out.

>>3422095
nice try, fbi. I'm not going to jail for this.

>>3422095
Downloaded it on my old laptop OP, since you probably riddled it with viruses

But no, it's actually fine. And I was looking for something like this so thanks

I'd recommend re-building it in Google Sheets, so people don't have to be scared of malicious scripts

>>3423370
this, put the code on github so we can look & modify before we download or install

>>3423325
people have over 500k in crypto here man and for the one with 1k crypto, it's literally their life savings. I'm not going to risk it

>>3423354
>>3423409
Amazing. Really amazing. Is that how it feels to be rich? Being a scared lil' animal fearful for your money?

>>3423370
I probably could, but honestly I wanted to use Excel because, believe it or not, Google Docs can lag my lil' Lenovo Thinkpad. I love it, but it's not too powerful. So yeah, an offline portfolio was my best bet.

But I guess I can see how people might find Google Docs more convenient.

Thanks for the advice. Anything else actually related to the spreadsheet though?

how do I do this in libreoffice? Not using your botnet.

>>3423557
Learn how to use formulas?

I don't know if libreoffice uses the same formulas as Excel. Seems probable.

And it's not a botnet, fool.

>>3423591
it is a botnet. Excel is a botnet. Don't you browse /g/?

>>3423623
Not lately. Gotchya.

I guess I could try to redo this all in Google Docs. Though isn't that a botnet too?

>>3423325

i dont want a keylogger on my pc

>>3423708
y'all need to learn how to code

I looked at the pastbin and it's about 99% the same as I what I wrote for myself

it's just an http request to the coin market cap API which returns the coin data in json

>>3423708
That's alright. You're smart, aren't you? I think most of /biz/ probably thinks they are smart too, don't you guys?

So you probably already know how to open up programs and such in sandbox environments like virtual machines, where you can safely destroy the virtual environment without destroying your actual PC. Or even to just upload a file to a virus scanning website.

But yeah, I don't have to tell you all of this.

And yeah, since you guys are so smart you've already realized that it's not a virus.

So, now that you realize this, what do you think of the FREAKING SPREADSHEET?

>>3423740
Since you know how to code in VB, can you tell me how to return the currency symbol string? I can only retrieve numbers with that code. If I try to retrieve strings, I get an error.

I'm no programmer, so yeah.

>>3422095
this is a virus do not download it

>>3423766
you need to parse the json then you can pull whatever you want out of it like a dictionary object.

this is the json converter I use:
https://github.com/VBA-tools/VBA-JSON

then you can pull whatever you want out of it, ex:

Dim req As New WinHttpRequest
Dim resp As String
Dim g1 As Dictionary, g2 As Dictionary, g3 As Dictionary
Dim btc As String, eth As String, ethbtc As String

Call req.Open("GET", "https://api.gemini.com/v1/pubticker/btcusd")
Call req.send
resp = req.responseText
Set req = Nothing
btc = resp

...etc....

ActiveWorkbook.Worksheets("GEMINI").Range("B2") = btc
Set g1 = JsonConverter.ParseJson(btc)
ActiveWorkbook.Worksheets("GEMINI").Range("B3") = g1("result")
ActiveWorkbook.Worksheets("GEMINI").Range("B4") = g1("last")
ActiveWorkbook.Worksheets("GEMINI").Range("B5") = g1("bid")
ActiveWorkbook.Worksheets("GEMINI").Range("B6") = g1("ask")
ActiveWorkbook.Worksheets("GEMINI").Range("B7") = g1("volume")("BTC")
ActiveWorkbook.Worksheets("GEMINI").Range("B8") = g1("volume")("USD")
ActiveWorkbook.Worksheets("GEMINI").Range("B9") = g1("volume")("timestamp")

File: screenshot.2017-09-10 20.12.11.png (20KB, 1098x398px) Image search: [Google]

20KB, 1098x398px

>>3423801

File: screenshot.2017-09-10 20.16.21.png (15KB, 1112x390px) Image search: [Google]

15KB, 1112x390px

>>3423766
here's the coinmarketcap api results

>>3423801
>>3423826
>>3423862

Thanks for the help. I'll check this out right now.

>>3423862
Geez, I was hoping to keep it simple like my code already was, lol.

>>3423988
parsing the json is simpler in a way. once you get your skill level up.

some json doesn't like to be parsed because the way the delimiters are returned (the square [ and { curly bracket placement), but you can fix them fairly easily. this is what I do for what coin market cap returns:

Public Function BTCticker() As String
Dim req As New WinHttpRequest
Dim resp As String

Call req.Open("GET", "https://api.coinmarketcap.com/v1/ticker/bitcoin/")
Call req.send

resp = req.responseText

Set req = Nothing
BTCticker = Mid(resp, 2, Len(resp) - 2)

Exit Function
End Function

>>3424012
Yeah, I imagine it could. Maybe only have to make a few HTTP requests instead of a bunch like my code? It's getting a bit beyond me though. I'll look more into it later. Appreciate the info, man.

Also, still looking for suggestions for the actual spreadsheet from anyone. Anything you like or don't like?