Vba erreur out of range
samsamsam
-
Polux31 Messages postés 7219 Statut Membre -
Polux31 Messages postés 7219 Statut Membre -
Bonjour,
j'ai un problème d'out of range sur ce bout de programme, quelqu'un peut -il m'aider je suis plus que débutante
merci!!
Columns("R:R").Select
Selection.Insert Shift:=xlToRight
Range("R1").Select
ActiveCell.FormulaR1C1 = "eq mean price"
Range("R2").Select
ActiveCell.FormulaR1C1 = "=RC[7]/RC[-1]"
Range("R2").Select
Selection.AutoFill Destination:=Range("R2:R35"), Type:=xlFillDefault
Range("R2:R35").Select
Range("R1").Select
Windows("ItemCheck model Samira_modif.xls").Activate
j'ai un problème d'out of range sur ce bout de programme, quelqu'un peut -il m'aider je suis plus que débutante
merci!!
Columns("R:R").Select
Selection.Insert Shift:=xlToRight
Range("R1").Select
ActiveCell.FormulaR1C1 = "eq mean price"
Range("R2").Select
ActiveCell.FormulaR1C1 = "=RC[7]/RC[-1]"
Range("R2").Select
Selection.AutoFill Destination:=Range("R2:R35"), Type:=xlFillDefault
Range("R2:R35").Select
Range("R1").Select
Windows("ItemCheck model Samira_modif.xls").Activate
A voir également:
- Vba erreur out of range
- Input signal out of range - Forum Windows
- Av out - Forum Audio
- AV-out quel cable ? - Forum Cinéma / Télé
- Vba range avec variable ✓ - Forum VB / VBA
- Erreur 3005 france tv - Forum TV & Vidéo
2 réponses
ton "out of range" doit se produire sur une ligne précise (celle qui est en jaune quand tu fais du débogage).
je paris que c'est celle la
Windows("ItemCheck model Samira_modif.xls").Activate
cette ligne assume que tu as une fenetre ouverte qui a pour titre "ItemCheck model Samira_modif.xls", si cette fenetre n'existe pas, tu auras cette erreur out of range...
est-ce cette ligne est nécessaire?
je paris que c'est celle la
Windows("ItemCheck model Samira_modif.xls").Activate
cette ligne assume que tu as une fenetre ouverte qui a pour titre "ItemCheck model Samira_modif.xls", si cette fenetre n'existe pas, tu auras cette erreur out of range...
est-ce cette ligne est nécessaire?
merci!