[O/T]


Yea there's a pile of stuff in that nonsense that would get most of the regulars on the forums booted out if anyone bothered to fully read it. I stopped wasting my time reading it when I reached the this line:


Anyone who has a SNURK sig, BoincStats sig, etc is automatically in violation of forum rules, pretty sure the creators of those have not given "exclusive rights" to anyone. And how about people who just post text only and have no sigs? Well they have "badges" displayed with their names as part of each post. I have no "exclusive rights" granted to me personally in a letter signed by WCG directors, who are presumably the only people in WCG empowered to sign away their rights to those badge images to me. [/O/T]

Back on topic I'm impressed with the work you've put into this Sek, I'm coming to suspect that your crunching activities are only an excuse to enable your Excel data manipulation hobby to thrive. Hopefully it won't be long until the first production version is released. I'd be interested in downloading a copy when it's ready.

Am aware it could do harm, to with, so used to work in an English language interface, one can forget that %F and x (Now combined into %Fx), does not execute, or might do the wrong thing if done on a OS that's set up to for instance my own or say German (something on the ToDo list to solve).

The tool, v2.0w, has been in 'private' publication 'on request' since long (read up in this thread how to get it). One member offered access to the member's (large) contribution account for testing... which helped infinitely to scale it well in working up to 17.5K active results and 15K in progress... Archived history build now exceeding 900K results to analyze every which way wanted to (Export to MySql or Access e.g.). Live archive up to 200K, depending on performance of the computer it is run on.

As for the software code, MS publishes https://msdn.microsoft.com/en-us/library/d5fk...amp;MSPPError=-2147217396 which gave me the lead on how to keep the shell app on top during testing until all steps were finished (IOW, could hide this too and you'd never know/see whether the export happened or not. Did add a code line to put the timestamp of execution below the respective button as positive feedback . The final vba, doing more in less lines (19) with expanded annotation for anyone to use and abuse and learn 'how to', if you wish to do your own thing (You're encouraged :):

Public Const BaseP As String = "WbkLoc" 'Dir where file is stored, in BaseP constant
Public Function OpenPaint(strFile As String)
     
    Dim paintID As String, WshShell As Object: Set WshShell = CreateObject("WScript.Shell")
    paintID = Shell("mspaint.exe " & Chr(34) & strFile & Chr(34), 1) 'open app through Shell call, _
    concatenation of app + path in quotes (needed due spaces in path)
    Debug.Print paintID
    With WshShell 'Call Windows Scripting and pass keystrokes per below, with delays
            Application.Wait Now + TimeValue("00:00:02") ' VBA does all timing in whole seconds
        .SendKeys "^(v)" 'paste
            Application.Wait Now + TimeValue("00:00:01") ' VBA does all timing in whole seconds
        .SendKeys "^(s)" 'save file - needs to cater for language of interface as set by user
            Application.Wait Second(Now) + 0 'A different way to set a wait-state, DoEvents would do here to.
        .SendKeys "%Fx" 'open file menu, combined %(F) and eXit into %Fx, no waits needed - 18-9-2016
    End With
    
End Function
Sub ExportSummary()
'
' GSUM Copy Macro for export - Ctrl+d (small) if run by hand
'
    sALL.Shapes("ActiveData1").CopyPicture xlScreen, xlBitmap
    Call OpenPaint(Range(BaseP) & "ActiveData.Png")
    [WhenRun] = "Export": Application.Run "TimeStamp" 'inserts execution time below export summary button.
    
End Sub

12 Programmers always will come up with 13 solutions, there's so many ways to get to Roma.

And to put on the cracked record, if knreed could/would implement xml/verification/authorization code access ** to the info on 3 more pages on MC, the whole thing could be set to truly run autonomously, instead of the previous century scraping method.

** Works brilliantly on the main MC page and Result Status querying.

Oh Lol, while researching WshShell capabilities, stumble on it being able to pass Jscript, PerlScript and whatnot, for input/commands to Internet Explorer (which is the webbrowser engine that Office exclusively uses to interface with the intertubes). Might be an avenue to send member name/password i.e. sign-in to MC (who has set her/his browser to remember ID/PW for WCG ), the one concrete wall to take and then go cycling in total SetAndForget posture (WCG would love all members to do that ).

Sadly, MS removed functionality from Jscript, so anyone having to consider forward or backward compatibility is up the famous creek. I'll be darned if starting to make calls to kernel32.dll to get the wait states in (and then having to code for that in case someone runs 64 bit OS... who doesn't?).

And in the department of Show-Off, here's the tools button bar, free floating, resizable, anywhere you want to put it, with a grip, right bottom, and a little red note that you can hit Ctrl+b, to return the bar to it's standard parking lot, resizing to normal.



The timestamps indicate when last hit, the blue highlight to help quick focus as to which button was hammered last.

Started to develop a custom ribbon which will only be loaded when the workbook is active, but it's cumbersome 3 step coding. It's not editable via VBE, not through the Excel interface, sort of piggybacks in xml onto the workbook. For now, the quick-access bar gets extra icons, they work, when the workbook is loaded, but unfortunately, no custom icons can be used. Objective is to have the Ribbon and remove/shrink the pictured button bar and free up screen area and reduce the clutter.

Ripped out all the scraping code and rebuild, half the size it could be done.

I have Office Home & Student 2010 32-bit installed and in regular use on W10 64-bit. Maybe it's some extra component that won't install?