Mise à jour BDD
O
Bonsoir à tous,
Je rame sur un problème qui me paraissait assez simple au début et qui pourtant est très basique...
J'ai une Feuil1 que je veux mettre à jour en fonction des données saisies dans la Feuil2, en l'occurrence le N° du poste.
Je n'ai aucune difficulté à faire ça avec des formulaires/listboxs & Cie, mais sur une bête feuille Excel je suis pas foutu de trouver le moyen simple pour faire ça...
Merci d'avance pour vos lumières zéclairées
Bonjour,
à tester,
copier le code sur la page Feuil2
Private Sub Worksheet_Change(ByVal Target As Range)
rw = Cells(Rows.Count, "B").End(xlUp).Row
Set isect = Application.Intersect(Target, Range("D5:D" & rw))
If Not isect Is Nothing And Target.Count = 1 Then
nom = Range("B" & Target.Row)
ligne = Application.Match(nom, Sheets("Feuil1").Range("B:B"), 0)
Sheets("Feuil1").Range("C" & ligne) = Target.Value
End If
End SubO
Bonsoir et merci pour cette proposition !
Elle fonctionne impeccablement, j'imaginais valider la saisie de la feuille complète avec un bouton, mais cette solution est finalement efficace !
Merci infiniment
Super, Merci Oliv pour ce retour, au plaisir!