bonjour,

tout d'abord merci à ceux qui répondront.

voici mon début de code :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
Dim sh1 As Worksheet, sh5 As Worksheet

Set sh1 = Sheets("Arc Movement LH")
Set sh5 = Sheets("Levelling Phase LH")

    'Location 1
    If Sheets("Levelling Phase LH").OpB_jack.Value = True Then        
        sh1.Range("I20").Value = sh5.Range("I34").Value
        sh1.Range("K20").Value = sh5.Range("K34").Value
        sh1.Range("L20").Value = sh5.Range("L34").Value
    ElseIf sh5.OpB_airbag.Value = True Then                 
        sh1.Range("I20").Value = sh5.Range("I36").Value
        sh1.Range("K
mon problème se situe sur la ligne rouge
l'utilisation de sh5 me donne une erreur alors que dans la ligne bleue j'ai remplacé le sh5 par sa valeur et là ca marche

quelqu'un pourrait il me sdire pourquoi ? merci