Drawing on a VBA Userform

I’m making a few post with old stuff from my main site (which is now closed), this is so I can point to the blogpost when I update my downlaods page, which I am planing on doing at some stage in the next few years!

This example uses an API to let you actually draw on the form free hand style!

drawonform

It  can be downloaded here: Drawing_v3

Comments

  1. Dan Brown says:

    Ross,

    I have developed a route handheld program for my ice cream distributing business using vba in excel and would like to add a signature capture function. Your code here looks like it would work for me or at least give me a good start. Would you sell this code to me to use?

    Thanks,
    Dan Brown

  2. ross says:

    Hi Dan,
    I can sell you the code if you like, but you can down load it for free! the link is at the bottom of the post! ;-)

    If you come up with anything that works I would be interested to see it, and maybe we could share it on the blog?

    Thanks
    Ross

  3. jecirbe says:

    hello,
    i ‘m not an expert in vba. i want to know 2 things:
    first: is it possible to have the pen larger?
    second: is it posbble to save the drawing?

    thanks
    jecirbe from France

  4. Liviu S says:

    Here is how you can get the color to work:
    for example edit the NewPen function as below:
    Sub NewPen(hWidth, hColor)
    hNewPen = CreatePen(PS_SOLID, hWidth, hColor)
    SelectObject hdc, hNewPen
    End Sub

    so just add SelectObject

    And btw, what is this Range(“repaint_mode”) = 0 ?
    and what is “repaint_mode”?
    I know what this line does but I can’t figure it out why…

  5. Henrik Stisen says:

    If the code is Free why is there then password i Visual Basic?

Submit a Comment