Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

MAJ un tableau en fonction d'une valeur Combobox

  • Initiateur de la discussion Initiateur de la discussion Mulder
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Mulder

XLDnaute Junior
Bien le bonjour à tous,

Je cale sur un truc pourtant simple, et je ne trouve pas sur le forum. Je pense que j'oriente mal ma recherche.
L'idée est simple : il s'agit de mettre à jour un tableau.

Un combobox me liste les entrées existantes en A, je renseigne une modif dans un textbox1, un commentaire dans un textbox2, je valide et ça me modifie la valeur en colonne B et le commentaire en C, relatifs à la référence en A.

Ci-joint le fichier apuré.
Je précise que je ne cherche qu'à copier les données (je cherche surtout à comprendre comment coder cette partie).
Je me moque dans un premier d'afficher les données déjà existantes dans l'USF, quand on sélection une référence dans le combobox.

D'avance merci !!!!
 

Pièces jointes

Re : MAJ un tableau en fonction d'une valeur Combobox

Coucou

Voici une version
VB:
Private Sub CommandButton1_Click()
  Index = ComboBox1.Value
  'recherche de la ligne
  Table = Sheets("Feuil1").UsedRange.Value
  nb = UBound(Table, 1)
  For i = 1 To nb
    If Table(i, 1) = Index Then Exit For
  Next i
  Sheets("Feuil1").Cells(i, 2) = TextBox1.Value
  Sheets("Feuil1").Cells(i, 3) = TextBox2.Value
End Sub

Private Sub UserForm_Initialize()
    With Sheets("Feuil1")
        ComboBox1.List = .Range("A1:A" & Range("A65536").End(xlUp).Row).Value
    End With
End Sub
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…