XL 2016 formulaire de saisie - RESOLU -

bibbip35

XLDnaute Occasionnel
Bonjour à tous

Je souhaiterais créer un formulaire de modification pour la colonne F
dans le fichier exemple ci joint

Mon objectif est de faire afficher un userform de modification pour chaque ligne pou que l'opérateur modifie la valeur de la colonne F

userform1
upload_2017-1-7_14-39-9.png

On modifie la valeur du Package correspondant à F2
userform2
upload_2017-1-7_14-40-11.png

On modifie la valeur du Package correspondant à F3

etc.... Dans mon fichier exemple jusqu'à F5

Et cela jusqu'à temps qu'il n'y pas de ligne dans la feuille

En espérant avoir été clair

Merci à tous par avance

Bibbip
 

Pièces jointes

  • test bibbip35.xlsx
    10.3 KB · Affichages: 30

Calvus

XLDnaute Barbatruc
Bonjour,

Regarde si cela te convient.
VB:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim valeur As String
If Intersect(Range("F2:F" & Range("F" & Rows.Count).End(3).Row), Target) Is Nothing Then Exit Sub
If Not Intersect(Range("F2:F" & Range("F" & Rows.Count).End(3).Row), Target) Is Nothing And Target.Count = 1 Then 'Exit Sub
valeur = InputBox("Veuillez entrer unz valeur")
If valeur <> "" Then Target = valeur
End If
End Sub
Bonne journée.

EDIT : Bonjour Lonewolf :)
 

Pièces jointes

  • test bibbip35.xlsm
    16.1 KB · Affichages: 30

bibbip35

XLDnaute Occasionnel
Lone-wolf les cellules ne contienne pas de formules ( Mais en effet C'est une Copy d'une autre feuille ou des valeurs n'ont pas été trouvé = donc des erreurs de RECHERCHEV)

Calvus merci pour ton aide , mais ce que je souhaiterais c'est faire apparaître un userform
avec ITEM- SUITE DESCRIPTION - PACKAGE
Et que la macro génère un USERFORM pour la ligne 1
Puis l'opérateur corrige le package par une nouvelle valeur
Puis que la macro génère un USERFORM pour la ligne 2
Puis l'opérateur corrige le package par une nouvelle valeur
Puis que la macro génère un USERFORM pour la ligne 3
Puis l'opérateur corrige le package par une nouvelle valeur

Et cela jusqu'à temps qu'il n'y est plus de ligne à corriger

En espérant avoir été un peu plus clair

MERCI ENCORE

BibBip35
 

Lone-wolf

XLDnaute Barbatruc
Bonjour Calvus

Mince! Tu as été plus rapide. :eek::oops:

EDIT: @ bibbip > Bon amusement si tu souhaite modifier la 100ème ligne par exemple.

En PJ, au cas où.
 

Pièces jointes

  • test bibbip35.xlsm
    25.3 KB · Affichages: 28
Dernière édition:

bibbip35

XLDnaute Occasionnel
Merci Calvus

J'aime beaucoup votre proposition même si celle de Calvus repond très bien a mes attentes

Calvus , Par contre la TextBox 6 ( Package ) ne se rafraichit pas quand on change de ligne

Et Sinon est-il possible de réactualiser la liste a partir de ceux qui n ont pas été modifier
C'est à dire que la listBox ne contient que les lignes dont le package = #N/A

J'en demande beaucoup ...

En tous cas Chapeau à vous 2 !!!
 

Calvus

XLDnaute Barbatruc

Pièces jointes

  • test bibbip35.xlsm
    20.3 KB · Affichages: 47

Discussions similaires

Réponses
3
Affichages
215

Statistiques des forums

Discussions
314 450
Messages
2 109 727
Membres
110 552
dernier inscrit
jasson