Créer un plage pour alimenter un Combobox

br44 · 25 Octobre 2009

Bonjour le forum ,

Je voudrais afficher dans un Combobox le résultat de colonnes et l'associer de manière à obtenir le résultat suivant :

Nom + le n° de facture de chaque mois (1 résultat toutes 9 colonnes )

J'ai déjà fait les variables qui associent le n° au montant mais je n'arrive pas à les associer à ma liste de départ .

Le résultat que je voudrais obtenir est le suivant :

Si je sélectionne le Nom de MAXOU dans ma liste je voudrais que s'affiche dans la ConboBox (N°de facture) les cellules P ,Y, AH de la lignes 13 soit 125, 250, 35, (Voir ligne 2 du tableau) et ceci pour chaque nom de la liste ?

Pour l'instant j'ai réussi à afficher tout la colonne 16 mais je veux juste les cellules correspondantes à la ligne .

Je joins mon fichier avec le tableau ,l'USF et mon programme .

Si ma demande n'est pas claire où si il vous manquait des éléments faites le moi savoir . Je ne vous demande pas de faire le programme mais de me donner l'explication ou les procédures de base pour que je puisse avancer .

Vous remerciant par avance de votre aide je vous dit à plus sur se fil . Amicalement Br44

br44 · 30 Octobre 2009

Re : Créer un plage pour alimenter un Combobox

Re:bonjour à tous ,

Bon je viens de tester le deux proposition que tu ma faite ,je peux afficher dans mon tableau seulement j'ai un décalage entre ma liste de nom est les colonnes .

je m'explique : quand je sélectionne un nom de client dans la combobox 1 et que je remplie les différentes textBox il m'affiche le résultat dans mes cellules avec un décalage de lignes .

Exemple :si je selectionne le Nom"MAXOU" située en ligne 13 dans le tableau il affiche le résultat en ligne 11 .

J'ai modifiée ma macro sur les point suivant :

1) J'ai supprimé le "For X = 1To 4
2) j'ai modifier la cellule "A11:A" & cells ..... par "A16:A" & cells ....
"A16" étant la dernière ligne de mon tableau .

Je ne vois pas du tout d'où cela peut provenir , Si tu as une solotion fais mois signe . Te remerciant par avance je te dis à plus . Amicalement BR44
ule

jp14 · 1 Novembre 2009

Re : Créer un plage pour alimenter un Combobox

Bonjour

Ci dessous le code à écrire

Code:

...................................
Dim derlig As Long
 If NomClient.Value <> "" Then
'Je Selectionne la feuille du classeur consernée
 With Sheets("SAISIE1")
'Je recherche la dernière ligne de la colonne "A" (NomClient)
derlig = .Range("a65536").End(xlUp).Row + 1
 
  For X = 1 To 4
'Je rentre les données dans le tableau
 'Pour les N° de Chèques
    .Range("B" & derlig).Value = NCheque1.Value
...................................

Le code
DerLig = .Range("A11:A" & Cells.Rows.Count).End(xlUp).Row + 1
Donne comme résultat la valeur 11.

A tester

br44 · 1 Novembre 2009

Re : Créer un plage pour alimenter un Combobox

Bonjour Jp14 ,le forum

Merci pour cette solution que je viens de tester . j'ai réussi à afficher le N° de chèque1 ,mais pas en face du nom sélectionné (il apparait sur la ligne après le tableau ) dans la combobox1 .

J'ai modifier en elevant le +1 à la fin de la variable "derlig " et il apparait sur la dernière ligne du tableau mais toujours pas en face du nom sélectionné .

Pour moi cela reste un mystère ,je joint mon fichier avec les résultats tel qui se sont affichés après mes essais .

Vois si tu as un peut de temps où cela peut clocher ,car moi je ni comprend plus rien😕😕😕😕

Te remerciant par avance je te dis à plus .Amicalement BR44

Pour info : la variable derlig est déclarée dans l'option explicit du programme .

jp14 · 1 Novembre 2009

Re : Créer un plage pour alimenter un Combobox

Bonsoir

Pour écrire dans la ligne désignée par le nom il suffit d'écrire

Code:

derlig = CLng(NomClient.List(NomClient.ListIndex, (NomClient.ColumnCount - 1)))

Le mot derlig prête à confusion on attend la dernière ligne.

Amicalement

JP

br44 · 2 Novembre 2009

Re : Créer un plage pour alimenter un Combobox

Bonjour Jp14,le forum

Je répond à ton dernier message en te remerciant beaucoup pour tout les conseils que tu ma donnés .

Tout fonctionne pour la première partie il faut maintenant que je rentre les modification des montants .

A se sujet ,j'ai une petite question à te poser .

Quel est la formule VBA pour obtenir le résultats suivant :

Si le montant de la cellule "Q12" par exemple passe en bleu (les montants sont en rouge à la base) ,alors enlever se montant du mois situé en colonnes "X12"

Le montant en rouge est pour les sommes qui sont dû .

Le montant en bleu est pour les montant payer par chèques ou par virement

Exemple :
J'ai 99,20€ en rouge avant validation se montant passe en bleu après validation . Comment faire pour que 99,20€bleu - 99,20 rouge =0 Bleu où si 50,00€ en bleu - 75,00€ rouge =25,00€ rouge

Se qui donne au niveau des cellules les formules suivantes:

"Q12"- valeur de "X12" = 0 en "X12" où

"Q12" - (Valeur de" X12" > "Q12") = 25 en "X12"

Il faudrait appliquer se principe sur la plage allant de "Q"à"AO".

en espérant être claire dans ma question est ne soit pas trop compliquée à mettre en place .

Te remerciant par avance pour tout ,je te dis à plus sur se fil . Amicalement Br44

br44 · 23 Novembre 2009

Re : Créer un plage pour alimenter un Combobox

Bonjour le forum ,

Je me permets de remettre se fil en route ,car j'ai une petite question concernant se sujet .

Voilà on m'a demander de rajouter une feuille dans mon classeur qui reprendrais les factures impayées de l'année précédente en compte (ceci pour des raison comptable) . j'avais prévue un archivage automatique de mon classeur en fin d'année ,mais pas cette option .

Ma question est donc😛eut-on alimenter des combobox à partirs de deux feuilles du même classeur ?

Je place ici la macro que JP14 ma faite et qui ma aider dans cette procédure.

Code:

[COLOR="RoyalBlue"]Option Explicit[/COLOR] [COLOR="SeaGreen"]'Oblige à déclarer toutes les variables[/COLOR]
[COLOR="SeaGreen"]'Procédure pour la Liste de choix "Nom des Clients "[/COLOR]
  [COLOR="RoyalBlue"]Private[/COLOR] A [COLOR="RoyalBlue"]As[/COLOR] Range [COLOR="SeaGreen"]'Déclare la variable A pour la "plage client"[/COLOR]
 [COLOR="RoyalBlue"] Private[/COLOR] cel [COLOR="RoyalBlue"]As[/COLOR] Range [COLOR="SeaGreen"]'Déclare la variable Cel pour le "Nom Client"[/COLOR]
[COLOR="SeaGreen"]'Déclare la varible X[/COLOR]
  [COLOR="Blue"]Dim[/COLOR] X [COLOR="Blue"]As Byte[/COLOR]
[COLOR="SeaGreen"]'Déclare les variables AS INTEGER[/COLOR]
  [COLOR="Blue"]Dim[/COLOR] L [COLOR="Blue"]As Integer,[/COLOR] [COLOR="Blue"]LNomClient[/COLOR] [COLOR="Blue"]As Integer[/COLOR]
[COLOR="SeaGreen"]'Déclare la variable Lig[/COLOR]
  [COLOR="RoyalBlue"]Dim [/COLOR]Lig[COLOR="RoyalBlue"] As Long[/COLOR]
  [COLOR="Green"] 'Déclare la variable flag[/COLOR]
  [COLOR="Blue"]Dim[/COLOR] flag [COLOR="Blue"]As [/COLOR]Boolean
[COLOR="SeaGreen"]'Déclare la varible colonne[/COLOR]
 [COLOR="Blue"] Dim[/COLOR] col [COLOR="Blue"]As Byte[/COLOR]
[COLOR="Blue"]Private Sub[/COLOR] UserForm_Initialize()
[COLOR="SeaGreen"]'Initialise à l'ouvertue de l'UserFrom
'Création de la Liste de Choix"Nom des Clients
'On remplit la liste des Noms
'Définit la variable A[/COLOR]
  [COLOR="Blue"]Set[/COLOR] A = Range("A12:A" & Range("A65536").End(xlUp).Row)
[COLOR="Teal"]'On boucle sur toutes les cellules de la plage A[/COLOR]
 [COLOR="Blue"] For X [/COLOR]= 1 [COLOR="Blue"]To [/COLOR]42
  col = 1 + 43[COLOR="Green"] 'Détermine le choix des colonnes[/COLOR]
[COLOR="Green"]'Redéfinit la vériable A et l'unie avec la dernière colonnes du tableau[/COLOR]
  [COLOR="RoyalBlue"] Set [/COLOR]A = Application.Union(A, Range(Cells(43, col), Cells(65536, col).End(xlUp)))
[COLOR="Green"]'Sort de la boucle[/COLOR]
 [COLOR="Blue"] Next X[/COLOR]
  
[COLOR="Green"]'Alimentation de la listbox[/COLOR]
[COLOR="Blue"]With[/COLOR] Me.NomClient
.Clear
.ColumnCount = 3
.ColumnWidths = "50;0;0"
.Style = fmStyleDropDownList
[COLOR="Blue"]For Each [/COLOR]cel [COLOR="Blue"]In[/COLOR] A [COLOR="Green"]'boucle sur toutes les cellules Cel de la plage A[/COLOR]
    .AddItem (cel.Value) [COLOR="Green"]'ajout le nom du client(en colonne 0 de la listbox)[/COLOR]
    [COLOR="Green"]'Ajout le montantGlobal (en colonne 1 de la listbox)
    'Prend en compte la listbox et ajout de la somme[/COLOR]
        .Column(1, .ListCount - 1) = cel.Offset(0, 1).Value
   [COLOR="Green"] 'Mets au format monaitère de la somme affichée dans la textbox[/COLOR]
        .Column(1, .ListCount - 1) = Format(.Column(1, .ListCount - 1), "#,##0.00 €")
    [COLOR="Green"]'Mémorise le numéro de ligne[/COLOR]
        .List(.ListCount - 1, .ColumnCount - 1) = cel.Row
    [COLOR="Green"] 'fin de la prise en compte de la listbox[/COLOR]
[COLOR="Blue"]Next [/COLOR]cel [COLOR="Green"]'prochaine cellule Cel de la listbox[/COLOR]
[COLOR="Blue"]End With[/COLOR]
 
[COLOR="Green"]'Création pour les "Date de Saisies"
'Affiche la date de saisie[/COLOR]
  DateSaisie.Value = Sheets("SAISIE1").Range("B8").Value

  [COLOR="Blue"]Exit Sub[/COLOR]
[COLOR="Blue"]End Sub[/COLOR]
[COLOR="Blue"]Private Sub[/COLOR] NomClient_Change() [COLOR="Green"]'On récupère le combobox1 "NomClient" pour modification[/COLOR]
[COLOR="Green"]'Définit la variable LNomClient[/COLOR]
 LNomClient = Cells.Find(NomClient.Value, LookIn:=xlValues).Row
 Me.MontantGlobal.Value = Cells(LNomClient, 43).Value
[COLOR="Green"]'Mise au format de la TextBox1 "MontantGlobal"[/COLOR]
 Me.MontantGlobal.Value = Format(Me.MontantGlobal, "#,##0.00 €")
[COLOR="Green"]'Définit la variable Lig[/COLOR]
Lig = CLng(NomClient.List(NomClient.ListIndex, (NomClient.ColumnCount - 1)))
[COLOR="Green"]'Parametrage des autres ComboBox[/COLOR]
NFacture.Clear
    NAnFacture1.Clear
    NAnFacture2.Clear
    NFactureUnique.Clear
[COLOR="Green"]'Creé une boucle dans le tableau à partir de la colonne 16 pour le choix du N°de facture[/COLOR]
[COLOR="Blue"]For[/COLOR] X = coldep [COLOR="Blue"]To[/COLOR] colder [COLOR="Blue"]Step[/COLOR] pas
       [COLOR="Blue"] With [/COLOR]NFacture
            .AddItem Cells(Lig, X)
            .List(.ListCount - 1, 1) = Cells(Lig, X).Offset(0, 1)
            [COLOR="Blue"]If [/COLOR]Cells(Lig, X).Offset(0, 1).Font.ColorIndex = 5 Then [COLOR="Green"]'Affect une couleur au départ[/COLOR]
               [COLOR="Green"] 'La facture à déjà étée payée[/COLOR]
                .List(.ListCount - 1, 2) = "Payer"
           [COLOR="Blue"] Else[/COLOR]
                [COLOR="Green"]'la facture est dûe[/COLOR]
                .List(.ListCount - 1, 2) = ""
          [COLOR="RoyalBlue"]  End If
       End With[/COLOR]
 
   [COLOR="RoyalBlue"] With[/COLOR] NAnFacture1
        .AddItem Cells(Lig, X).Offset(0, off1)
        .List(.ListCount - 1, 1) = Cells(Lig, X).Offset(0, off1 + 1)
       [COLOR="RoyalBlue"]If [/COLOR]Cells(Lig, X).Offset(0, off1 + 1).Font.ColorIndex = 5 Then
     [COLOR="Green"]  'La facture à déjà étée payée[/COLOR]
                .List(.ListCount - 1, 2) = "Payer"
          [COLOR="RoyalBlue"]  Else[/COLOR]
              [COLOR="Green"]  'la facture est dûe[/COLOR]
                .List(.ListCount - 1, 2) = ""
           [COLOR="RoyalBlue"] End If
           End With[/COLOR]

  [COLOR="RoyalBlue"]  With[/COLOR] NAnFacture2
        .AddItem Cells(Lig, X).Offset(0, off2)
        .List(.ListCount - 1, 1) = Cells(Lig, X).Offset(0, off2 + 1)
      [COLOR="RoyalBlue"] If [/COLOR]Cells(Lig, X).Offset(0, off2 + 1).Font.ColorIndex = 5 Then
      [COLOR="Green"] 'La facture à déjà étée payée[/COLOR]
                .List(.ListCount - 1, 2) = "Payer"
           [COLOR="Blue"] Else[/COLOR]
               [COLOR="Green"] 'la facture est dûe[/COLOR]
                .List(.ListCount - 1, 2) = ""
           [COLOR="Blue"] End If
        End With[/COLOR]

      [COLOR="Blue"] With[/COLOR] NFactureUnique
        .AddItem Cells(Lig, X).Offset(0, off3)
        .List(.ListCount - 1, 1) = Cells(Lig, X).Offset(0, off3 + 1)
       [COLOR="Blue"][COLOR="Blue"] If[/COLOR][/COLOR] Cells(Lig, X).Offset(0, off3 + 1).Font.ColorIndex = 5 Then
      [COLOR="SeaGreen"] 'La facture à déjà étée payée[/COLOR]
                .List(.ListCount - 1, 2) = "Payer"
           [COLOR="Blue"] Else[/COLOR]
               [COLOR="SeaGreen"] 'la facture est dûe[/COLOR]
                .List(.ListCount - 1, 2) = ""
        [COLOR="Blue"]    End If
        End With[/COLOR]
[COLOR="Blue"]Next X[/COLOR]
[COLOR="Blue"]End Sub[/COLOR]
[COLOR="Blue"]Private Sub[/COLOR] NFacture_Change() [COLOR="Green"]'au changement dans la listbox[/COLOR]
[COLOR="Blue"]Call[/COLOR] Combochange(Me.NFacture, Me.MonFacture, Me.ToggleButton1)
[COLOR="Blue"]End Sub[/COLOR]
[COLOR="Blue"]Private Sub[/COLOR] NAnFacture1_Change() [COLOR="Green"]'au changement dans la listbox[/COLOR]
[COLOR="Blue"]Call [/COLOR]Combochange(Me.NAnFacture1, Me.MonAnFacture1, Me.ToggleButton2)
[COLOR="Blue"]End Sub[/COLOR]
[COLOR="Blue"]Private Sub[/COLOR] NAnFacture2_Change() [COLOR="Green"]'au changement dans la listbox[/COLOR]
[COLOR="Blue"]Call [/COLOR]Combochange(Me.NAnFacture2, Me.MonAnFacture2, Me.ToggleButton3)
[COLOR="Blue"]End Sub[/COLOR]
[COLOR="Blue"]Private Sub[/COLOR] NFactureUnique_Change() [COLOR="Green"]'au changement dans la listbox[/COLOR]
[COLOR="Blue"]Call[/COLOR] Combochange(Me.NFactureUnique, Me.MonFactureUnique, Me.ToggleButton4)
[COLOR="Blue"]End Sub[/COLOR]
[COLOR="Blue"]Private Sub[/COLOR] Combochange(Cb As MSForms.ComboBox, tb As MSForms.TextBox, TG As MSForms.ToggleButton)
    [COLOR="Blue"]If[/COLOR] Cb.ListIndex = -1 [COLOR="Blue"]Then Exit Sub[/COLOR]
    [COLOR="Blue"]If[/COLOR] Cb.List(Cb.ListIndex, 2) = "Payer" [COLOR="Blue"]Then[/COLOR]
       tb.ForeColor = &HFF0000
        TG = True
    [COLOR="Blue"]Else[/COLOR]
        tb.ForeColor = &HC0&
        TG = False
    [COLOR="Blue"]End If[/COLOR]
    tb.Value = Format(CCur(Cb.List(Cb.ListIndex, 1)), "#,##0.00 €")
[COLOR="Blue"]End Sub[/COLOR]

je joint également la feuille dons les éléments à rajouter sont :

les même que ceux que la feuille "SAISIE1" sauf que les N° de facture sont en vert ,indice couleur = 50 ,et que le montant lui reste en rouge ,indice couleur = 3 , ceci afin différencier les N° de factures d'une année sur l'autre en cas de numération double (152 pour l'année en cour 152pour l'année passée).

J'ai rajouter des exemples bidons dans nouvelles feuilles comme indications.

En éspérant que ma demande soit claire et qu'elle soit réalisable je vous dis à plus sans omettre de vous remercier par avance du coup de main .

Je peut modifier ma macro ,il me faut juste les lignes de code pour la modification . Amicalement BR44

jp14 · 25 Novembre 2009

Re : Créer un plage pour alimenter un Combobox

Bonsoir

Ci joint un exemple avec une listview.
Recherche des données dans des feuilles du classeur.
Affichage en couleur, utilisation de la couleur de la feuille.
En cliquant sur un numéro affichage des données.
Dans un combobox on ne peut pas changer la couleur.

JP

br44 · 25 Novembre 2009

Re : Créer un plage pour alimenter un Combobox

Bonsoir,jp14,le forum

Un grand merci à toi pour ton fichier . Si j'ai bien compris se dernier il faut crée

une nouvelle comboBox dans l'usf et l'affecté à la feuille "Récap impayer" pour que je puisse les voir .

Car à première vue je ne peut pas ajouter les informations de cette feuilles directement dans les combobox existant ?

Je testerais demain et te tiendrais au courant .

Je te dis donc à plus sans omettre de te remercier à nouveau pour le coup de main . Amicalement Br44

jp14 · 25 Novembre 2009

Re : Créer un plage pour alimenter un Combobox

Bonsoir

br44 à dit:
Bonsoir,jp14,le forum

Car à première vue je ne peut pas ajouter les informations de cette feuilles directement dans les combobox existant ?

On peut ajouter les informations de cette feuille dans les combobox existant, sans la couleur.
La différentiation par la couleur peut se faire si on utilise une listview en lieu et place des combobox. La listview étant un contrôle plus difficile à programmer, mais il offre plus de possibilité.

Une approche consisterait en un combobox avec 4 colonnes dont 2 seraient caché.
Dans la deuxième colonne on pourrait mettre l'année. Les colonnes cachées contenant les informations pour retrouver le montant à savoir le numéro de ligne et la feuille utlisée.
En cliquant sur un item on aurait directement l'adresse de la cellule qui contient le montant.

A+

JP

br44 · 26 Novembre 2009

Re : Créer un plage pour alimenter un Combobox

Bonjour JP14,le forum

Merci pour cette réponse qui ma permis de comprendre le souci .

J'ai une autre question : En ajoutant des infos dans les combobox cela va-t-il entrainées des modifications sur les boutons à bascule ?

et si oui ne pourrait_on pas jouer là-dessus ?

j'ai pansée à ceci par rapport à l'affectation entre les deux feuilles sources .

Te remerciant par avance pour ta patience je te dis à plus .Amicalement BR44

jp14 · 26 Novembre 2009

Re : Créer un plage pour alimenter un Combobox

Bonsoir

Une exemple de solution.

Code:

With NFacture
    .Clear
    .ColumnCount = 3
    .ColumnWidths = "40;30;0"
    .Style = fmStyleDropDownList
End With

For X = coldep To colder Step pas
    With NFacture
        .AddItem Cells(lig, X)
        .List(.ListCount - 1, 1) = Year(Now)
        .List(.ListCount - 1, .ColumnCount - 1) = Cells(lig, X).Offset(0, 1)
    End With

JP

br44 · 26 Novembre 2009

Re : Créer un plage pour alimenter un Combobox

Bonsoir JP14,le forum

Je vient de tester ta proposition et effectivement j'affiche deux colonnes dans ma combobox mais pour l'instant elle proviennes de la même feuille .

Faut_il créer une variable Year(now) pour la deuxième feuille ?

J'ai essayer ceci pour afficher les infos de la seconde feuille:

.List(.ListCount - 1, 1) = Sheets("RECAP IMPAYER").Range("B12:B" &Range("B65536").end(XlUp).row) mais ça beug .

Et pour les boutons à bascule Y-a -t-il des modifications ?

Te remerciant pour ta patience et pour ta rapidité je te dis à plus sur se fil .Amicalement BR44

jp14 · 26 Novembre 2009

Re : Créer un plage pour alimenter un Combobox

Bonsoir

Pour la première feuille

For X = coldep To colder Step pas
With NFacture
.AddItem Cells(lig, X)
.List(.ListCount - 1, 1) = Year(Now)
.List(.ListCount - 1, .ColumnCount - 1) =sheets("saisie"). Cells(lig, X).Offset(0, 1)
End With
Pour la deuxième feuille il faudrait écrire
For X = coldep To colder Step pas
With NFacture
.AddItem Cells(lig, X)
.List(.ListCount - 1, 1) = Year(Now)-1
.List(.ListCount - 1, .ColumnCount - 1) = sheets("feuille").Cells(lig, X).Offset(0, 1)
End With

JP

br44 · 27 Novembre 2009

Re : Créer un plage pour alimenter un Combobox

Bonjour Jp14,le forum

Je viens de lire ton dernier message pour lequel je te remercie . je testez et te tien au courant . A plus Br44

br44 · 27 Novembre 2009

Re : Créer un plage pour alimenter un Combobox

Bonsoir JP14,le forum

Je reviens vers toi comme prévu .J'ai tester et modifier ta macro pour obtenir la résultat suivant :

J'affiche les montant des deux feuilles mais je n'est plus que le N° facture de la deuxième feuille ? j'ai essayer adapter mais rien .

Voici ci dessous la macro modifiée:

Code:

With NFacture
 .Clear
 .ColumnCount = 3
 .ColumnWidths = "40;30;0"
 .Style = fmStyleDropDownList
End With
For X = coldep To colder Step pas
        With NFacture
            .AddItem Cells(Lig, X)
            .List(.ListCount - 1, 1) = Year(Now)
            .List(.ListCount - 1, 1) = Sheets("SAISIE1").Cells(Lig, X).Offset(0, 1)
            If Cells(Lig, X).Offset(0, 1).Font.ColorIndex = 5 Then 'Affect une couleur au départ
                'La facture à déjà étée payée
                .List(.ListCount - 1, 2) = "Payer"
            Else
                'la facture est dûe
                .List(.ListCount - 1, 2) = ""
            End If
       End With
'Pour la feuille"RECAP IMPAYER"
Lig1 = CLng(NomClient.List(NomClient.ListIndex, (NomClient.ColumnCount - 1)))
For Y = coldep1 To colder1 Step pas1
        With NFacture
            .AddItem Cells(Lig1, Y)
            .List(.ListCount - 1, 1) = Year(Now) - 1
            .List(.ListCount - 1, 1) = Sheets("RECAP IMPAYER").Cells(Lig1, Y).Offset(0, 1)
            If Cells(Lig1, Y).Offset(0, 1).Font.ColorIndex = 5 Then 'Affect une couleur au départ
                'La facture à déjà étée payée
                .List(.ListCount - 1, 2) = "Payer"
            Else
                'la facture est dûe
                .List(.ListCount - 1, 2) = ""
            End If
       End With
Next Y

Si tu voir se qui bloc se serais génial si non je modifierai mon Usf .

Te remerciant par avance pour tout je te dis à bientôt sur se fil . Amicalement BR44

Effectuez une recherche sur Excel Downloads...

Créer un plage pour alimenter un Combobox

br44

XLDnaute Impliqué

Pièces jointes

br44

XLDnaute Impliqué

jp14

XLDnaute Barbatruc

br44

XLDnaute Impliqué

Pièces jointes

jp14

XLDnaute Barbatruc

br44

XLDnaute Impliqué

br44

XLDnaute Impliqué

Pièces jointes

jp14

XLDnaute Barbatruc

Pièces jointes

br44

XLDnaute Impliqué

jp14

XLDnaute Barbatruc

br44

XLDnaute Impliqué

jp14

XLDnaute Barbatruc

br44

XLDnaute Impliqué

jp14

XLDnaute Barbatruc

br44

XLDnaute Impliqué

br44

XLDnaute Impliqué

Discussions similaires

Nous accordons de l'importance à votre vie privée