Microsoft 365 ListView dans Userform

[TAL]

Bonsoir,

J'aurais besoin de votre aide, SVP

Je tourne en rond pour la création et l'utilisation d'une ListView dans un USF. J'avoue, je n'y connais vraiment pas grand chose en VBA
Dans l'USF, j'ai des TextBox et des ComboBox mais également dans des Trames, que j'ai nommé par Gr, des CheckBox et des OptionButton.

Il y a pas mal de vidéos sur la création d'une ListView, mais qu'avec des TextBox & des ComboBox et ça fait des jours que je suis dessus.

Pouvez-vous, si cela vous est possible, de m'aider sur la création et l'enregistrement d'une ListView (ajouter, modifier, supprimer, recherche par Items)

Je vous joins le fichier
Par avance, Merci pour votre aide

 

[ChTi160]

Bonjour le Fil
je me suis permis de modifier quelques lignes de la procédure du Bouton "Modifier" à voir

If Me.ChBAdmin_Recept_Auto_Cumul.Value= True Then
    [T_Administratif].Item(n, 13) = "X"
  End If
  '*****************************************************
  'Ci-dessous
   [T_Administratif].Item(n, 14) = Me.TBHeuresAC.Value
   [T_Administratif].Item(n, 15) = IIf(Me.ChBAdmin_RIB.Value = True, "X", "")
   [T_Administratif].Item(n, 16) = IIf(Me.ChBAdmin_Attest_SS.Value = True, "X", "")
   [T_Administratif].Item(n, 17) = IIf(Me.ChBAdmin_Fiche_Paie.Value = True, "X", "")
   [T_Administratif].Item(n, 18) = IIf(Me.ChBAdmin_CV.Value = True, "X", "")
   [T_Administratif].Item(n, 19) = IIf(Me.ChBAdmin_KBIS.Value = True, "X", "")
   [T_Administratif].Item(n, 20) = IIf(Me.ChBAdmin_Urssaf = True, "X", "")
   [T_Administratif].Item(n, 21) = IIf(Me.ChBAdmin_DNA.Value = True, "X", "")
    [T_Administratif].Item(n, 22) = IIf(Me.OpB9.Value = True, "Complet", "En attente")
 '*********************************************************
   Unload Me
   USFAdm.Show
   Exit Sub

Bonne Journée
Jean marie

 

[fanfan38]

Ayant vu une autre erreur dans le message de CHTI160 (Salut)

If Me.ChBAdmin_Recept_Auto_Cumul.Value.Value = True Then

Le fichier corrigé avec la modif de CHTI160....

A+ François

 

[ChTi160]

Re
Effectivement j'ai oublié cette ligne ,il y'en a d'autres peut être !
Bonne journée
Jean marie

 

[TAL]

Bonjour à tous,

J'étais justement entrain de tester, et en effet, le bouton modifier avait un soucis.
Je continue les tests, en tout cas MERCI
Je vous tiens au courant

 

[TAL]

C'est génial, Merci merci
Il ne me reste plus qu'à trouver pour le bouton "Vider" et la "Recherche".
Je vais essayer de trouver de mon côté.

Encore un grand grand grand Merci pour votre aide
Merci beaucoup