Contenu récent par DELHOMME

Bonjour, Merci pour votre retour. J'ai mis en place le code mais j'ai malheureusement une erreur de compilation (sub ou fonction non définie) pointée sur la mise en place de ce nouveau code. Quelques pistes pour que je puisse identifier le problème ? Merci. Bien à vous.

Pour être vraiment sûr d'avoir compris... 1) "chargé" pour vous, veut dire "écrit" pour moi tel que je l'ai présenté dans la fin de mon code ? 'On écrit dans la listBox Me.ListBox1.AddItem Cells(x, 1) Me.ListBox1.List(Me.ListBox1.ListCount - 1, 1) = Cells(x, 2)...

Dranreb : Oui merci pour cette correction. J'avais bien résolu cette conversion aussi - cf : mon code d'écriture ci-dessous. Private Sub btnAjout_Click() Sheets("SourceSignalement").Activate 'on va sur la feuille "SourceSignalement" Range("A1").Select 'on se positionne sur la cellule A1...

Bonjour, Dranreb : Ah oui, c'est marrant et je suis très content qu'il puisse vous servir de base de données. Merci pour votre retour concernant le format de mes dates - je vais vérifier mais le fichier a évolué et j'ai établi un code permettant d'imposer un format de date : Private Sub...

Bonjour, Dans un userform, et à partir d'un filtrage que je fais à travers une combobox, je récupère les données filtrées automatiquement dans une listbox (5 colonnes : date / Intervenant / Code d'intervention / Eléments d'intervention / Commentaire). Tout ceci marche. Je souhaite maintenant...

Bonjour xUpsilon et Dranreb, Merci pour vos retours constructifs et pédagogiques. Effectivement, il ne faut pas renseigner de propriété RowSource. Le code initial était bon mais ce renseignement bloqué tout. Merci encore pour vos contributions. Bien à vous, Titoo

Bonjour, Toujours rien... J'ai essayé aussi avec ce code : Private Sub UserForm_Initialize() Me.cboVannemasquée.SetFocus Dim J As Long With Sheets("Source") For J = 2 To .Range("C" & Rows.Count).End(xlUp).Row If .Range("I" & J) = "M" Then Me.cboVannemasquée.AddItem...

Merci pour ta réponse xUpsilon. "- sur le fichier joint il n'y a rien en colonnes X et Y" Désolé, il s'agissait d'un exemple (X,Y). Dans le fichier les colonnes concernées sont "C" et "I". "- Set f = Sheets("bd"), ici il faut remplacer bd par Source si la feuille que tu veux utiliser est la...

Bonjour à tous, Je suis nouveau sur le forum et nouveau en VBA... Je souhaite trouver la procédure qui me permettrait d'alimenter une combobox dans un userform à partir : - des données d'une colonne X dans une feuille "source" - et conditionnées par des données d'une colonne Y de la même feuille...