ghanique

Option Explicit

Public Sub OpenSelectedHyperlinks()
    On Error GoTo ErrorHandler
    
    Dim Cell As Object
    For Each Cell In Selection
        DoEvents
        
        Call OpenHyperlink(Cell)

ghanique

ol {
  counter-reset: section;                /* Creates a new instance of the
                                            section counter with each ol
                                            element */
  list-style-type: none;
}

li::before {
  counter-increment: section;            /* Increments only this instance
                                            of the section counter */

ghanique

#!/bin/sh
#
# Pre-commit hook that verifies if all files containing 'vault' in the name
# are encrypted.
# If not, commit will fail with an error message
#
# File should be .git/hooks/pre-commit and executable
# 
# Source: https://reinteractive.com/posts/167-ansible-real-life-good-practices
# Author: RAPHAEL CAMPARDOU

ghanique

Option Explicit

Private fileName As String

Public Sub ExportProperties()
    On Error GoTo ErrorHandler
    
    Let fileName = InputBox("Export properties to ...", "Export", fileName)
    
    Open fileName For Output As #1

ghanique

Public Sub DeleteParagraph()
    On Error GoTo ErrorHandler
    
    Call Selection.Range.Paragraphs(1).Range.Delete
    
    GoSub Finally
    Exit Sub
    
Finally:
    Return