Discussion :

[twims]

Bonjour,
je suis débutant en vba et j'aimerais faire en sorte qu'une cellule se remplissent automatiquement lorsque j'ai rempli une autre cellule.
En clair, je veux, par exemple, rentrer "chef d'equipe" dans la 1ere cellule et j'aimerais qu'automatiquement "95" apparaisse dans une autre cellule.
D'avance merci

[Invité]

Bonjour,

Difficile de vous répondre avec aussi peu d'informations !

Ce n'est pas VBA qui va vous apporter la solution.

On peu supposer qu'il faut d'abord une liste de mots clés :

-chef d'équipe
-xxxxx
-yyyyy

et une liste de codes associés.

Où, comment ?

[twims]

En fait, j'ai un tableau avec 3 colonnes.
Dans la 1ere colonne, j'entre les fonctions des employés (chef d'equipe, chef de site, cariste, etc...), dans la 2e colonne se trouvent les heures travaillées et dans la 3e, il y a la productivité.
si dans la 1ere ligne de la 1ere colonne j'entre "chef d'equipe", je veux qu'automatiquement "7,80" apparaisse dans la 1ere ligne de la 2e colonne et que "50" apparaisse dans la 1ere ligne de la 3e colonne.

En espérant avoir ete plus clair....

[fring]

Bonjour twims, jacques-jean

En supposant les colonnes A, B et C, ci-dessous un bout de code à insérer dans la feuille concernée (pas dans un module) qui va agir sur l'évènement "Change" de la colonne A.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 Then
    Select Case Target.Value
        Case "chef d'équipe"
            Target.Offset(0, 1) = 7.8
            Target.Offset(0, 2) = 50
        Case "chef de site"
            Target.Offset(0, 1) = 8
            Target.Offset(0, 2) = 60
        Case "cariste"
            Target.Offset(0, 1) = 7.35
            Target.Offset(0, 2) = 70
    End Select
End If
End Sub

[AlainTech]

Si je peux me permettre, fring...

Il est fortement déconseillé de "hardcoder" des valeurs risquant de changer.

Je conseillerais l'usage d'une feuille "Paramètres" contenant ces différentes valeurs.

[fring]

Salut Alain,

Si ces valeurs risquent de changer, oui entièrement d'accord avec toi.
De là à dire "fortement déconseillé...disons qu'il sera plus aisé de modifier une liste de données dans une feuille que de la modifier dans le code.

Bonne journée