Résultats de la recherche

Bonjour, J'ai une extraction en export.XML journalière du programme SAP qui me donne la position administrative de chacun de mes personnels sous forme de ligne par personnel. Je souhaiterais les regrouper dans un tableau (autre classeur) sous forme de colonne en fonction de leur position...

Bonsoir le forum, Encore une question a 100 balles :) Je test actuellement divers code pour faire un semblant de requête avec un usf. Quand une listbox est alimenté a l'identique de la Bdd j’arrive a exporter le résultat correctement. Mais quand je rajoute des critère pour réduire ma...

Bonsoir le forum, Je test actuellement un nouveau code pour lancer une requête via formulaire. Sur le code que j'utilisais avant, j'arrivais à faire apparaitre le nom et le prénom dans la même listbox. mais avec celui-ci j'arrive pas à trouver la bonne méthode pour que ça fonctionne. Si...

Bonsoir le forum, J'ai un document Word avec des signets pour récupérer des données Excel. Parmi ses données Excel j'ai des chiffres au format :"0000000000". J'aimerai qu'une fois arrivé sur word ce chiffre passe au format "00 000 00000" Exemple du code actuellement utilisé pour...

Bonsoir le forum, Dans mon formulaire quand j'ajoute un personnel j'arrive a l'enregistrer sur 2 feuilles simultanément "Bdd" et "Bdd FIA". Mais quand je veux modifier un personnel déjà créer, je n'arrive pas à effectuer ce changement sur les 2 feuilles. Le code du bouton (qui n'est pas de...

Bonsoir le forum, J'ai ce code : Private Sub Workbook_Open() Dim Cel As Range, s As String With Sheets("Bdd") s = "Attention!! Faire demande ou renouvellement de passeport pour :" For Each Cel In Range("D2:" & Range("D2").End(xlDown).Address) If Cel.Value - 6000 <= Date Then...

Bonsoir les insomniaques, J'ai récupéré ce code fournir par Bond sur un autre fil https://www.excel-downloads.com/threads/alerte-et-message-box-si-date-atteinte.165799/ Private Sub Workbook_Open() Dim Cel As Range For Each Cel In Range("b2:" & Range("B2").End(xlDown).Address) If...

Bonjour le forum, J'ai beau chercher, je trouve pas. J'ai une ListBox: With Sheets("Bdd") For i = 2 To .Range("a65536").End(xlUp).Row ListBox1.AddItem ListBox1.List(ListBox1.ListCount - 1, 0) = .Cells(i, 1) & "," & .Cells(i, 2)...

Bonjour le forum, Quand je sélectionne un personnel via ma ComboBox et que j'annule via un bouton de type "Unload Me" dévolu à cet effet je me retrouve face à cette erreur: Erreur d'exécution '381': Impossible de lire la propriété List. Index de table propriété non valide. Je clique sur...

Bonsoir le forum, Est-il possible de faire des requête du genre query via un userform? Si oui peut-on m'expliquer la manip et si non est ce faisable via 2 listbox: une pour choisir les personnels concernés et l'autre pour les colonnes que l'on désir afficher (voir mon explication dans le...

Bonjour le forum et les futurs intervenants, Dans un UserForm,est-il possible de désactiver la validation par la touche "entrée" et/ou de lui assigner les mêmes propriétés que la touche TAB? Merci d'avance. Bisous

Bonjour le forum, J'ai téléchargé sur ce forum un fichier contenant un userform qui correspond à mes attentes et j'ai a peu prêt compris comment le modifier à ma sauce. Par-contre lorsque je commence a taper un nouvelle entré (commençant par M par exemple) dans le combobox il m'affiche un...

Bonsoir le forum, J'ai fais le tour du web mais j'ai pas trouvé chaussure à mon pied, donc je vais poser la question à des gens compétents. Tout les matins j'ai un fichier Excel (créer par un logiciel du nom de SAP) avec un nom différent(que je ne dois pas modifier). J'aimerais pouvoir...

Bonsoir le forum, J'utilise actuellement cette macro : Sub ecrirplusdate() Range("A1") = Date End Sub J'aimerai faire précéder la date par du texte: Exemple: Nous somme le + Date. Comment faire? Merci d'avance. surtout si c'est Paritec qui répond :)

Bonsoir le forum, Est il possible de modifier la macro suivante afin de pourvoir mettre un mot de plusieur lettre à la place du "x"? Option Explicit Sub color() Dim lig As Byte Range("A2:G30").Interior.ColorIndex = xlNone For lig = 2 To 31 If UCase(Cells(lig, 7)) = "X" Then...

Bonsoir le forum, Est il possible via une macro de faire deux tris en fonction de deux listes personnalisées? Je m'explique: :) liste personnalisée en position 5: Vacance, congé maladie, Mission, etc.. liste personnalisée en position 6: Homme, Femme, enfant, etc.. Je sens que je vais...

Bonjour, J'ai déjà posté 3 questions sans même m'être présenté. Je suis secrétaire DRH au sein de l'armée de terre et utilise beaucoup excel. Malheureusement mon employeur est très avare pour ce qui est de faire passer des formation Excel. Et pour rien vous ccacher avec les bases on va...

Re bonsoir J'expose mon problème: J'ai 3 colonnes F, G et H et 3 autres I, J et K. je souhaiterais que lorsque les cellules en H7 et H9 (dans mon modèle) comporte une valeur texte que les valeurs F7, G7, H7 soit reportées en I7, J7 et K7 et idem pour F9, G9 , H9--> I9, J9 et K7 et ainsi de...

Bonsoir, J'en profite, vous avez l'air d'être calé ici :) J'effectue des requêtes via le programme de mon boulot sous forme de fichier Excel. Le problème c'est que dans ce fichier il y a des colonnes avec des infos qui ne me servent à rien et je perd énormément de temps à les supprimer...

Bonjour, Je débute donc excusez moi si la question existe déjà mais je connais pas les bons termes pour effectuer une recherche efficace. Donc mon problème est le suivant, J'ai une colonne avec plusieurs mots ce terminant soit par "C" soit par "M" Exemples: SOFFC , SOFFM , MDRM, MDRC...