| Date | Auteur du sujet | Sujet | Extrait du message |
|---|
| 16/07/2019 à 18:52 | abdernino | Envoi email automatique | Tu doix expliquer plus précisément ce que tu veux faire. Le texte est le même pour chaque message? On peut écrire ce texte dans un cellule (par exemple, comme on fait dans mon code pour le sujet de l'email, toujours dans la même position - Sheets(1).Range("F2") )... |
| 16/07/2019 à 18:30 | Pmid20 | Modifier dans macro nom de fichier dont une partie change tous les mois | ... |
| 15/07/2019 à 22:09 | abdernino | Envoi email automatique | Je joins une nouvelle version du fichier que j'ai créé, j'ai ajouté un onglet pour les adresses e-mail et donc plus besoin de les écrire sur chaque feuille, Il suffit de les mettre à jour une fois pour toujour. Voici le code: Pour l'envoi automatique sans afficher le message (une fois la phase de te... |
| 14/07/2019 à 19:51 | abdernino | Envoi email automatique | Je joins une nouvelle version du fichier avec un bouton pour lancer automatiquement la macro. En ce qui concerne le texte de l'e-mail, tu peux personnaliser cette partie du code en changeant les mots entre guillemets (en rouge), & vbNewLine & indique un retour chariot : .Body = " Bonjour, " & vbNewL... |
| 13/07/2019 à 22:27 | abdernino | Envoi email automatique | Je m'excuse, j'ai téléchargé le mauvais fichier avec une erreur dans le code . Remplacer la ligne: avec... |
| 12/07/2019 à 21:58 | abdernino | Envoi email automatique | Voici le code et un fichier exemple, j'ai mis dans chaque onglet l'adresse email de l'agence dans la cellule "B1": Cordialement... |
| 03/07/2019 à 19:00 | Vikto_ | Enregistrement cellle au format JPEG | Chez moi le code marche bien, tu est sûr que la dernière image collée a été supprimée? De plus dans ton fichier le code n'est pas complet, ça devrait être... |
| 02/07/2019 à 19:40 | Vikto_ | Enregistrement cellle au format JPEG | Voici ma suggestion: Cordialement... |
| 26/06/2019 à 21:30 | ciracll | Macro Impression en format .pdf | Une proposition: Cordialement... |
| 06/06/2019 à 22:19 | jc jez | Problème exécution macro impression | Une solution qui ajoute un bouton sur la feuille après la première impression, qui est éliminé à la fin... |
| 19/05/2019 à 18:54 | pascal.59 | Sauvegarde selon condition en pdf | Change ActiveSheet .ExportAsFixedFormat avec Selection .ExportAsFixedFormat... |
| 05/05/2019 à 21:45 | pskyl | Ouverture msbox sous condition | Voici le code modifié... |
| 11/03/2019 à 20:28 | valentino911 | Nommer un fichier à partir du contenu de plusieurs cellules | Voici le code... |
| 09/03/2019 à 15:24 | Fipafi | Enregistrer feuille en pdf | Ajoute après la ligne openafterpublish:=False le code .PrintOut... |
| 16/12/2017 à 16:17 | Sassi | Enregistre la feuille active seulement avec un nom spécifique | Voici le code... |
| 10/12/2017 à 15:11 | Pascal13009 | Traduction automatique de toute une colonne | Je ne connais pas bien le sujet, tu peux trouver quelques informations à ce lien: https://support.office.com/fr-fr/article/Traduire-du-texte-dans-une-autre-langue-287380e4-a56c-48a1-9977-f2dca89ce93f?CorrelationId=b82fc759-696b-47b8-8853-0821f7c15cad&omkt=fr-FR&ui=fr-FR&rs=fr-FR&ad=FR... |
| 01/12/2017 à 19:03 | Pascal13009 | Traduction automatique de toute une colonne | Dans le fichier exemple la langue de départ et d'arrivée est indiqué par un code dans la cellule G1 (# en / fr / = anglais/français). On peut bien sûr changer les langues avec le code de la langue requise ( de pour l'allemand - es pour l'espagnol, pt pour le portuguais, etc.). Au lieu d'entrer les l... |
| 27/11/2017 à 20:17 | Pascal13009 | Traduction automatique de toute une colonne | Si ça te convient, de suite le code et le fichier exemple... |
| 10/11/2017 à 19:38 | Benju | VBA enregistrer feuille nom cellule | Il suffit de créér un nouveau module et d'y coller le code (il faut adapter le chemin " C:\Users\Sequoyah\Desktop "). Un autre solution... |
| 09/11/2017 à 18:12 | Benju | VBA enregistrer feuille nom cellule | Ma proposition... |
| 21/10/2017 à 18:13 | bayard | Envoi d'un pdf par mail | J'espère avoir bien compris, voici le code... |
| 21/10/2017 à 16:30 | bayard | Envoi d'un pdf par mail | Une petite correction, j'avais oubliè le chemin au moment d'enregistrer le PDF... |
| 21/10/2017 à 15:34 | bayard | Envoi d'un pdf par mail | Bonjour Bayard, J'ai simplement gardé le nom du fichier et le chemin que tu as proposé dans ta première question... |
| 21/10/2017 à 15:04 | bayard | Envoi d'un pdf par mail | Vois si ça te convient... |
| 17/10/2017 à 21:52 | ksimir72 | Appel de macro pour rendez vous sous outlook | Il devrait suffire d'ajouter cette ligne au code pour éviter le problème des cellules vides: If Not Application.Intersect(MaDate, Range(Target.Address)) _ Is Nothing Then If IsEmpty(Target) Then Exit Sub Encore une petite suggestion pour définir la plage des dates: Set MaDate = Range("D7:D" & Cells(... |
| 16/10/2017 à 16:57 | ksimir72 | Appel de macro pour rendez vous sous outlook | Merci de joindre un fichier exemple (sans données confidentielles)... |
| 13/10/2017 à 19:29 | ksimir72 | Appel de macro pour rendez vous sous outlook | Vois si ça te convient: OLAppointment.Start = Target.Value + TimeValue("09:00")... |
| 12/10/2017 à 20:56 | ksimir72 | Appel de macro pour rendez vous sous outlook | Voici le code, à placer dans le module de la feuille source... |
| 26/09/2017 à 18:12 | aurelia22 | RechercheV | Vois si ça te convient, la formule dans la cellule P23, à tirer vers le bas: =SI(SIERREUR(RECHERCHEV(A23;Feuil2!A12:E21;5;0);"na")<>"na";"ok";"na")... |
| 09/09/2017 à 16:45 | Gieglio | Création Graphique carte France avec département | Voici un exemple basé sur un fichier créé par Tatiak - Dept.zip( http://tatiak.canalblog.com/archives/2010/11/02/19495749.html )... |
| 03/09/2017 à 18:27 | tseoy | Selection onglet sans connaitre son intitulé | On pourrait indiquer la feuille par l'index (l'index correspond à la position de l'onglet dans le classeur. La feuille de gauche porte l'index 1), par example Worksheets(1).PrintOut... |
| 03/09/2017 à 14:30 | eliot raymond | Faire des étiquettes perso | Voici un fichier example et le code VBA pour ajuster automatiquement la hauteur de la ligne. Je n'ai pas pu tester avec l'imprimante, si il faut un millimètre de plus ou de moins on peut modifier le code, chaque millimètre correspond à environ trois points, donc on ajoute après Range("E" & i).Value... |
| 02/09/2017 à 17:15 | eliot raymond | Faire des étiquettes perso | Il suffit de modifier la formule en B2 avec =A2*3,14/10 pour transformer les millimètre en centimètres... |
| 02/09/2017 à 16:46 | eliot raymond | Faire des étiquettes perso | L'unité de mesure doit rester la même partout, soit 0,70 mm * 3,14 = 2,20 mm et 7,37 mm * 3,14 = 23,14 mm... |
| 30/08/2017 à 15:40 | CGVI | Créateur d'un moteur de recherche - VBA | Voici le nouveau fichier qui permet la recherche sur trois colonnes (E, F et G) et le code... |
| 30/08/2017 à 13:05 | CGVI | Créateur d'un moteur de recherche - VBA | Voici le fichier modifié pour avoir le texte à chercher dans la colonne E (5ème colonne) et de suite le code... |
| 26/08/2017 à 19:39 | benoist | Copier cellule d'un classeur fermé | Bonjour à tous, voici le code (par John Walkenbach) pour copier dans la cellule sélectionnée la valeur prise du classeur fermé. A' modifier le chemin où se trouve ton fichier essai 1... |
| 24/08/2017 à 21:50 | rastanet | Macro listing fichiers dans répertoire et copie cellules | Le dernier code que j'ai posté est différent du precedent et dans mon test avec un dossier et deux sous-dossiers le nom des techniciens est affiché de façon correcte. Si on a plus de deux sous-dossier on doit chercher une solution différente... |
| 24/08/2017 à 21:15 | rastanet | Macro listing fichiers dans répertoire et copie cellules | Une possible solution (ça marche seulement avec un dossier + deux sous-dossiers )... |
| 22/08/2017 à 21:21 | golfeur01 | Code VBA pour impression d'un nombre de feuilles variable | Voici le code... |
| 22/08/2017 à 12:37 | rastanet | Macro listing fichiers dans répertoire et copie cellules | Voici ma solution de débutant, ton code integré pour récupérer de manière automatique dans la colonne F la cellule B9 de tous les fichiers répertoriés... |
| 21/08/2017 à 15:41 | aka91100 | Envoi de docs PDF par mail via Excel | Tu peux essayer en modifiant les dernières lignes du code: Et comme justement observé par Steelson, cordialement avec un e en plus... |
| 17/08/2017 à 21:54 | aka91100 | Envoi de docs PDF par mail via Excel | Voici le code pour ajouter le nom du collaborateur... |
| 08/08/2017 à 21:12 | aka91100 | Envoi de docs PDF par mail via Excel | Merci pour la suggestion, voici le code corrigé avec la lettre manquante et la virgule après le mot Bonjour. %2c indique la virgule et chaque %0a un saut de ligne... |
| 07/08/2017 à 18:32 | aka91100 | Envoi de docs PDF par mail via Excel | Voici un exemple de fichier et le code. Dans Thunderbird il faut d'abord sélectionner Outils> Options> page Rédaction > Section Général > et décocher « Demander confirmation lors de l’utilisation d’un raccourci clavier pour envoyer un message ». On peut choisir entre Envoi automatique ou... |
| 28/06/2017 à 19:14 | Toons | Envoi ActiveSheet Excel en pdf via e-mail auto Thunder | Pour l’envoi automatique il devrait suffire d’ajouter ces deux lignes de code à la fin : Application.Wait (Now + TimeValue("0:00:03")) SendKeys "^{ENTER}", True End Sub Dans Thunderbird il faut sélectionner Outils| Options| page Rédaction | Section Général | et décocher « Demander confirmation lors... |