Résultats de la recherche

Bonjour à tous, je me suis trompé de forum, et je repose ma question. J’ai cherché en vain dans le forum une solution à mon problème. Je tourne en rond avec les « target » et je suis perdu. Je m’adresse à vous. Je cherche à colorier une cellule dans une couleur si le nombre que je tape...

Bonjour à tous, J’ai cherché en vain dans le forum une solution à mon problème. Je tourne en rond avec les « target » et je suis perdu. Je m’adresse à vous. Je cherche à colorier une cellule dans une couleur si le nombre que je tape est plus grand, et une autre couleur s’il est plus petit...

Bonsoir le forum Suite à un calcul, une macro recopie le résultat d’un calcul en commentaire avec la ligne suivante: « With target.Comment .Text Text:=.Text & target & " € le :" & Format(Now, "dd/mm/yyyy ") & vbLf « Or cette recopie je la voudrais avec seulement 2...

Bonjour le forum Je désire insérer un commentaire automatiquement qui me servira d’historique de contenu de cellule. Ce commentaire doit comprendre, la date de modification de cette cellule ainsi que le contenu de la cellule Grâce au forum, j’ai glané ces quelques lignes qui insèrent la date...

Bonjour le forum Je cherche à effacer tous les commentaires des cellules vides dans une feuille Excel. J’ai pondu ces quelques lignes Mais hélas je suis toujours aussi fâché avec les macros… For Each cel In ActiveSheet.Comments If ActiveSheet.cel.Value = "" Then...

Bonsoir le forum Est-il possible de changer de couleur les petits triangles en tête de colonne lors d’un filtrage, soit par macro ou soit par les menus d’Excel ? Merci Francis

Bonsoir le forum Je cherche à sauvegarder le critère de filtrage d’une colonne, afin de le retrouver à la fin de la macro, pour restituer l’affichage original. J’ai pondu ces quelques lignes et cela coince...Ca marche sauf dans le cas où il n’y a pas de filtre enclenché, cela filtre sur la...

Bonsoir le forum Après maintes recherches, je n'ai pas trouvé la solution à mes deux questions Est- il possible de remplir une Msgbox ou un popup par le contenu d’une colonne ? Quelle est l’instruction qui efface une listbox créée par l’instruction Shapes.AddFormControl(xlListBox...

Bonjour le forum Je cherche à sélectionner toutes les feuilles d’un classeur sauf la première et les deux dernières. Je suis parti sur ces lignes mais cela ne marche pas. For Each Sh In ActiveWorkbook.Sheets If Sh.name <> sheet(1) And sheet(Data1) and sheet(data2) Then Bla bla ……..etc...

Bonjour le forum Je cherche à renommer en capitale tous les onglets automatiquement en fonction de la valeur de la cellule B3 J’ai pondu ces quelques lignes. Mais cela ne marche pas Que faut-il modifier ? For i = NbFeuil To 1 Step -1 With Sheets(i) sheet.name = UCase(Range("B3")) End...

Bonjour le forum J'ai vu qu'il y a déjà eu quelques posts sur ce sujet mais aucune des réponses que j'ai pu lire ne semble correspondre à mon problème. Je désire copier chaque cellule d’une colonne (de A10 à A110) dans 100 feuilles différentes, et ce dans la cellule E5 de chaque feuille...

Bonsoir le forum Suite à un tri, je désire effacer des lignes qui ne contiennent pas une valeur. J’ai pondu ces quelques lignes et c’est « le différent de » qui ne marche pas. Avec « = » ça marche, mais c’est le contraire que je veux faire. Set rg_plage = ActiveSheet.UsedRange...

Bonjour le forum J’essaie de transposer une colonne en ligne avec un critère : toutes les cellules non vides. J’ai fais ces quelques lignes, et ça na marche pas. Elle recopie la colonne indépendamment du critère Maligne = 90 valtest = "" For i = 2 To Sheets.Count - 1 For j = 11 To 64...

Bonjour le forum J’ai réalisé une application pour le travail, mais c’est une vraie usine à gaz. Il s’agit d’extraire des données de deux colonnes (C et F) en vue de les transposer en un tableau récapitulatif. J’extrais toutes les valeurs une à une, je les colle dans une ligne puis les...

Bonjour le forum Je termine une application, je bute sur l’analyse et je pense qu’un XLDnaute peut me mettre sur la voie . Je trie suivant les valeurs d’une combo (cette partie marche), et je voudrais aussi avoir la possibilité de trier sur toutes les valeurs de la combo. En somme, faire un...

Bonjour le forum Je suis un peu perdu avec l’instruction Select Case. Je désire en fonction des valeurs d’une combobox assigner d’autres valeurs en vue de faire un tri. La variable « valtest » reste désespérément vide. Dim MaVariable As String MaVariable = ComboBox2.Value Select Case...

Bonsoir le forum Je voudrais comparer deux colonnes par un OU logique. Les cellules de ces deux colonnes n’ont que deux valeurs : vide ou « X ». Dans mon programme, je voudrais faire : [a1] ou logique avec [B1] puis le résultat dans [A1] et supprimer la colonne B. Si quelqu’un a une idée...

Bonjour le forum, A l’aide d’une combo, j’affecte une valeur à une variable, cette dernière balaie des colonnes en vue de trier une base de données. If ComboBox1.Value = "tata" Then Freq = "O" Else Freq = "N" End If Cette base a été mal renseignée, le O majuscule a été souvent...

Bonjour le forum Je me servais toujours pour trier des onglets de la macro suivante et elle fonctionne toujours très bien. sCount = Worksheets.Count If sCount = 1 Then Exit Sub For i = 2 To sCount - 1 For j = i + 1 To sCount - 1 If Worksheets(j).name <...

Bonjour le forum J’ai essayé de trier (suivant le contenu d’une cellule) des onglets de feuilles d’un classeur en vue de les cacher Mais cela ne marche pas. Si un XLDnaute a une idée.. For i = 0 To sheets.Count - 1 If sheets(i + 1).Range("A1").Value = "toto" Then...