Résultats de la recherche

Bonjour à tous, le Forum, avec le code suivant, Option Explicit Dim ri As Long Private Sub CommandButton1_Click() ri = 2 Dim app As Outlook.Application Dim AppNs As Outlook.Namespace Dim AppFolder As Outlook.MAPIFolder ' MAPIFolder Set app = New Outlook.Application Set AppNs...

Bonjour à tous, le Forum, J'ai besoin de votre aide car, à la suite des instructions ci-dessous, je souhaite supprimer le Fichier2 mais je ne trouve pas comment faire. Je me permets donc de faire à nouveau appel à vous pour savoir quel code je dois ajouter après la fermeture du fichier 1...

Bonjour à tous, le Forum, J'utilise actuellement dans une macro le code suivant qui écrit dans le Fichier2 les lignes du Fichier1 : Set oFSO = New Scripting.FileSystemObject Set Fichier1 = oFSO.GetFile(FichiersAOuvrir(i)) Nom = oFSO.GetBaseName(FichiersAOuvrir(i))...

Bonjour à tous, le forum, J'ai un code d'enregistrement automatique de mon fichier dans l'évènement Workbook Before Close qui marche bien. Je voudrais l'améliorer en y ajoutant la condition suivante: Si le fichier est ouvert en lecture seule alors on ferme sans enregistrement. Simple pour moi...

Bonjour à tous, le forum, Dans le fichier joint, je souhaite lorsque dans Sté je choisis CARMIN et dans Contact je sélectionne Jacques A, le résultat ne me ramène que l'adresse liée à Jacques A pour CARMIN et non toutes les adresses trouvées pour Jacques A dans la table. Je pense que la...

Bonjour à tous, le forum, Je me suis inspiré d'un code de Silkyroad, que je remercie au passage, qui fonctionne très bien dans sa version "d'origine" mais qui bug lorsque j'essaie de l'adapter à mon besoin. J'ai bien tenté d'apporter des modifications dans le bloc " strSQL = "INSERT INTO...

Bonjour à tous, J'ai lu bien des articles relatifs aux impressions mais je n'ai pas réussi à trouver ce que je cherche. En effet, je souhaite connaitre le nombre de copies d'impression demandées par l'utilisateur car celui-ci est limité à 1 avec le code suivant : ActiveWorkbook.PrintOut...

Bonjour à tous, le Forum, Mon besoin me parait simple et pourtant je n'arrive pas à le combler. Alors je me retourne vers vous tous pour que vous puissiez m'éclairer afin de réussir. Je m'explique : voici les étapes que je fais quand je le fais "manuellement", j'ouvre un classeur excel...

Bonjour à tous, Je viens vers vous aujourd'hui afin de solliciter votre aide pour savoir comment modifier ma macro afin que le code que j'ai ajouté (entre les ####) et qui fonctionne (bien que lent depuis cet ajout de code !) puisse s'éxecuter sans avoir à ouvrir le classeur Contrats...

Bonjour à tous, Je n'ai pas réussi à trouvé la solution à mon problème alors je me permets de vous l'exposer. Je souhaite extraire, des lignes d'une colonne, la chaine de caractère a partir du 1er caractère de gauche jusqu'au premier caractère spécial (en l'occurence _) dont la position...

Bonjour à tous , le forum j'ai récupérer le code suivant qui me permet de compter le nombre de ligne d'un fichier Txt. Il marche très bien lorsque je mets le chemin du fichier à traiter en "dur" Sub CompteLigne() Dim NbLigne As Long Dim intFic As Integer Dim strLigne As String...

Bonjour à tous, le Forum, Je cherche a récupérer l'ensemble des chemins de tous les fichiers d'un répertoire qui comporte des dossiers, sous dossiers voires sous sous dossiers. Je bien trouver des exemples mais ceux-ci, et sauf erreur de ma part, ne me récupère que les fichiers du...

Bonjour à tous, le forum, J'aurai besoin de savoir, avant de continuer mes recherches qui jusqu'ici s'avèrent infructueuses, s'il est possible par macro Excel, d'ouvrir des messages Outlook afin d'enregistrer automatiquement les Pdf en pièces jointes et uniquement les pièces jointes dans un...

Bonjour à tous, Je suis à la recherche d'une solution (soit Vba soit formule) afin de convertir dans un fichier reçu des US, les dates renseignées sous ce format : 6/1/2012 12:36:09 PM 12/21/2011 5:59:39 PM 7/10/2012 12:28:43 PM 11/7/2011 10:22:20 AM dans ce format : 01/06/2012...

Bonjour à tous, le Forum Je viens de passer à Excel 2010 et mes macros qui fonctionnaient parfaitement sous 2003 me posent problèmes auxquels je ne trouve pas seul la solution. Je vous mets ci-après le message d'erreur qui s'affiche à l'ouverture ainsi que la ligne qui semble poser problème...

Bonjour à tous, le Forum J'ai dans une macro ce bout de code qui envoi automatiquement un mail dès lors qu'outlook est déjà ouvert. Mes questions sont les suivantes : - est il possible d'envoyer ce mail par macro alors si Outlook n'est pas ouvert ? Si oui, qui peut me dire ce que je dois...

Bonjour à tous, le Forum Comme indiqué, difficile de titrer mon problème alors je vous l'expose : dans le fichier joint en exemple, je souhaite que lorsque je clique sur le bouton, le système ouvre l'USF et indique en face d'une checkbox l'adresse mail de chaque agent dont le total est à 0...

Bonjour à tous, J'ai un Userform dans lequel j'ai un Frame qui contient lui même plusieurs Frame(2 à 50) contenant chacun un Textbox. Je cherche la méthode la plus simple pour qu'à l'affichage de l'Userform, seul le Frame(2) avec son Textbox s'affichent, et que, dès que la valeur du TextBox...

Bonjour à tous, Je suis en train de sècher sur un truc certainement tout bête comme d'hab. Voila, j'ai plusieurs colonnes dans mon fichier d'environ 47000 lignes dont je souhaite en vba "transformer" tous les nombres qui vont de 1 à 8 caractères en nombres à 8 caractères. Le format...

Bonjour à tous, le Forum, Grâce au code écrit avec l'aide précieuse de Tititoto, Sub Envoi() Dim ol As New Outlook.Application Dim olmail As MailItem Dim CurrFile As String Dim Ctrl As OLEObject, Adresses As String Adresses = "" 'Texte contenant les...