Discussion :

[Sora69]

Bonjour,

Je suis en train de créer un petit fichier de gestion de stock pour un petit entrepôt.
Dans mon fichier il y a 4 feuilles (Test qui correspondra à ma feuille Entrée/Sortie, Recherche pour rechercher les emplacements du matériel désiré, Stock pour avoir une vision global mais c'est une feuille que j'aimerais cacher à terme, et Matériel pour faire une liste uniforme du matériel).

Tout est ok à part une dernière chose.
Sur la feuille Entrée/Sortie, je peux sélectionner mon emplacement et ma désignation. J'aimerais qu'en appuyant sur le bouton Valider, j'aille modifier la désignation de l'emplacement correspondant dans la feuille Stock.

Exemple:
Emplacement "A1E01", Désignation d'origine "Vide", je sélectionne par exemple "Equerre50", j'appuie sur "Valider".
Dans la feuille Stock, dans l'emplacement A1E01, la désignation ne doit plus être "Vide" mais "Equerre50".

Je vous remercie d'avance pour les propositions que vous pourrez me donner.

[Marc-L]

Bonjour, bonjour,

pour du code, merci de poster dans le forum dédié Macros et VBA Excel !

Même si du code est nécessaire, penser en premier aux fonctions dont dispose une feuille de calculs Excel car,
une fois une formule au point, elle est facilement utilisable en ligne de code
soit par la puissante méthode Evaluate soit par un appel direct à la fonction utilisée …

Dans ce cas, la fonction de feuille de calculs EQUIV (Match en VBA) permet de trouver le n° de la ligne :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Private Sub CommandButton1_Click()
    With Feuil2.[B4].CurrentRegion
        V = Application.Match([C4].Value, .Columns(2), 0)
        If IsError(V) Then Beep Else .Cells(V, 1).Value = [C6].Value
    End With
End Sub

_______________ _____________________________________ _____________________________

Merci de cliquer sur pour chaque message ayant aidé puis sur pour clore cette discussion …

[Sora69]

Super merci beaucoup.