Bonjour,
 
Dans une feuille excel, j'ai diverses macro associées à diverses cellules pour effectuer des calculs mais lorsque je rajoute une ligne ou une colonne la macro ne se decalle pas avec la ligne. Voici mon code :  
 
Sub Entree01_application_inputbox()
Dim donnée As Integer
donnée = Application.InputBox("De combien souhaitez-vous AUGMENTER le stock FIBRE DE VERRE ?", Type:=1)
Range("c4" ).Value = Range("C4" ).Value + donnée
If donnée > 100 Then
traiteerreur:
Dim reponse As Integer
reponse = MsgBox("Confirmez-vous la donnée superieure à 100 unitées ?", 35, "Attention !" )
Select Case reponse
Case 6
Case 7
Range("c4" ).Value = Range("C4" ).Value - donnée
Case 2
Range("c4" ).Value = Range("C4" ).Value - donnée
donnée = Application.InputBox("De combien souhaitez-vous AUGMENTER le stock ! FIBRE DE VERRE ! ?", Type:=1)
Range("c4" ).Value = Range("C4" ).Value + donnée
End Select
End If
End Sub
 
 
Le problème est sur mon "range C4" quand je rajoute une ligne il reste C4 et je veut qu'il devienne c5?
 
merci de votre aide.  

Hello,
 
une solution serait de nommer ta cellule par exemple "Stock" et ensuite dans la fonction d'utiliser Range("Stock" ). Si tu ajoute des lignes ou colonne, la cellule nommée sera automatiquement décallée

ok merci je vais essayer cela de suite

cela fonctionne à merveille merci beaucoup