S

Membre habitué

Inscrit le :25/07/2015
Dernière activité :26/04/2022 à 20:03
Version d'Excel :2007
Messages
60
Votes
0
Fichiers
0
Téléchargements
0
SujetsMessagesStatistiquesVotes reçus

Messages postés par Sarl54

DateAuteur du sujetSujetExtrait du message
26/04/2022 à 13:19Sarl54Remplir une plage en fonction de données deja presentes dans cette plageMerci 1) Toutefois je n'ai pas compris comment (où est la condition) dans...
26/04/2022 à 01:32Sarl54Remplir une plage en fonction de données deja presentes dans cette plageJe te remercie beaucoup pour cette macro qui correspond assez bien à ce que je veux Comme je m'étais mis au Macro il y a 10 ans , j'ai perdu certaines notions et automatismes. Pourrais-tu du "FOR J" à "Exit For" expliquer les lignes importantes Merci D'autre part, si ça te demande pas trop de taf, e...
23/04/2022 à 19:44Sarl54Remplir une plage en fonction de données deja presentes dans cette plageBonjour à tous: voici une partie de ma problématique Dans l'onglet "Planning", les formules ne marchent pour le moment que pour la plage I24:AM24. Celle-ci se remplit en fonction des dates remplies dans l'onglet "BDD" en fonction des dates et lorsque la colonne de la date concernée est "T2" et Confi...
23/09/2015 à 17:15Sarl54 UNION de PLAGESRe Merci Banzai64, a verifier si ca bugue pas après mais en tous cas, là ca ne bugue plus merci tout plein... en attendant mon prochain bug A+...
23/09/2015 à 02:23Sarl54 UNION de PLAGESJe cherche à trouver le code qui me permettra de créer une Plage (Range) reunion de plusieurs plages Dim PlageLigne(1 To 12) As Range Set Plage=Nothing For I = 1 To 12 Set PlageLigne(I) = Ws.Range(Cells((I + 1) * 5 + 2, 7), Cells((I + 1) * 5 + 2, 9)) 'J'ai simplifié la colonne Set Plage = Union(Plag...
12/09/2015 à 23:37Sarl54Tableau Plage Cellules non videsAprès 6 heures de recherches: Sub Test() Dim Col1 As Byte, Col2 As Byte Dim Ws As Worksheet Set Ws = Sheets("Feuil1") Col1 = Ws.Range(Cells(I, 3), Cells(I, 39)).Find(What:="1", LookIn:=xlValues).Column MsgBox Col1 Col2 = Ws.Range(Cells(I,Col1), Cells(I, 39)).Find(What:="", LookIn:=xlValues).Column ...
12/09/2015 à 17:39Sarl54Tableau Plage Cellules non videsAttention bien que visuellement vides, les cellule ou il n'y a pas de nombres (dates) contiennent une valeur...
12/09/2015 à 16:58Sarl54Tableau Plage Cellules non videsRe serait-ce: Msgbox "colonne début" & Cells(I,3).End(xlToRight).Column Msgbox "colonne fin" & Cells(I,39).End(xlToLeft).Column ?? ou ?...
12/09/2015 à 16:15Sarl54Tableau Plage Cellules non videsDésolé, je pensais que l'explication suffisait Voici le fichier Je n'ai pas précisé que c'est en VBA puisque j'ai besoin des résultats demandés pour faire fonctionner d'autres procédures merci encore séb...
12/09/2015 à 14:57Sarl54Tableau Plage Cellules non videsJ'ai une feuille dans laquelle se trouve un tableau J'ai une plage qui va de Cells(I,3) à Cells(I,39) qui contient les dates du mois. Parfois le 1 du mois commence en Cells(I,3) et parfois en Cells(I,9) et le dernier jours du mois peut être en Cells(I,27) comme être en Cells(I,39) suivant le nombre...
01/09/2015 à 10:05Sarl54 Aide bug progTrouvé...
31/08/2015 à 23:18Sarl54 Aide bug progOopppsss le voila...
31/08/2015 à 22:43Sarl54 Aide bug progJe vous demande de l'aide pour un programme que j'ai adapté Le bug se passe pour la recherche d'un mot quand il y a une lettre (K passe à 2) le code concerné est à la fin de l'userform et si on ne met pas les ' dans les lignes IF K>1 ca bug et je vois pas quoi changer merci pour vos lumières séb...
31/08/2015 à 22:37Sarl54 TableauMerci beaucoup ca me convient bien...
29/08/2015 à 11:23Sarl54 TableauMerci pour votre aide Me suis mal exprimé en effet, je ne veux pas recopier les colonnes mais juste créer un tableau extrait du premier afin d'utiliser un code que j'ai trouvé qui permet de faire une recherche sur un mot dans tout le tableau. (le petit que j'aurais extrait du grand) Je pense donc qu...
29/08/2015 à 02:56Sarl54 TableauRe le forum y a t il un code simple qui ne passe pas par le remplissage de toutes les cellules pour faire un tableau PT ( mais sans l'écrire sur une feuille , juste pour le stocker) 3 colonnes fabriqué à partir des colonnes 1 , 5 et 7 d'un tableau à 10 colonnes GT (même nombre de lignes. Style mais...
28/08/2015 à 01:01Sarl54 Code ListBox multicolonneRe voici le code: .ComboBox1.AddItem Ws.Cells(2, Liste(0)).Value 'Entete premiere colonne For NoCol = 1 To UBound(Liste) .ComboBox1.Column(NoCol, 0) = Ws.Cells(2, Liste(NoCol)).Value 'Ajoute les autres entetes For NoLigne = 5 To Ws.Range("B" & Rows.Count).End(xlUp).Row .ComboBox1.AddItem Ws.Cells(No...
27/08/2015 à 23:40Sarl54 ListBox et Tableau à partir de tableauRe voilà ce que j'ai réussi à faire avec l'aide de ce que j'ai trouvé ça et là: Private Sub UserForm_Initialize() Dim Liste As Variant Dim NoLigne, I As Integer Dim NoCol As Byte Set Ws = Sheets("Demandes") 'Activation de la fenetre "Demandes" With UserForm7 Liste = Array(2, 3, 4, 5, 10) 'liste des...
27/08/2015 à 12:31Sarl54 ListBox et Tableau à partir de tableauOui et non oui car le code m'intéresse et ça m'apprend des trucs donc je le sauvegarde non car c'est de ma faute mais j'ai omis de dire que mon tableau est dans une feuille bien sur et ma listbox dans un userform, sorry Séb...
27/08/2015 à 12:20Sarl54 Code ListBox multicolonneParfait merci bien A+ Séb...
27/08/2015 à 02:57Sarl54 Code ListBox multicolonneUne aide svp sur la syntaxe: remplir les colonnes 1, 2 et 3 d'une Listbox multicolonnes (3colonnes) avec les colonnes B, E et G d'un tableau: ya t il qqch de ce type à écrire: ListBox1.List(1) = Ws.Range("B1:B" & Ws.Range("B" & Rows.Count).End(xlUp).Row) ListBox1.List(2) = Ws.Range("E1:E" & Ws.Range...
26/08/2015 à 18:48Sarl54 ListBox et Tableau à partir de tableauToujours en recherche mais je bute sur deux trucs Ayant un tableau(Grand_Tab) à 40 colonnes je souhaite 1) créer un tableau(Petit_Tab) 5 colonnes avec les colonnes B, G, P, S et T du grand tableau 2) Créer une ListBox Multicolonnes à partir des colonnes B, G, P, S et T du grand tableau Voilà et je b...
26/08/2015 à 15:43Sarl54Tri comboboxRe Je récapitule ma problématique: J'ai 5 Listes remplies à partir de 5 colonnes d'un tableau Je veux pouvoir choisir une liste, qu'elle soit triée par ordre alphabétique et une fois la valeur sectionnée, je veux récupérer les valeurs de la ligne correspondante du tableau Ca je sais faire Mais quel...
26/08/2015 à 12:55Sarl54Tri comboboxMerci pour ton aide Je suppose que temp() est un tableau à une colonne Le code ci dessus m'intéresse mais il faudrait que je l'adapte car c'est dans des combobox que je vais mettre les renseignements (5 combobox qui peuvent être triées) Ainsi, j'aurai sélectionné une valeur d'une des combo triée, je...
26/08/2015 à 02:37Sarl54Tri comboboxRe De plus ca ne trie pas par dates, ce qui m'aurait été vu le code...
26/08/2015 à 00:03Sarl54Tri comboboxJe n'en ai pas envoyé celui que j'ai mis dans le premier message convient...
25/08/2015 à 23:22Sarl54Tri comboboxEn fait ce code même s'il faut que je me plonge dedans pour le comprendre (car je préfère toujours comprendre ce que j'écris) semble bien fonctionner ( je n'ai pas encore testé les dates) donc apriori il me convient et je saurai l'adapter pour mon fichier toutefois je demandais si c'est le triage le...
25/08/2015 à 20:25Sarl54Tri comboboxJ'ai un userform dans lequel je remplis 5 combobox à partie d'un grand tableau. Je souhaite présenter ces combo triées et que mes textbox se remplissent correctement J'ai trouvé sur le net et ca semble me convenir: Par contre je souhaite pouvoir trier des dates ou des nombres ou des mots et savoir s...
25/08/2015 à 17:19Sarl54 AffichageSub Visibility() ' Tout faire apparaitre Dim Ctrl As Control Voilà le code que j'ai écrit (tous les controles autres que le boutons de commandes sont rassemblés dans la Frame25) Auparavant j'avais tout rendu invisible sauf les boutons de commandes, et quand je click sur l'un des boutons... With User...
25/08/2015 à 12:13Sarl54 AffichageMerci Pour cette réponse Je précise donc la situation j'ai rendu tout invisible dans mon userform, sauf une frame ( Frame1) qui contient des boutons de commandes et suivant la commande, tout ou partie du reste de l'userform s'affiche. C'est à ce moment là qu'il y a un décallage ( qu'il n'y a pas si...
25/08/2015 à 02:52Sarl54 AffichageAyant un userform avec beaucoup de controles, j'ai un décallage à l'affichage des tous ces controles donc j'ai regroupé en 5 frames (2, 15,22,28 et30) et je me suis dit , peut être à tort que: en rendant tout non visible puis en rendant tout visible sauf les 5 frames puis enfin en rendant les 5 fram...
20/08/2015 à 15:30Sarl54 CommandbuttonMerci...
20/08/2015 à 13:00Sarl54 CommandbuttonWouahhhhhhhh beh j'aurais jamais trouvé Merci tout plein et tu as mis combien de temps pour trouver? et sinon que penses tu du reste? bon ya bcp de choses a terminer mais bon ce qui reste je vais aller vite car j'ai trouvé l'essentiel merci encore Séb wouahhhhhhhh beh j'aurais jamais trouvé Merci to...
20/08/2015 à 01:34Sarl54 CommandbuttonC fait j'espère que c'est pas si évident car j'ai cherché longtemps...
19/08/2015 à 23:11Sarl54 CommandbuttonIncompréhensible ca marche dans le fichier joint mais pas dans mon fichier original...
19/08/2015 à 18:17Sarl54 CommandbuttonEn effet mais pas sur mon gris fichier bon je cherche encore et je l'envoie en PV si qqn veut jeter un coup d'œil...
19/08/2015 à 17:34Sarl54 CommandbuttonVoila le fichier...
19/08/2015 à 17:17Sarl54 CommandbuttonLa Sub Degel s'appelle bien Degel et non Gel re oui j'ai un code je vais faire un fichier ressemblant car le mien est vraiment trop gros re oui j'ai un code je vais faire un fichier ressemblant car le mien est vraiment trop gros...
19/08/2015 à 16:58Sarl54 CommandbuttonAu secours , je sèche et je ne vois pas la solution: je crée une sub qui me "gèle" toutes les combobox , textbox et command button: Sub Gel() Dim ctrl As Control 'Boucle sur la collection de contrôles For Each ctrl In UserForm1.Controls ctrl.Enabled = False Next ctrl End Sub ca marche J'ai la Sub De...
07/08/2015 à 02:56Sarl54Propriétés COMBOBOXVoici un code pour remplir une combobox format horaire hh:mm Private Sub UserForm_Initialize() Dim i As Integer, j As Integer 'boucle sur les heures For i = 0 To 23 'boucle sur les minutes par tranche de 5 mn For j = 0 To 55 Step 5 'j'initialize mes combo Me.ComboBox2.AddItem Format(i, "00") & ":" &...
04/08/2015 à 16:51Sarl54Combobox et tableauEt avec un fichier c'est mieux...
04/08/2015 à 16:47Sarl54Propriétés COMBOBOXRe voici un fichier explicatif de ma problématique (tableau combobox) merci pour votre aide...
02/08/2015 à 00:00Sarl54Propriétés COMBOBOXMDR Banzaî c'est vrai que ce que j'explique me semble très clair car j'ai à l'esprit ce que je veux. Je ne peux faire le fichier que d'ici lundi mais je l'enverrai A plus merci et à lundi Séb...
01/08/2015 à 17:23Sarl54Propriétés COMBOBOXCoucou merci Bruno et Banzai j'ai testé F1 déjà mais c'est pas toujours explicite même si ça doit l'être pour qqn qui a déjà compris. en fait j'aimerais la procédure pour remplir une combobox qui se remplit (quand on clique dessus) avec la colonne A d'un tableau (qui correspond à l'indice de l'enreg...
01/08/2015 à 10:46Sarl54Propriétés COMBOBOXLol pas super compréhensible pour le débutant que je suis...
01/08/2015 à 00:37Sarl54Propriétés COMBOBOXJe n'arrive pas à trouver une aide bien faire sur les propriétés des combobox (du projet VBA) Avez-vous un lien à me proposer Merci à vous Séb...
31/07/2015 à 17:31Sarl54Combobox et tableauCertes mais je ne sais pas tout faire j'ai posé qqs questions , j'ai besoin d'aide merci d'avance Séb...
31/07/2015 à 12:10Sarl54Combobox et tableauRe petite precision sur les 5 combobox en fait il en faut 5 car je veux pouvoir faire une recherche soit sur le N° d'enregistrement (colonne A) soit sur le nom soit sur le telephone soit.... d'où 5 combobox suivant ce que mon choix de critère voili voilà...
31/07/2015 à 11:29Sarl54Combobox et tableauMerci pour ta réponse, après plus de 6 heures passées à faire des recherches, j'ai trouvé 2 possibilités ( j'aimerais savoir faire les deux même s'il y a sans doute autre chose à faire) Méthode1 : Je vais utiliser une combobox 5 colonnes qui récupère 5 colonnes d'un grand tableau ( contenant plus de...
31/07/2015 à 00:33Sarl54TCD trié par VBA et ComboboxRE c'est donc une combobox multicolonne? je vais preparer le fichier mais pour le moment j'essaye .....