Bonjour à toutes et à tous,

je rencontre un petit pb d'exécution de vba. Je dois faire une erreur de débutant dans mes déclarations ou mes affectations de variables ...

morceau de code ci-dessous qui pose pb

"
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
16
17
18
19
20
21
Sub Macro1()
'
' Macro1 Macro
' Macro enregistrée le 26/02/2009 par Nico
'

Dim ra_pla As Range, ra_tcd As Range, cel_tcd As Range, cel_pla As Range
Dim derlg_tcd As Integer, derlig_pla As Integer

Application.EnableEvents = False
   
    
   
    derlig_tcd = Worksheets("Of ouverts").Range("a65536").End(xlUp).Row
    If derlig_tcd < 13 Then derlig_tcd = 13
    ra_tcd = Sheets("Of ouverts").Range("A13:A" & derlig_tcd)
    
    derlig_pla = Sheets("Planning").Range("b65536").End(xlUp).Row
    If derlig_pla < 13 Then derlig_pla = 13
    range_pla = Sheets("Planning").Range("A13:A" & derlig_pla)
"
Pas de pb en compilation, mais en éxecution la ligne rouge bloque (erreur 91)
Mon objectif est de définir une plage de cellules de deux feuilles différentes sur lesquelles je dois ensuite faire des manips.

Si vous avez une petite seconde pour identifier mon erreur, ce serait très sympa.

Merci d'avance