Results 1 to 8 of 8
  1. #1
    New Lounger
    Join Date
    Jun 2016
    Posts
    5
    Thanks
    3
    Thanked 0 Times in 0 Posts

    control sheet signatures

    Hi

    In our organisation we require lots of items to be signed, which leads to printing out excel stuff in order to physically authorise it, is there any way of signing them in excel with the users details, which can't then be altered ?

  2. #2
    WS Lounge VIP
    Join Date
    Dec 2009
    Location
    Earth
    Posts
    8,202
    Thanks
    49
    Thanked 987 Times in 917 Posts
    You can digitally sign Office documents.
    https://support.office.com/en-gb/art...3-a5023bdab44a

    cheers, Paul

  3. #3
    New Lounger
    Join Date
    Jun 2016
    Posts
    5
    Thanks
    3
    Thanked 0 Times in 0 Posts
    Hi Paul

    Thanks for that

    I had considered that, but that only signs the most recent document.

    I am looking to be able to sign and date stamp individual lines within the document, which may be authorised by different individuals at different time etc.

  4. #4
    WS Lounge VIP
    Join Date
    Dec 2009
    Location
    Earth
    Posts
    8,202
    Thanks
    49
    Thanked 987 Times in 917 Posts
    Good job we have that paper stuff.

    cheers, Paul

  5. #5
    Super Moderator RetiredGeek's Avatar
    Join Date
    Mar 2004
    Location
    Manning, South Carolina
    Posts
    9,436
    Thanks
    372
    Thanked 1,457 Times in 1,326 Posts
    Robert,

    This could be done via Macros but it would be rather involved.

    1. First you would need to password protect the worksheet as well as the VBA Project.
    2. Each line would have to be tagged with the Authorizer's UserId.
    3. You would then need code to:
      • Check which line was being selected and then check the Userid against the person logged on.
      • If they match the code would prompt for that user's Authorization Password (this would be stored in an array in the code).
      • If the password was verified the code would unlock the worksheet, Place the word Authorized in the appropriate cell, then re-protect the worksheet.


    So the answer is that it is doable but there is definitely work involved.

    HTH
    May the Forces of good computing be with you!

    RG

    PowerShell & VBA Rule!

    My Systems: Desktop Specs
    Laptop Specs

  6. #6
    WS Lounge VIP
    Join Date
    Dec 2009
    Location
    Earth
    Posts
    8,202
    Thanks
    49
    Thanked 987 Times in 917 Posts
    I have a term for your proposal, "ugly".
    But it's much better than pushing paper.

    cheers, Paul

  7. #7
    Gold Lounger Maudibe's Avatar
    Join Date
    Aug 2010
    Location
    Pa, USA
    Posts
    2,640
    Thanks
    115
    Thanked 651 Times in 593 Posts
    You could also have an image of the logged on user's signature. When a signature button is pressed, the document with the signature image is exported to a PDF as the hard copy.

    Maud

  8. #8
    Gold Lounger Maudibe's Avatar
    Join Date
    Aug 2010
    Location
    Pa, USA
    Posts
    2,640
    Thanks
    115
    Thanked 651 Times in 593 Posts
    Robert,

    Here is the code to import the logged on user's signature into a document then export it as a signed PDF file by clicking th "Sign & Save" button.

    Note; In this example, the signature is saved as a .png file in the "C:\Users\username\Pictures\" folder. Change the path to the path where your signature files will be stored. The code looks for files the format "username signature.extension". The image type can be any type recognized by Excel. The document sits in merged cells A1 to I47.

    HTH,
    Maud

    In a standard module:
    Code:
    Sub SignPDF()
    '-----------------------------------
    'DECLARE AND SET VARIABLES
    Dim User As String, Path As String
    Application.ScreenUpdating = False
    '-----------------------------------
    'GET LOGGED ON USER NAME AND IMPORT SIGNATURE
        Range("A48").Select
        User = Environ("USERNAME")
        Path = "C:\Users\" & User & "\Pictures\" & User & " Signature.png" 'CHANGE
        ActiveSheet.Pictures.Insert(Path).Select
        Selection.ShapeRange.IncrementTop -61.5
        Range("A1").Select
    '-----------------------------------
    'SAVE AS PDF FILE
        ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
            "C:\Users\Maudibe\Desktop\Sample1.pdf", OpenAfterPublish:=True 'CHANGE
    Application.ScreenUpdating = True
    End Sub
    Signed Document to PDF.png
    Attached Files Attached Files

Tags for this Thread

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •