| Date | Auteur du sujet | Sujet | Extrait du message |
|---|
| 09/03/2018 à 16:02 | Pablito | Traduction d'une formule en macro | Juste quelques pistes, où G4 est une cellule de destination (au hasard) : Pour ta 1ère formule : L'équivalent VBA de RECHERCHEV() est VLookup() L'équivalent VBA de STXT() est Mid$() Piste pour ta 2ème formule : à toi de remplacer "..." ! Début de ta 3ème formule : Je laisse la suite à un autre inter... |
| 09/03/2018 à 10:51 | Sebyg | Masquer Cellule = 0 | Essaye avec : If cellule.Value = " " Or cellule.Value = 0 Then dhany... |
| 09/03/2018 à 10:41 | Vaenl2 | VBA Tips | @ Theze Rien de plus, c'est juste un élève qui a voulu apporter sa contribution en publiant quelques notes sur VBA ; et sur le 2ème document, tu as même une formule de maths financières en prime ! que demander de plus ? dhany... |
| 09/03/2018 à 10:00 | tijot | Mettre date texte sous format JJ/MM/AA sous Excel | Ma fonction GetDate() le fait : elle transforme une date texte (colonne A) en vraie date (colonne B) . Si tu veux la même chose que la colonne B en colonne A : fait un « Copier » de la colonne B ; puis un « Coller des valeurs » sur la colonne A (onglet Accueil, groupe Presse-papiers) onglet 1 , colo... |
| 08/03/2018 à 22:57 | olive66 | Convert | Non, c'est seulement pour une seule cellule : la cellule D5 ; tu dois adapter pour les autres cellules. Si tu n'y arrives pas, joint un fichier. dhany... |
| 08/03/2018 à 22:51 | olive66 | Convert | Il suffit de remplacer nombre par ta référence de cellule. Si par exemple ton nombre est en D5 : =CONVERT(D5;"g";"kg") dhany... |
| 08/03/2018 à 22:20 | ddetp88 | Sélection rapide d'une partie de tableau | Je te retourne ton fichier modifié : Tu peux faire Ctrl e ou cliquer sur le bouton « test » (au choix) . Alt F11 pour voir la macro, puis revenir sur Excel dhany... |
| 08/03/2018 à 21:25 | tijot | Mettre date texte sous format JJ/MM/AA sous Excel | Merci pour le retour ! Je corrige quand même un petit détail : pour le type de retour de la fonction, j'avais mis Variant pour faire un essai, puis j'ai oublié de remettre String ; le nouveau code VBA est donc celui-ci : D'où ce nouveau fichier : bonne continuation ! dhany... |
| 08/03/2018 à 21:18 | ddetp88 | Sélection rapide d'une partie de tableau | Je te retourne ton fichier modifié : dhany... |
| 08/03/2018 à 21:10 | louissimard29 | Calcul valeurs identiques | Je te retourne ton fichier : La formule est en C1 (tirée vers le bas) . Pour faire la colonne B sans doublons : 1) sélectionne A1:A9 ; copier / coller en B1 ➯ colonne identique 2) onglet Données, groupe « Outils de donnés », « Supprimer les doublons » choisir le 2ème item : « ◉ Continuer avec la sél... |
| 08/03/2018 à 20:44 | tijot | Mettre date texte sous format JJ/MM/AA sous Excel | Je te propose ce fichier Excel : dhany... |
| 08/03/2018 à 19:49 | jojo la frite | Ma formule disparaît | Et donc maintenant, ça marche ? si oui, merci de cliquer sur la coche V pour passer le sujet en résolu ... |
| 08/03/2018 à 19:42 | jojo la frite | Ma formule disparaît | @jojo la frite Tu dois saisir en cellule B4 : =SI(A4="aucune";"///";"") dhany... |
| 08/03/2018 à 18:13 | -arthur- | Problème d'ouverture de fichier | Ta macro est la sub Workbook_Open (qui est normalement placée dans ThisWorkbook) ; donc elle s'exécute à l'ouverture du classeur (ou si on est sur ce code VBA et qu'on appuie sur F5) ➯ je ne comprends pas ta phrase : « le fichier est lancé par macro ». Tu as demandé si j'ai une autre idée ; non, dés... |
| 08/03/2018 à 15:17 | jojo la frite | Ma formule disparaît | C'est impossible : une cellule qui contient une formule ne doit pas servir pour une saisie de donnée ; c'est l'un ou l'autre car l'un écrase l'autre. dhany... |
| 08/03/2018 à 15:12 | Cityloue15 | Nombre de caractère | En C1 : =TEXTE(A1;"0,00") & " Test" dhany... |
| 08/03/2018 à 15:01 | -arthur- | Problème d'ouverture de fichier | Ta ligne de code VBA est celle-ci : Set CmdBar = Application.CommandBars.Add(Name:="Rechercher ", Position:=msoBarTop, Temporary:=True) Je crois qu'il te suffit juste d'enlever l'espace en trop à la fin du nom ➯ Name:="Rechercher" NB : dans un programme mis entre balises de code, n'utilise pas de mi... |
| 08/03/2018 à 12:22 | Stéphane1981 | Editer | En complément de la réponse de Patty , j'ajoute ceci : dans ton message du 7 mars à 18:26, tu as écrit : Il va sans doute falloir laisser tomber les formules : VBA sera très probablement un passage obligé. Je laisse la suite à Patty ou à un autre intervenant. dhany... |
| 08/03/2018 à 10:52 | Stéphane1981 | Editer | Je te retourne ton fichier modifié : (la formule a été tirée jusqu'en J26) dhany... |
| 07/03/2018 à 21:35 | nocteg | Format personnalisé ou VBA | J'aurais voulu t'répondre vers 10 h mais j'ai dû sortir faire des courses, puis ensuite, j'ai été débordé jusqu'à maint'nant ! Génial !!! Je crois qu'ceci pourra t'aider (modifier une option avancée d'Excel, rubrique « Options d'édition ») ... |
| 07/03/2018 à 21:10 | exelan | Reduction de code | Bonsoir exelan , Le code de ton 1er bouton peut être un peu réduit : idem pour tous les autres boutons, mais à part ça, comme chaque bouton fait sa propre action courte, j'vois pas c'qu'on pourrait faire d'autre ! c'est pas grand chose, je sais, mais c'est toujours ça... dhany... |
| 07/03/2018 à 20:12 | Avtomav | Userform qui change de taille entre Fenetre VBA et Excel | Je crois avoir compris quel est le problème que tu rencontres ... |
| 07/03/2018 à 19:16 | Avtomav | Userform qui change de taille entre Fenetre VBA et Excel | C'est une bonne nouvelle que tu sois rétabli ! J'ai bien regardé tes 2 copies d'écran, mais j'ai pas compris quel est au juste le problème ? Sur chaque copie d'écran, tu aurais voulu ces 2 choses : 1) que la fenêtre du bas soit aussi large que la fenêtre du haut ? 2) que la bande verticale rouge « R... |
| 07/03/2018 à 11:23 | kalista | Appliquer une formule If...then à toute la colonne | @kalista Dans ton message de 08:24, tu as écrit : « Merci à tous les deux. » ; j'croyais qu'c'était fini, moi ! tu as besoin d'autre chose ? (si oui, j'laisse Steelson te répondre car j'dois sortir faire des courses) dhany... |
| 07/03/2018 à 11:16 | exelan | Changement couleur bouton | Ai-je bien lu ? 255 boutons ? rien qu'ça ? pas plus ? à toi l'honneur de dépanner exelan , LouReeD ... |
| 07/03/2018 à 11:10 | kalista | Appliquer une formule If...then à toute la colonne | C'est bien, fiston, pour t'récompenser, j't'emmènerai au cirque et au zoo c't'après-midi. t'auras même droit à des et à une barbe à papa (= Yvouille-barbidule) Pour ton nouvel avatar QR-Code, comme j'l'avais dit à LouReeD , ça fait un peu mal aux yeux ? j'aimerai bien qu'tu remette ton ancien avatar... |
| 07/03/2018 à 08:08 | kalista | Appliquer une formule If...then à toute la colonne | Merci pour toutes les infos de ta réponse ; pour ce que tu as demandé à Steelson : Ce n'est pas : ElseIf Range ("J&i")="" Then ; c'est : ElseIf Range("J" & i) = "" Then attention à l'emplacement des guillemets, et pas de guillemet après le i (n'est-ce pas, Steelson ? ) dhany... |
| 06/03/2018 à 23:19 | micpid | Inventaire Monnaie | Bonsoir micpid , Comment as-tu réussi à lever l'ambiguïté sur une somme de 5 € ? Tu as laissé le hasard choisir pour toi : 50 % de chances que ce soit un billet de 5 € et 50 % de chances que ce soient des pièces ? Bonne chance pour tes saisies journalières ! dhany... |
| 06/03/2018 à 22:17 | exelan | Changement couleur bouton | Bonsoir LouReeD , J'ai trouvé très bien ton fichier survol bouton.xlsm mais pourquoi tu n'as pas mis 3 boutons , comme pour l'exercice initial ? l'idée est bonne, et même quand y'aura 3 boutons, c'est celui qui sera survolé qui sera ombré ! Mais peut-être qu' exelan préférera les couleurs bleu et ro... |
| 06/03/2018 à 21:51 | kalista | Appliquer une formule If...then à toute la colonne | Je crois qu'il y a peut-être des cellules vides en colonne I ; dans ce cas, je propose ce code VBA : Les lignes où la cellule I est vide sont ignorées ; quand c'est différent de soldé et vide juste à droite (en J) : 1) La cellule J de la ligne est sélectionnée : prêt à y saisir la date de solde (= d... |
| 06/03/2018 à 20:53 | exelan | Changement couleur bouton | Bonsoir exelan , Je suis parti du fichier que LouReeD (salut !) t'a proposé dans son message du 06/03 à 00:05 ; j'espère qu'il ne m'en voudra pas de l'avoir repris et complété, afin de répondre à ta question métaphysique si passionnément intéressante : « il change de couleur... et après ? » après, i... |
| 06/03/2018 à 20:08 | Blitzuno | Exporter une feuille Excel | Je te propose de lire ce lien : https://support.google.com/drive/answer/6167634?co=GENIE.Platform%3DDesktop&hl=fr D'autre part, Excel est un logiciel si répandu que les possesseurs de Google Sheet doivent pouvoir ouvrir des fichiers Excel ; mais les macros VBA ne seront pas reconnues, donc à réserve... |
| 06/03/2018 à 19:11 | nocteg | Format personnalisé ou VBA | @ nocteg Après avoir posté mon message de 16 h 32, j'ai dû sortir, et c'est seulement maintenant que j'ai vu ta réponse de 16 h 40 et les messages qui ont suivi ; désolé pour le retard, mais je te propose quand même d'essayer ce fichier Excel : À l'ouverture du fichier, tu es sur une feuille entière... |
| 06/03/2018 à 16:32 | nocteg | Format personnalisé ou VBA | Pour le nombre seulement, sans la lettre qui est devant, tu peux utiliser ce format personnalisé : 0000000\ 0\ 00 ⚠ il y a un espace après le signe « \ » ; ceci 2× Pour la lettre qui est devant, ce n'est pas possible : C'est tiré du lien suivant (qui contient bien plus d'infos sur la création de for... |
| 06/03/2018 à 16:00 | BabouchkA31 | Dépassement de capacité | @BabouchkA31 Merci beaucoup pour ton énorme merci ! et bonne continuation pour la suite. dhany... |
| 06/03/2018 à 15:53 | Quentin87 | 2 petits soucis | Merci pour le retour ; ainsi, wk_table n'était pas la feuille "table" mais devait être la feuille "Output" ; et la cellule E2 dépendait de wk_table et pas de Worksheets(i) ; merci aussi d'avoir passé le sujet en résolu. dhany... |
| 06/03/2018 à 15:42 | Quentin87 | 2 petits soucis | Tu as mal recopié mon code ! j'avais mis une bonne indentation, et surtout : tu as omis le End With qui était entre End If et Next i !!! pour tous les éléments, vérifie bien s'ils doivent dépendre de Worksheets(i) ou de wk_table, qui est défini comme sheet("table"). Exemples : actuellement, DernLign... |
| 06/03/2018 à 15:22 | Quentin87 | 2 petits soucis | J'viens d'penser à ceci : j'croyais que wk_table était un nom défini, mais si c'est le nom de ta feuille, tu dois utiliser ce code : mais comme je t'ai déjà dit : c'est difficile de savoir sans ton fichier... dhany... |
| 06/03/2018 à 14:32 | Willau | Effacer contenu cellule en fonction du résultat d'une autre | Si 2 et 1 sont choisis : pas d'effacement et l'utilisateur peut saisir le commentaire de son choix. dhany... |
| 06/03/2018 à 14:23 | Quentin87 | 2 petits soucis | C'est parfait !!! j'espère bien que mon code ne bug pas !!! car c'est quand ça bug que ça plante ! Comme la boucle est For i = 3 To 24 ... Next i je peux t'assurer formellement que i est incrémenté de 3 à 24 ; sinon, c'est que tes macros sont désactivées ! dhany... |
| 06/03/2018 à 13:58 | Quentin87 | 2 petits soucis | Avec le code VBA que je t'ai indiqué, le contenu ( texte ou autre) de la cellule destination ( à droite du signe égal) sera mis dans la cellule source ( à gauche du signe égal) . For i = 3 To 24 et If .[E2] = i Then ➯ pour régler l'incompatibilité de type, c'est entre i qui contient un nombr... |
| 06/03/2018 à 13:34 | Willau | Effacer contenu cellule en fonction du résultat d'une autre | Essaye avec : dhany... |
| 06/03/2018 à 13:21 | Guillaumekos | Supprimer une ligne dans une cellule | C'est très bien ! je te retourne quand même ton fichier modifié (solution sans avoir utilisé le couteau suisse de MacGyver) : Ton nouveau fichier contient ce code VBA : S'il y a une seule ligne dans la cellule, retour de cette ligne ; s'il y a plusieurs lignes, retour de toutes SAUF la 1ère ; ça mar... |
| 06/03/2018 à 12:53 | PixelHunter_fr | Aujourd'hui et mise a jour | La fonction =MAINTENANT() retourne la date et l'heure ; les 2 sont selon la date système du PC (à mettre à jour si besoin), et c'est indépendant de toute plage horaire (22 h à 6 h ; ou autre) . dhany... |
| 06/03/2018 à 12:32 | micpid | Inventaire Monnaie | @ micpid Ta réponse ne lève pas l'ambiguïté d'une somme de 5 € : impossible de deviner si ça sera un billet de 5 € ou des pièces ! (pour info : les billets de 5 € existent toujours ! ) dhany... |
| 06/03/2018 à 12:19 | Quentin87 | 2 petits soucis | @ Quentin87 Je te laisse essayer ce code VBA : Je pense que ça devrait aller ; sinon, ça serait le côté gauche de l'égalité à modifier. Sans ton vrai fichier, c'est pas facile ; ce serait mieux de le joindre ! Sinon, tu peux toujours essayer ce que te propose Jean-Eric avec PowerQuery. dhany... |
| 06/03/2018 à 11:53 | Quentin87 | 2 petits soucis | Bonne nouvelle : ce côté-là est réglé, j'suis content d'avoir pu t'aider ! Pour le Range, tu n'as pas bien lu ce que j'avais indiqué : Range("L" & DernLigne - 3 & ":L" & DernLigne).Value donc : wk_table.Range("A8:A11").Value = Sheets(i).Range("L" & DernLigne - 3 & ":L" & DernLigne).Value... |
| 06/03/2018 à 11:25 | Quentin87 | 2 petits soucis | @Quentin87 Nos messages se sont croisés ! Pour mes 2 messages de 10:48 et de 11 :17, ça a marché ou pas ? (je parle de l'instruction avec .Sort ; puis celle du Range colonne L) dhany... |
| 06/03/2018 à 11:17 | Quentin87 | 2 petits soucis | @Quentin87 Range("L" & DernLigne - 3 & ":L" & DernLigne).Value dhany... |
| 06/03/2018 à 11:14 | Alice60 | Calcul automatique de cellules avec formules | Ta formule est incorrecte ; c'est : =SI(A7=1;G7;SI(Entr.=1;"Paris Montagne";"")) ⚠ remplacer Entr. par la référence de cellule adéquate dhany... |