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,451
    Thanks
    53
    Thanked 1,028 Times in 956 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,451
    Thanks
    53
    Thanked 1,028 Times in 956 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,574
    Thanks
    384
    Thanked 1,484 Times in 1,348 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,451
    Thanks
    53
    Thanked 1,028 Times in 956 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,733
    Thanks
    126
    Thanked 686 Times in 623 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,733
    Thanks
    126
    Thanked 686 Times in 623 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
  •