Résultats de la recherche

Bonjour Je dirais que j'ai réussi à pas mal avancer sur mon projet. Il semble que je puisse vérifier mes informations correctement. Pour l'instant je suis dans la phase renommée les fichiers suivants les formules mise en places. Je ne manquerai pas de réactiver une discussion au besoin...

Bonjour, Pourquoi ne pas utiliser la fonction tableau de excel (insertion\tableau). Celle-ci te permettra d'avoir des fitres sur chaque colonne. Ou utilise la fonction filtre de excel (perso moins fan) sélectionne le tableau (Données\ filtres) Cordialement

Bonjour à tous, Je cherche une solution qui me permettrai de vérifier si mon fichier recap et toujours à jour en fonction des fichiers qui sont sur le serveur. J'ai trouvé un code VBA qui me convient, qui me permet de faire la liste de tout mes fichiers d'un répertoire. Je voudrait maintenant...

bonjour, La formule à l'aire parfaite. Je suis bien conscience que les qualifications doivent être écrite exactement pareil. Ca va surement être compliquer de travailler avec des listes déroulantes mais je vais essayer de faire un tableau le plus évolutif possible sans possibilités d'erreur...

bonjour, Je viens de prendre connaissance de cette superbe formule. Je devrais être capable de l'adapter dans mon tableau. Merci beaucoup pour ton aide. Comme tu le sous-entends dans ton post la partie de formule CAR(Droite(C18;1)+96) ne va pas le faire. En fait, j'ai simplifié les noms de...

Bonjour, Je souhaiterais reproduire le résultat du tableau et de l'histogramme se trouvant dans le document joint, sans avoir à faire les deux colonnes intermédiaires (formule 1 et 2). La base de données fait pour l'instant 2000 lignes et 100 colonnes. Cette base de donnée étant extraite d'un...

bonjour, Je l'ai testé rapidement, elle n'insert pas de ligne, mais duplique la formule en dernière ligne. Je pense qu'un petit fichier pourrait aidé a comprendre le problème.

bonjour, pour récupérer la derniére cellule vide et incrémenter Private Sub UserForm_Initialize() ligne = Range("A65536").End(xlUp).Row numero = Left(Cells(ligne, 1).Value, 1) & Format(Right(Cells(ligne, 1).Value, 7) + 1, "0000000") ComboBox1.AddItem (numero) End Sub

bonjour, une solution mais je suis pas sur =SI(AC30<>FIN.MOIS(AC30;0);AE29;MOIS(AC30)*2,08)

bonjour, les listes sont chargé par le biais de plage de cellules. tu vas dans l'onglet "Formules" , "gestionnaire de nom" tu vas trouver le nom "Liste_Articles" et dans la bar de formule tu changes la plage de cellule. ca devrait fonctionner par la suite

merci pour la réponse il ne me manqué que le indirect en faite.

j'ai ajouté un fichier dans le post #1

bonjour a tous, je recherche une formule capable de me renvoyer le nom d'une personne ce trouvant en colonne 1 suivant un tableau de recherche. j'ai commencer ma formule mais j'ai une erreur #valeur ma formule nommé seance18h =ADRESSE(18;EQUIV('recap...

J'ai testé le fichier par curiosités. un EX c'est glissé avant le nom de la combobox "private sub excombobox" donc quand on clic sur connexion rien ne ce passe. la ligne de code à pas du être modifiée partout J = Me.ComboBoxUtilisateur.ListIndex + 4 Ci dessus la ligne de code écrite par...

bonjour, si dans ton exemple tu enlève le ",1" qui est inutile car tu as q'une seul colonne et que tu change le type de variable en string au lieu de long tu auras une valeur de renvoyée, mais pas celle que tu cherches. moi j'ai pas de solution à ce code. pour cette ligne je peux expliquer ...

Pour la deuxième question j'ai pas trop le temps de regarder mais à mon avis ton Code ne marche pas. Ton j n'a pas de valeur. J doit correspondre à un numéro de ligne. Tu dois pouvoir utiliser le morceau de code du poste précédant. De plus il faut écrire . Range ("f" & j). Value si tu oublié...

Oui c'est logique quand tu as For c'et pour faire une boucle dans ton exemple tu répète ton code de la ligne 4 jusqu'a la dernière ligne vide. Un code à essayer, mais pas testé. Dim J As Long J = Columns(1).Find(Me.ComboBoxUtilisateur.Value, LookIn:=xlValues).Row Range("F" & J) = Me.TBMotPasse

bonjour, je poste aussi ma méthode un peu différente Private Sub ComboBoxUtilisateur_Change() Dim J As Long J = Columns(1).Find(Me.ComboBoxUtilisateur.Value, LookIn:=xlValues).Row Me.TBMotPasse = Range("F" & J) End Sub

J'ai trouvé encore mieux je pense avec arrondie des axes Sub Macro1() Sheets(1).ChartObjects(1).Chart.Axes(xlValue).MaximumScale = f(Application.Max(Range("c8:g12").Value) + 0.0225, 5) ' arrondie a 5 min Sheets(1).ChartObjects(1).Chart.Axes(xlValue).MinimumScale = f(Range("b8") - 0.0225, 10)...