lundi, 24 octobre 2016

Petite macro pour décaler l'envoie d'un e-mail au lendemain (ou prochain lundi) 8h30

Travailler en dehors des heures de travail n'engage que nous mais ne doit pas impacter la vie privée des collègues. Alors quand on envoie des courriels en dehors de heures travaillées, il peut être sympa de programmer l'envoie du courriel au lendemain (par exemple 8h30) ou au lundi si nous sommes en we.

Il existe dans MS Oulook un une option pour cela : "Delay Delivery" mais cela est assez laborieux à utiliser en de manière continuer (une fois ça va, trois fois, y'en a marre).

L'idée est donc de créer un nouveau bouton "Envoyer demain" qui va appeler cette petite macro. La macro va automatiquement programmé l'envoi du courriel au prochain jour ouvré 8h30 et afficher une popup indiquant la programmation du courriel.

Sub DelaySendMail()

    On Error GoTo ErrHand               ' Error Handling
    
    Dim objMailItem As MailItem         ' Object to hold mail item
    Dim SendDate As String              ' The date to send delayed mail
    Dim SendTime As String              ' The time to send delayed mail
    Dim MailIsDelayed As Boolean        ' Set if the mail will be delayed
    Dim NoDeferredDelivery As String    ' Value if deferred delivery is disabled
    Dim time As String                  ' Current time of the day
    
    SendTime = "08:30:00"               ' Time to deliver delayed mail (08:30:00)
    MailIsDelayed = False               ' We assume it's being delivered now
    NoDeferredDelivery = "1/1/4501"     ' Magic number Outlook uses for "delay mail box isn't checked"
    
    Const morningTime As String = "08:30:00"
    
    time = Format(Now, "HH:NN:SS")
    
    'Set object to mail item you have open
    Set objMailItem = Outlook.ActiveInspector.CurrentItem
    
    ' Check and make sure current item is an unsent message
    If objMailItem.Sent = True Then
        Err.Raise 9000
    End If
        
    ' Set the date appropriately for the next weekday
    If Weekday(Date, vbMonday) = 5 Then
        ' Today is Saturday
        ' Delay mail two days
        SendDate = Date + (3)
        MailIsDelayed = True
    ElseIf Weekday(Date, vbMonday) = 6 Then
        ' Today is Saturday
        ' Delay mail two days
        SendDate = Date + (2)
        MailIsDelayed = True
    ElseIf Weekday(Date, vbMonday) = 7 Then
        ' Today is Sunday
        ' Delay mail one day
        SendDate = Date + (1)
        MailIsDelayed = True
    Else

        ' Currently a weekday
        ' See if it's inappropriate to send mail right now
        If (StrComp(time, morningTime) < 0) Then
            ' It's early morning - delay it
            SendDate = Date
            MailIsDelayed = True
        Else
            ' We are during or after working hours, so we delay to tomorrow.
            SendDate = Date + (1)
            MailIsDelayed = True
        End If
        
    End If
    
    If MailIsDelayed Then
        ' Mail should be delayed - set the delivery date/time
        objMailItem.DeferredDeliveryTime = SendDate & " " & SendTime
        objMailItem.Send
        MsgBox "Your mail will be delivered at " & _
                SendDate & " " & SendTime, _
                vbOKOnly, "Mail delayed"

    End If

    Exit Sub

ErrHand:
    ' Handle well-known errors with message
    ' Other errors, just tell the user
    If Err.Number = 13 Then
        ' No current item or current item isn't a mail message
        MsgBox "Future delivery can only be set on mail items", vbOKOnly, "Not a mail item"
    ElseIf Err.Number = 9000 Then
        ' The active message has already been sent
        MsgBox "Please run this macro from an unsent mail item", vbOKOnly, "Not an unsent mail item"
    Else
        MsgBox "An error has occured on line " & Erl & _
                ", with a description: " & Err.Description & _
                ", and an error number " & Err.Number
    End If
        
End Sub

Sources de cet article :

jeudi, 28 janvier 2016

Firefox : comment changer le useragent pour simuler un robot ou un autre agent ?

Quelques fois, pour effectuer des tests par exemple, il est intéressant de pouvoir changer l'agent identificateur du navigateur pour par exemple simuler un robot.Avec Firefox, celà est très facile :taper about:config dans la barre URL.accepter le message d'alerte.chercher la clé  […]

Lire la suite

jeudi, 21 janvier 2016

Installation/mise à Jour de VirtualBox sous Fedora 21

télécharger la dernière version de Oracle VirtualBoxhttp://download.virtualbox.org/virtualbox/sudo dnf install VirtualBox-5.0-5.0.14_105127_fedora22-1.x86_64.rpmtélécharger les extensions Oracle_VM_VirtualBox_Extension_Pack-5.0.14-105127.vbox-extpackdémarrer virtual box en admin : sudo  […]

Lire la suite

mercredi, 18 mars 2015

Changer le user.home des propriétés systèmes d'une application Java

De temps en temps il est utile, lors de l'exécution d'une application Java ou J2EE de modifier la destination de la propriété système "user.home". (Par exemple lorsque le user.home pointe sur un un répertoire du réseau).Pour modifier le user.home, il suffit de démarrer java avec l'otpion  […]

Lire la suite

Installer une version portable de Java 8 SDK (JDK8) sous Windows

Si vous n'êtes pas administrateur de votre système et que vous souhaitez installer une version portable de Java 8, voici un processus assez simple ! Télécharger le Java 8 SDK pour Windows depuis le site de Oracle : http://www.oracle.com/technetwork/java/javase/downloads/jdk8-downloads-2133151.html  […]

Lire la suite

lundi, 20 octobre 2014

VirtualBox : redimensionner un un disque virtuel VMDK afin d'avoir plus d'espace

1- Convertir le VMDK en VDI : VBoxManage clonehd "mondisque.vmdk" "mondisque-converti.vdi" --format vdi 2- Redimensionner le VDI à la taille que vous souhaitée : VBoxManage modifyhd “mondisque-converti.vdi” --resize 40960 La tailles est en megoctets : 40Go = 40*1024 = 40960Mo 3-  […]

Lire la suite

mercredi, 12 mars 2014

Installation d'Oracle 11g sur Mac OS 10.9 Maverick

Il n'existe plus de version d'Oracle 11g pour Mac OS X 10.9 Maverick. Afin de pouvoir néanmoins avoir une BDD oracle en locale sur un Mac, convient d'utiliser une machine virtuelle.1- Installer Oracle VM VirtualBox :  […]

Lire la suite

dimanche, 26 janvier 2014

Sauce à l'échalote et cognac

Ingrédients 3 échalotes 20 cl de vin rouge 5 cl de cognac 10 cl d'eau 2 c. à café rase de fond de veau 1 c. à soupe d'huile de tournesol sel / poivre Préparation Émincez les échalotes et faites-les dorer dans une casserole avec de l'huile de tournesol. Une fois les échalotes dorées, enlevez la  […]

Lire la suite

lundi, 23 décembre 2013

Comment ré-activer des plugins bloqués par Firefox?

Si Firefox bloque des plugins et que vous ne pouvez pas installer des mises à jour pour ces plugins, alors voici une méthode. ATTENTION : en faisant cela vous acceptez les problèmes de sécurité des plugins bloqués. 1- ouvrir un nouvel onglet 2- chercher about:config 3- Accepter les messages de  […]

Lire la suite

mercredi, 27 novembre 2013

Enregistrer les onglets en quittant Firefox

Dans Firefox :  - taper about:config - rechercher : browser.showQuitWarning - et mettre la valeur à vrai (true)  […]

Lire la suite

samedi, 5 octobre 2013

Déplacer la base de données de Picasa sur une autre partition

Merci à https://groups.google.com/d/msg/picasahowdoi-fr/ABKmtFIRQXM/WsGRYzn7PdoJ pour ce ticket :-) A faire avec Picasa fermé, bien sûr... 1 - Télécharger l'utilitaire junction.exe sur telecharger.net (http:// www.01net.com/telecharger/windows/Utilitaire/systeme/fiches/35245.html) 2 - Copier cet  […]

Lire la suite

mardi, 1 octobre 2013

Commandes utiles sous Unix :-)

Voici quelques commandes Unix qu'il faut tout le temps re-chercher Lister les répertoires et indiquer leur taille du -shd *  […]

Lire la suite

mardi, 12 mars 2013

Drupal 7 : truc et astuces

Comment mettre drupal 7 en Français : http://learning-drupal.com/tuts/comment-drupal-7-francais

Lire la suite

Installation local d'ORACLE avec accès depuis une autre machine : Status : Failure -Test failed: The Network Adapter could not establish the connection

En faisant une installation d'Oracle Entreprise 11g sur une machine de DEV, il m'était impossible d'accéder à la base de données autrement qu'en utilisant localhost comme nom de serveur. J'avais en permanence l'erreur suivante (aussi bien depuis la machine où Oracle était installée qu'une autre  […]

Lire la suite

jeudi, 22 novembre 2012

Jailbreaker l’iPhone 3G, 3GS, 4

Voici une page qui indique comment jailbreaker, reflasher un iPhone 3G, 3GS et 4.Les outils nécessaires sont pour l'iphone 3G:1. Firmwares 4.2.1 officiel pour votre appareil: Si vous avez un iPhone 3G > l’iOS 4.2.1 officiel pour iPhone 3G ( 323 Mo ): iPhone1,2_4.2.1_8C148_Restore.ipsw Lire la  […]

Lire la suite

mercredi, 12 septembre 2012

Responsive web design

Voici un site avec des informations très intéressantes sur le "Responsive Web Design". On y trouve des gabarits ainsi qu'une bibliographie assez exhaustive. http://bradfrost.github.com/this-is-responsive/index.html Petit livre très intéressant dans la série A Book Apart :  […]

Lire la suite

jeudi, 6 septembre 2012

Ajouter un bouton "send" ou "save" à un formulaire PDF

Bouton "Send" Pour rajouter le bouton "send/envoyer" il faut : créer le bouton en y mettant le libellé et images et look souhaité. Dans les propriétés du bouton, dans l'onglet "Actions" choisir "Submit A Form" dans le menu "Select Action" et cliquer  […]

Lire la suite

vendredi, 31 août 2012

A propos de JSF...

Patate chaudeLe cycle de vie d’une requête JSF 2 Ajouter un PhaseListener dans JSF 2.0  […]

Lire la suite

jeudi, 30 août 2012

Java et fuite mémoire

À propos des fuites mémoire Blog de David MASCLET : Détecter et corriger les fuites mémoire java Aliecom : Découvrir et isoler une fuite mémoire java – part 1 Découvrir et isoler une fuite mémoire java – part 2 Blog d’Ippon Technologies : Memory Analyzer (MAT) : pistons les fuites mémoire Outils  […]

Lire la suite

mardi, 17 mai 2011

Impossible d'installer Google Map, Angry Birds... sur HTC Desire avec CyanogenMod 7 ?

Logo CyanogenMod

Vous avez installé CyanogenMod 7 sur votre HTC Desire mais vous rencontrez des problème pour installer certaines applications via le Android Market ? Ceci est du au fait que Android Market utilise une partition spéciale pour le cache (/cache/download) Malheureusement cette partition a une taille de  […]

Lire la suite

- page 1 de 5

Haut de page