Passionné d'Excel

Inscrit le :13/10/2019
Dernière activité :Samedi à 21:44
Version d'Excel :2007 FR, 365 FR
Messages
3'349
Votes
869
Fichiers
5
Téléchargements
2'825
Fichiers ExcelSujetsMessagesStatistiquesVotes reçus

Messages postés par X Cellus - page 40

DateAuteur du sujetSujetExtrait du message
30/10/2020 à 17:57TesparkGestion du Presse papiersSuite, Tu peux aussi préciser que tu utilises plusieurs versions d'Excel éventuellement. Mais informer dans le Forum si tu souhaites un code pour la version la plus ancienne. Cela évite de recevoir un code mal approprié. Je vais laisser sur ce, le sujet Gestion Presse papiers. A plus...
30/10/2020 à 17:36TesparkGestion du Presse papiersA nouveau, @baboutz, Ce code fonctionne sous Excel 2016 mais sous 2019 il crée un bug Appel de procédure incorrect. Par contre vous pourrez voir ce lien: Vider le Presse-papier Mais c'est beaucoup de code pour seulement éviter 2 clics souris, à mon avis...
30/10/2020 à 11:52TesparkGestion du Presse papiersCorrige sur le code proposé la 3ième ligne comme ci-dessous. Il manquait le a pour faire Data Normalement si tu tapes MsForms. cela devrait te proposer une liste ou tu peux sélectionner DataObject...
29/10/2020 à 21:48TesparkGestion du Presse papiersGood Night Steelson, Si Textpark reviens sur le sujet, et que tu est encore là, tu pourras toujours l'intéresser. A demain, sans doute...
29/10/2020 à 21:43Man.403030 Récupérer une valeur numérique dans un texteVu que tu as posté un fichier. En retour il te suffira de cliquer sur le bouton et de lire la note. En souhaitant que d'autres précisions de ta part ne manquent pas...
29/10/2020 à 21:07TesparkGestion du Presse papiersLe but de ton code est d'accéder au presse-papier, de le vider puis de clore celui-ci. Le Presse-Papier d'Excel sert à passer des informations soit sur Excel même, soit sur d'autres applications Office. Vois plutôt avec ce code ci-dessous...
29/10/2020 à 11:59jeanpaul-pce Exclure une cellule d'un totalBonjour Jeanpaul-pce, Si tu fais la somme par exemple de A1:A10. Tu appliques ta formule de somme, donc = somme("A1:A10") et tu fais suivre de - (la cellule) A8...
29/10/2020 à 11:55KTM Modifier couleur texte dans une FormeDonc si cela te convient. N'oublie pas de clore ce sujet...
29/10/2020 à 11:51Cédric07 Valeur textebox egale a une des cellules alors message alerteDonc tu peux clore ce sujet. Tes autres points font partie d'une autre demande qu'il faut inscrire sur le Forum...
29/10/2020 à 11:46Man.403030 Récupérer une valeur numérique dans un texteEt bien c'est que tu as fermé un oeil... Maintenant tu peux adapter pour séparer tes 2 chiffres. Ceci en supposant que tes données sont en colonne A pour être récupérées modifiées en colonne B et C...
28/10/2020 à 18:37KTM Modifier couleur texte dans une FormeEn retour un exemple simple pour ton besoin...
27/10/2020 à 16:29Cédric07 Valeur textebox egale a une des cellules alors message alerteSuite, Modification apportée selon dernier message. Par contre insertion de l'emplacement en colonne 3 sur la même ligne que le numéro Rack. L' alerte ne sera pas une annulation et la validation se fera sur l'emplacement souhaité...
27/10/2020 à 15:24Cédric07 Valeur textebox egale a une des cellules alors message alerteSuite, Je pensais que ce logo était de la pub déguisée Ne pas oublier de clore ce sujet si la réponse te convient...
27/10/2020 à 15:20Maxime9331 Changer l’épaisseur d'une flèche en fonction d'une valeur dans une celluleA nouveau, Il ne peut y avoir qu'un Worksheet_Change par feuille. Donc j'ai réalisé une macro plus globale afin de s'adapter à l'ensemble du tableau présent. Des connecteurs ont été renommés pour cela, soit 2,3 et 4...
27/10/2020 à 12:12Man.403030 Récupérer une valeur numérique dans un texteBonjour Man.403030, Curulis57, Voir des codes déjà proposés pour le même besoin. Oter les lettres...
27/10/2020 à 12:02Cédric07 Valeur textebox egale a une des cellules alors message alerteVoici en retour ton fichier dont la macro est adaptée à ton format (ancien) de fichier...
27/10/2020 à 11:59Maxime9331 Changer l’épaisseur d'une flèche en fonction d'une valeur dans une celluleBonjour Maxime9331, Xmenpl, Voir fichier ci-dessous avec un connecteur placé dans ta feuille et cellule J4 colorée. Ainsi que macros en code feuille et module 1. Note que si shapes s'affiche en rouge, c'est que chaque forme est attachée a une feuille. Et qu'il faut préciser dans la macro quelle feui...
26/10/2020 à 22:34Cédric07 Valeur textebox egale a une des cellules alors message alerteFichier téléchargé à l'instant. Je te réponds demain...
26/10/2020 à 22:32Boul Ajout couleur macroEn retour une modification à ton fichier lorsque une valeur inscrite en ligne 3 est réinscrite plusieurs fois et trouvée. Selon couleur classée en colonne A. Ceci jusqu'à 10 couleurs...
24/10/2020 à 12:03dubdub87 Envoyer une image dans une cellule avec un userformSuite, Tu as justement une réponse de Thauthème qui s'applique au besoin exprimé. Edit: en enlevant les conditions if et en mettant directement Selection.Height = L Idem pour l'autre...
24/10/2020 à 12:00dubdub87 Envoyer une image dans une cellule avec un userformSuite, C'est une des précisions qui manquait. A savoir si les images insérées étaient du même gabarit que leur support ou elles s'inscriraient. Par contre si l'image est trop petite, en l'agrandissant elle perdra un peu qualité. Je modifie bientôt...
24/10/2020 à 11:52dubdub87 Envoyer une image dans une cellule avec un userformA nouveau, Bonjour Steelson, Effectivement, il peut aussi s'y référer dans la partie code pour modifier le formulaire qu'il a mis en place...
24/10/2020 à 11:41dubdub87 Envoyer une image dans une cellule avec un userformEn retour le fichier modifié pour l'insertion de l'image. En supposant que leur taille est la même que la cellule visée...
23/10/2020 à 18:42Cédric07 Valeur textebox egale a une des cellules alors message alerteA nouveau, Peut être la feuille active n'est pas BASE alors remplace ActiveSheet par Sheets("BASE"). Car même en laissant le textbox vide il ne devrait pas y avoir de souci. Sinon poste un fichier...
23/10/2020 à 12:40infographAfficher le chemin d'accès au lieu de l'imageDans le cas ou une image est présente en colonne Visuel. Il faut la sélectionner puis faire un clic droit. Choisir ensuite au sein du menu affiché Modifier l'image. Cela ouvrir l'explorateur fichier permettant de connaître son chemin puisqu'il s'affiche en haut de la fenêtre ouverte. Prévoir un affi...
23/10/2020 à 12:18Cédric07 Valeur textebox egale a une des cellules alors message alertePuis la suite de ton code pour la macro Private...
22/10/2020 à 22:45kenact Récupérer la position précise d'une image en cliquant dessusA nouveau, @Kenact, vu que tes images portent un nom différent Application.Caller peut s'appliquer car cela ciblera la bonne image. Donc on peut obtenir ses propriétés, notamment de positionnement. @Pierre, dans le cas ou les images portent le même nom et sur la même macro, Application.Caller cibler...
22/10/2020 à 18:21kenact Récupérer la position précise d'une image en cliquant dessusPour cela il serait bon que les vignettes portent un nom différent. Est ce le cas? C'est à dire que lors de leur création, elle prenne un nom incrémenté comme vignet001, vignet002 etc.....
18/10/2020 à 13:40mathieu77Texte clignote dans celluleSuite, Ne pas laisser Application.Goto Range("A1"). Changer Interior par Font Pour que le texte puisse continuer sans trop perturber (sauf si tapes trop longues sur la feuille) d'autres choix de l'utilisateur. Merci Ric de m'avoir rappelé ce code que je disposais déjà. Mais il faut que je fasse du t...
18/10/2020 à 13:03Andre13[Jeu] de mimes et dessins pour enfants (souci avec le lancement du timer)Bonjour Andre13, Je télécharge pour voir ta modif. Et reviens sur le sujet si proposition à te laisser.....
18/10/2020 à 12:49mathieu77Texte clignote dans celluleBonjour Mathieu77, 3GB , Tulipe4 Pour ton besoin utiliser une image GIF comportant une image texte à afficher et une image sans texte de même couleur que le fond de ta feuille. Pour un affichage permanent préférer une petite image afin de ne pas perturber les yeux de l'utilisateur. Pour un affichage...
17/10/2020 à 12:15Andre13[Jeu] de mimes et dessins pour enfants (souci avec le lancement du timer)En retour une modification du fichier pour l'inscription du pseudo, le lancement du message puis du compte à rebours. Pourquoi ne pas mettre un bouton Inscrire Pseudo et laisser le bouton Jouer. Ou souhaites tu un bouton Jouer alternatif: 1 S'inscrire 2 Jouer...
15/10/2020 à 17:30Chbouli04 Message box d'avertissementBonjour Chbouli04, Ric, Utiliser plutôt: Dans ce dernier cas un Call Efface("A5:B10") par exemple n'effacera que 5 lignes x 2 colonnes des données de la zone Jour dont A5:B10 fait partie...
14/10/2020 à 00:36nicopat Coder un Toggle ButtonA nouveau, Ne pas passer par SelectionChange. Mais Utiliser: Worksheet_Change Ainsi la modif sur la cellule B10 sera reconnue...
13/10/2020 à 22:01nicopat Coder un Toggle ButtonLes contrôles sont attachés à l'objet parent (donc la feuille dans ton cas) ou ils sont créés. Donc deux contrôles peuvent porter le même nom si ils ne sont pas sur la même feuille. Dans le code ci-dessus le 2ième ToggleButton suivra la position (ON/OFF) du 1ier...
13/10/2020 à 21:39AurelienGoub Excel - Remplissage toutes cellules entre deux autresA nouveau, Il est dans la partie code de la feuille Planning. Faire ALT F11 et clic droit sur la feuille. Le coloriage sera supprimé si on tapes 3 sur la 1ière cellule colorée. Celle ou était inscrit 1 auparavant. De plus le choix de fonds clair est possible sans que les chiffres apparaissent et san...
13/10/2020 à 16:45AurelienGoub Excel - Remplissage toutes cellules entre deux autresEn retour le fichier modifié. Voir notes en rouge en haut du planning...
13/10/2020 à 15:36ANASS1Ouvrir UserForm et cacher le classeurBonjour ANASS1, Ric, La séparation code Module et code Userform ne me semble pas idéale. Ensuite au début de ce dernier, partie VBA7, la déclaration Ptrsafe demande une variable LongPtr au lieu de Long dans le code Byval entre parenthèses. Voir exemple dans le fichier: Mindo Au sein de la feuille fo...
13/10/2020 à 13:12dubdub87 Traitement des imagesEn retour ton fichier modifié. Clic sur le bouton en 1ière ligne de la colonne F permettre de choisir une image puis appellera le formulaire ensuite avec cette image affichée. Si validation le chemin de l'image sera inscrit en colonne F. Effacer la dernière ligne de la BDD utilisée pour un premier t...
12/10/2020 à 20:02arnold36Intégrer un chronomètre dans une feuille ExcelNon, l'affichage indique le temps chrono en figeant celui-ci au moment du clic, mais le chrono lui continue de tourner. Il suffit de cliquer rapidement par exemple du dossard 1 au 5 par exemple. Pour voir que la différence s'étale de 20 centièmes à 30 centièmes. Selon ta vitesse d'exécution sur le b...
12/10/2020 à 17:58CHVALET Application "course contre la montre" chronométréeSuite, En retour le fichier modifié selon besoin. Voir d'abord la feuille base avant de cliquer sur effacer en première feuille. Sur la feuille base seules quelques formules pour l'exemple (colonne I) ont été placées. A recopier selon le nombre de coureurs. Voir notes en feuille 1...
12/10/2020 à 12:29CHVALET Application "course contre la montre" chronométréeA nouveau, Dans la version 2 du fichier, le dossard cliqué prend un fond coloré différent. Ce qui (normalement) évite que l'on fasse un clic dessus une 2ième. Un chronométreur est semblable à un arbitre, donc il se doit une forme olympique le jour de la course et une certaine expérience. Il est vrai...
12/10/2020 à 09:32CHVALET Application "course contre la montre" chronométréeVoir un exemple sur ce site en cliquant sur ce lien: Chrono...
12/10/2020 à 09:30arnold36Intégrer un chronomètre dans une feuille ExcelVersion 2 du fichier avec actualisation directe du classement sur la 1ière page. Voir notes sur cette même page...
11/10/2020 à 21:43arnold36Intégrer un chronomètre dans une feuille ExcelA nouveau, En retour le chrono présenté dans mon dernier message adapté au fichier posté GestionClassement. Voir notes sur la première feuille. Bonne course...
11/10/2020 à 18:54arnold36Intégrer un chronomètre dans une feuille ExcelEn retour un chrono qui me plait beaucoup. Et dont j'ai juste modifié l'affichage personnalisée. Bonne utilisation et adaptation...
10/10/2020 à 09:07ericp Crée des dossiers et sous dossiers automatiquementA nouveau, En effet parfois pour des actes que l'on trouve simple ceux-ci sont moins faciles à comprendre. Mais au moins cela t'auras fais avancer. On apprend toujours, l'important est de ne pas oublier. A plus...
10/10/2020 à 08:41ericp Crée des dossiers et sous dossiers automatiquementPour réaliser la création de tes dossiers et sous-dossiers, il te faut un chemin. Seulement avec Dim chx As FileDialog Set chx = Application.FileDialog(msoFileDialogFolderPicker) chx.Show On Error Resume Next rep = chx.SelectedItems(1) c'est rep qui conserve le chemin que tu recherches en explorant...
09/10/2020 à 19:23ericp Crée des dossiers et sous dossiers automatiquementSuite, Tu crée sur un Pc personnel je suppose Chemin d'accès c'est une lettre de disque puis Users puis le nom d'utilisateur puis le répertoire ou tu veux faire les opérations. J'ai encore testé sur mon ordi. Et aucun souci...
09/10/2020 à 18:54ericp Crée des dossiers et sous dossiers automatiquementVoici, Remplace Pictures par ton répertoire initial ou vont se loger les 300 dossiers et leurs 6 sous-dossiers. Remplace utilisateur par l'utilisateur du PC...