Reference a une cellule variable

[astro89]

Bonjour,

Premierement je tient a vous remercier d'avance pour le temps que vous prenez a me repondre.

J'ai un probleme que je n'arrive pas a regler:

Dans le fichier que j'ai joint a mon message j'aimerais qu'a la case B82,C82,D82 ainsi que H82 je puisse inscrire les montants, et que ceux-ci s'inscrivent dans la case correspondante à la date. Par exemple: j'entre le nombre d'heure dans la case B82 pour le 8 fevrier et cela se transpose dans la case B11

j'ai reussis a retourner le numero de la ligne en A83 mais je n'ai pas reussis a formuler la syntaxe pour determiner la cellule

Merci encore.

Astro

 

[James007]

Re : Reference a une cellule variable

Bonjour Serge,

Parmi toutes les possibilités ...une macro évènementielle ...

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim r As Integer
    If Target.Count > 1 Then Exit Sub
    If Intersect(Target, Range("B82,C82,D82,H82")) Is Nothing Then Exit Sub
    r = Application.WorksheetFunction.Match(Cells(Target.Row, 1), Range("A1:A58"), 0)
    Cells(r, Target.Column) = Target.Value
End Sub

A +

 

[astro89]

Re : Reference a une cellule variable

Merci pour ta réponse rapide. j'essaie ta solution et je te revient avec le resultat .

Merci encore,

Serge

 

[sioum]

Re : Reference a une cellule variable

bonsoir

plus simplement un =SI(A6=$A$82;$B$82;0) en B6 que tu fais glissé sur la colonne
puis idem pour les colonnes suivantes non?