| Date | Auteur du sujet | Sujet | Extrait du message |
|---|
| 10/06/2020 à 16:04 | JB25 | Déterminer la position d'une lettre dans une suite de chiffre | Ce qui est le moins lourd pour le classeur. Une macro qui se lance en une fois et inscrit les résultats dans des cellules peut-être privilégiée si elle vient en remplacement de milliers de formules. On y gagne généralement en temps de calcul, d'exécution et de taille du fichier (je parles bien de mi... |
| 10/06/2020 à 14:21 | JB25 | Déterminer la position d'une lettre dans une suite de chiffre | Puisqu'on est là, autant s'amuser un peu..... |
| 10/06/2020 à 11:00 | JB25 | Déterminer la position d'une lettre dans une suite de chiffre | Une autre approche VBA, via une fonction personnalisée, que l'on pourra utiliser dans la feuille de calcul... Fonction : Appel de cette fonction dans une feuille : en B1, saisir : =ChercheAlpha(A1) Cette formule peut-être étirée comme toute autre... Une petite adaptation de la proposition de Jean-Er... |
| 09/06/2020 à 11:00 | Florian53 | Condition Where avec Date dans commande SQL | Dans la base, les dates sont elles au format dates ou sont-ce du texte? Sinon, essayer de convertir ta combobox (texte) en date, avant de lancer la commande... De la même manière, CStr(C_Inter_Date) transforme C_Inter_Date de String en String..... |
| 09/06/2020 à 10:38 | Corleo | Fonction Recherche en Macro VBA | Le plus simple, même en VBA, est d'appliquer la formule. Exemple ... |
| 28/05/2020 à 09:38 | viogeo | Formule VBA : Si cell = OR, supprimer contenu | Essaye avec Left : Ou encore, avec Replace ... |
| 20/05/2020 à 11:15 | vinciHorus | Code VBA qui donne le numero de la ligne de la cellule selectionné | ... |
| 12/03/2020 à 15:46 | Robin1963 | Valeur première cellule de la selection = valeur au dessus ou en dessous | Travailler avec des Selection sous VBA n'est que très rarement une bonne idée. Ceci étant, que te donne ce code : Donc ... |
| 12/03/2020 à 15:14 | thomas67 | Espace après du texte | Il ne s'agit peut être pas d'un espace (Chr(32)), mais d'un espace insécable (Chr(160)). Donc, tenter ... |
| 12/03/2020 à 14:30 | okctrash | Fonction Rechercher/Remplacer dans une cellule avec plusieurs formats | Non, tu n'as rien fait de mal. Dans la Sub Remplacer, il n'est pas fait mention du classeur concerné. Or, en ouvrant d'autres classeurs, je penses que la macro ne sait plus trop lequel traiter. Disons le lui alors ... |
| 12/03/2020 à 11:55 | JeanF44 | Utilisation InputBox | Un exemple de ce que l'on peut faire avec une InputBox. Ici ne tolère qu'une saisie numérique différente de 0 ... |
| 12/03/2020 à 11:30 | Balance58 | Bouton Enabled.False si TextBox vide ou plein | Pas sur d'avoir tout compris..... |
| 12/03/2020 à 11:27 | DorelD | Afficher les feuilles dans un combobox sauf une (au choix) | Avec un test IF ... |
| 12/03/2020 à 11:08 | Koshi | VBA - Additionner cellules en couleur | Oui. Erreur dans le code initial. Je l'ai modifié depuis..... |
| 12/03/2020 à 11:00 | Koshi | VBA - Additionner cellules en couleur | Tu dois : > Ouvrir une fenêtre VBE : Alt + F11 > Insertion / Module > Copier/Coller le code fournit plus haut (attention, je l'ai modifié) > Fermer la fenêtre VBE, > Dans une cellule, saisir : =SommeCellulesCouleur(B2:T27;3997500) > Valider par Entrée Code ... |
| 12/03/2020 à 10:45 | Koshi | VBA - Additionner cellules en couleur | Quelques fonctions utiles : Pour connaitre la valeur d'une couleur RGB, Taper sous VBE dans la fenêtre Exécution (Ctrl+G) : ? RGB(60,255,60) à valider par Entrée. Résultat : 3997500... |
| 12/03/2020 à 10:11 | okctrash | Fonction Rechercher/Remplacer dans une cellule avec plusieurs formats | Voit ceci (à adapter) ... |
| 12/03/2020 à 10:07 | Tonthon | Convertion nombre négatif | C'est pourtant ce que j'ai fait dans ton fichier exemple..... |
| 12/03/2020 à 09:53 | Tonthon | Convertion nombre négatif | Tu le copies au préalable dans une des cellules ou il apparaît. Ne reste qu'à le coller dans "rechercher"..... |
| 12/03/2020 à 09:15 | okctrash | Fonction Rechercher/Remplacer dans une cellule avec plusieurs formats | Cf mon envoi du 09 mars 2020, 10:43... |
| 12/03/2020 à 09:09 | barachoie | Report de Digit xx | Essaye ce code ... |
| 10/03/2020 à 15:53 | emiros | Savoir si nombre premier ou non | Très simple. Pour obtenir une liste des nombres premiers : Avec cette fonction de liste des premiers, tu peux ensuite utiliser les fonctions suivantes (que je te laisse découvrir) ... |
| 10/03/2020 à 15:32 | cheepow | Extraire des données de formes | Bon. Sans Visio, je ne dispose pas de la Librairie me permettant de t'aider. Néanmoins, une dernière piste : serait-il possible d'exporter ton fichier .vdsx en .xml... |
| 10/03/2020 à 13:55 | barachoie | Report de Digit xx | Bien. Je n'ai rien compris à ton précédent envoi. Par macro ... |
| 10/03/2020 à 12:11 | cheepow | Extraire des données de formes | Je veux bien essayer de mon côté. Peux-tu m'envoyer un fichier visio... |
| 10/03/2020 à 12:07 | ben68500 | Mails envoyés depuis Excel avec réponse directe à | Pourrais-tu nous mettre ici ton code d'envoi de mails... |
| 10/03/2020 à 11:37 | cheepow | Extraire des données de formes | Malheureusement, je ne pourrais pas en faire beaucoup plus, ne disposant pas de Visio... Regarde du côté de l'objet Shape de visio, tu en trouveras les méthodes et propriétés ici : https://docs.microsoft.com/fr-fr/office/vba/api/visio.shape... |
| 10/03/2020 à 11:23 | Invité | N° de la dernière ligne qui cotient la valeur de la txtbox | Salut ThauThème, Peut-être plus simple en utilisant le paramètre xlPrevious de Find... |
| 10/03/2020 à 11:03 | cheepow | Extraire des données de formes | Que te donne la macro du lien microsoft... |
| 10/03/2020 à 10:27 | rodger85 | Macro que pour deux colonnes | Un petit exemple : Ta procédure événementielle ne s'appliquera qu'au Range("E3:F128")... |
| 10/03/2020 à 10:20 | barachoie | Report de Digit xx | Une simple formule SI en colonne K : =SI(L2="SBUF";DROITE(M2;2);"")... |
| 10/03/2020 à 09:43 | massari59264 | Code evenementiel VBA | S'il y a du code, déjà, dans l'événement Activate de la feuille, pourquoi ne pas y ajouter ceci en fin de procédure ... |
| 10/03/2020 à 08:58 | CDB | Recherche sur plusieurs Feuilles | Colore la police de toutes les occurrences trouvées dans toutes les feuilles, et sélectionne la dernière trouvée. Si pas trouvée, l'annonce par MsgBox... What Else... |
| 09/03/2020 à 16:53 | cheepow | Extraire des données de formes | Rien de concluant. Va voir ici : https://docs.microsoft.com/fr-fr/office/vba/api/visio.shape.getcustompropertieslinkedtodata... |
| 09/03/2020 à 16:48 | massari59264 | Code evenementiel VBA | J2 n'est pas saisi, mais J2 change... As-tu essayé... |
| 09/03/2020 à 16:32 | massari59264 | Code evenementiel VBA | Ta procédure événementielle doit donc concerner la cellule J2 ... |
| 09/03/2020 à 16:19 | cheepow | Extraire des données de formes | Sous Visio, si je ne m'abuse, il y a (comme pour Excel), un enregistreur de macro. Pourrais-tu l'utiliser pour réaliser l'extraction et nous transmettre le code fournit... |
| 09/03/2020 à 15:28 | CDB | Recherche sur plusieurs Feuilles | Autre solution qui, elle, renvoie des objets Range dans une collection ... |
| 09/03/2020 à 14:34 | CDB | Recherche sur plusieurs Feuilles | Un exemple qui ne colore rien, mais retourne les adresses ... |
| 09/03/2020 à 13:53 | okctrash | Fonction Rechercher/Remplacer dans une cellule avec plusieurs formats | @Steelson, Ta proposition, chez moi, remplace le formatage (couleur des caractères)... |
| 09/03/2020 à 12:18 | Darkangel | Userform ne pas afficher textbox vide | Il nous faudrait l'intégralité du code : > qui appelle l'userform > de l'userform lui-même. Tout ton code quoi..... |
| 09/03/2020 à 12:09 | Tsubi | Derniere ligne d'une colonne avec des cellules fusionnées | Les fusions de cellule et VBA ne sont pas très compatibles... Un petit topo sur les possibilités : La propriété CurrentRegion L'aide VBA est très claire à ce sujet : Cette propriété renvoie un objet Range qui représente la zone en cours. Celle-ci est une plage limitée par toute combinaison de lignes... |
| 09/03/2020 à 11:48 | Darkangel | Userform ne pas afficher textbox vide | Mais... Pas besoin de If, lorsque le résultat attendu est un Booléen. Ceci suffit ... |
| 09/03/2020 à 11:43 | okctrash | Fonction Rechercher/Remplacer dans une cellule avec plusieurs formats | Merci de ton appréciation. Rien que pour ça, voici la même mais avec traitement de : > couleur, > nom de police, > taille, > gras, > italique, > souligné... What Else... |
| 09/03/2020 à 11:31 | okctrash | Fonction Rechercher/Remplacer dans une cellule avec plusieurs formats | Par macro, voici un exemple (pas rapide) qui conserve les couleurs. Il est possible d'adapter pour conserver le type, la taille des polices.$ A tester ... |
| 09/03/2020 à 09:02 | smecta50 | Gerer erreur .Find | Remplacer : par ... |
| 06/03/2020 à 12:27 | Mecha_conecto | Remplacer la fonction "date" Excel 2016 | Curieux... Date est une fonction de la bibliothèque VBA, Classe DateTime. Plusieurs pistes : 1- Essaie en stipulant la bibliothèque : Remplacer Date par VBA.Date 2- Passer par une cellule du classeur ainsi : 3- Cocher la référence manquante via un code VBA (plus fastidieux et nécessite selon les cas... |
| 06/03/2020 à 12:08 | Mycka | Erreur incompréhensible lors de l'ouverture d'un classeur par macro | Pour mieux comprendre mon histoire de Fic_nom et Plus_recent_nom, rien de mieux qu'un petit test. Dans un répertoire créé pour l'occasion, enregistre 5 fichiers nommés ainsi : Situation 1 Situation 2 Situation 3 Voiture 1 Voiture 2 Ces fichiers, créées les dans l'ordre que tu veux. Ferme Excel, et o... |
| 05/03/2020 à 16:29 | Mycka | Erreur incompréhensible lors de l'ouverture d'un classeur par macro | La macro ne laisse peut-être pas le temps nécessaire à l'ouverture du fichier. Quel est le message d'erreur et sur qu'elle ligne apparaît-il? Plusieurs pistes : 1- DoEvents : 2- Laisser, à la variable Situ, le soin d'ouvrir le fichier : 3- Un test en boucle ... |
| 05/03/2020 à 16:03 | Mycka | Erreur incompréhensible lors de l'ouverture d'un classeur par macro | Admettons. Mais, il y a tout de même une faille. Je te recommande vivement d'utiliser la bonne variable Plus_recent_nom Autre vérif à faire, Fic_nom dispose de l'extension .xls*... |