Résultats de la recherche

Bonjour, Il vous suffit de télécharger les fichiers zip du post précédent. :)

Merci cp4, (j'aurais du y penser) Encore merci à Excel Downloads Jack2

Parce qu'à l'époque 2013 ou 2014, l'auteur du document à oublié de mettre 2018

Bonjour à tout le monde et merci pour l'aide que j'ai reçue. Ci-joint un planning élaboré par JC où je n'arrive pas à insérer les différentes années qui apparaissent en A1, notamment 2018. Je ne sais faire ce type de liste comme en Feuil1. Merci

Re : comment concatener via VBA une liste Variable Bonjour pasquetp, Bonjour le forum, Tu peux essayer ceci : Sub essaimacro() Dim i As Integer Dim St As String Application.ScreenUpdating = False finnn = Range("a65536").End(xlUp).Row For i = 1 To finnn If Range("A" & i) <> ""...

Re : Extraction de données Bonjour, J'ai profité du soleil tant qu'il y en avait. Pour pouvoir te répondre, il faudrait que tu me dises si tu veux entrer le nom du fichier dans une boite de dialogue ou si tu souhaites le choisir dans un répertoire en navigant à travers les différents...

Re : Extraction de données Bonjour sophia anie, le Forum, L'intérêt de OuvrirFich = Application.Dialogs(xlDialogOpen).Show("D:\Users\U 122260\Desktop\32\Price.xls") ce serait de boucler (comme dans le mutule boucle. Au lieu de prendre tous les fichier d'un répertoire, on écrirait...

Re : Macro pour trier des résultats et reconstituer un planning sans les résultats 0 Bonjour jda22700, Dans le fichier joint, dans le module1, la procédure Planning remplit par semestre dans les lignes 6 à 126. On peut après transférer ces données dans le tableau qui débute en C140. Je ne...

Re : Macro pour trier des résultats et reconstituer un planning sans les résultats 0 Bonsoir jda22700, C'est la mi-temps. Ci-joint quelques explications et dans mon post de 19h06 le fichier Excel avec la macro. A+ Jack2

Re : Macro pour trier des résultats et reconstituer un planning sans les résultats 0 Bonjour A essayer : Function ColMois(Mois As String) As Byte Dim i As Integer LesMois = Array("JANVIER", "FEVRIER", "MARS", "AVRIL", "MAI", "JUIN", "JUILLET", "AOÛT", "SEPTEMBRE", "OCTOBRE", "NOVEMBRE"...

Re : Modifier une formule en texte en formule Bonjour Didou1, Content que tu aies trouvé. La formulation simplifiée de ce que tu cherchais est : Sub Y() Dim i As Integer For i = 3 To 373 Range("Al" & i).FormulaLocal = Range("Ak" & i).Text Next i End Sub A+ Jack2

Re : Modifier une formule en texte en formule Bonsoir Didou1, Le mieux c'est peut-être de poster un fichier sans données confidentielles que je vois ce que tu cherches à faire. (Aller en mode avancé, puis cliquer sur l’agrafe et envoyer). A+ Jack2

Re : Modifier une formule en texte en formule Bonjour tout le monde, Mille excuses, j'ai oublié d'incrémenter et de simplifier : Sub x() Dim i As Integer For i = 3 To 373 Range("AL" & i).FormulaLocal = Range("Ak" & i).Formula Next i End Sub Pas besoin de passer par une chaîne (s)...

Re : Modifier une formule en texte en formule Bonjour Didou1, En l'absence de fichier avec données (non confidentielles), on peut essayer : Sub x() Dim s As String Dim i as Integer For i = 3 to 373 s = [Ak3] [AL3].FormulaLocal = s Next i End Sub A+ Jack2

Re : tri tableaux Bonjour moniquedol, Si j'ai bien compris, tu sélectionnes le tableau (colonnes E et F, même nombre de valeurs) puis dans l'onglet Accueil allez à droite dans Trier et Filtrer (AZ et petit entonnoir). Dans la boîte de dialogue choisir tir personnalisé, puis dans colonne...

Re : Effacer contenu de cellule Bonjour tout le monde, Avant de chercher comment fonctionne "Selection", un truc tout bête en attendant : Dim Code as String ActiveSheet.Unprotect Code = Cells(Selection.Row, 3) Selection.ClearContents Cells(Selection.Row, 3) = Code On sauve le...

Re : Reporter dans un tableau données extraites d'un USERFORM Bonsoir Saumon80, Ci-joint le fichier rectifié (il n'y a pas la nuit). Comme je ne sais pas si un "nom" peut faire du Bois, de la Paile et du Fer en même temps, il n'y a pas de test pour s'assurer que seul un de ces 3 champs est...

Re : Reporter dans un tableau données extraites d'un USERFORM Bonjour Saumon80 et le Forum, Un bout de code qui prend les valeur de la feuille données pour les mettre dans la feuille tableau : Sub Transfeert_Données() Dim FDon As Worksheet 'feuille données Dim FTab As Worksheet 'feuille...

Re : Extraction de données Bonjour sophia anie, le Forum, :) Inoubliable ce match !!! :) Pour ne pas avoir à saisir le nom du fichier, soit tu utilises la macro Macro_Test[/I] dans le module [U]Boucle, soit tu te sers de la macro dans le fichier joint qui permet de choisir le répertoire...

Re : Extraction de données Bonjour tout le monde, Après la déception du mondial ci-joint 3 modules tirés tout droit d'un exemple de... Robert. Module Un_Fichier traitement d'un fichier à la fois Module Boucle boucle sur tous les fichiers d'un répertoire Module Robert le code original...