Discussion :

[Laïnea]

Bonjour,

Je cherche à affecter à la variable "debut" (que je définis comme étant "Range"), l'"Address" obtenu suite à un Find.

C'est à dire :
Je cherche, dans ma feuille, une cellule contenant le mot clé "OBLIGATOIRE".
Une fois que j'ai atterri sur la cellule contenant ce mot, j'obtiens l'adresse de la cellule.
Je souhaite affecter à "debut" l'adresse obtenue, mais peu importe comment je manipule le code, j'obtiens des échecs en tout genre... "Incompatibilité de type".

Auriez-vous une idée ? Merci d'avance !!

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Dim Debut As Range
Columns(1).Find(What:="OBLIGATOIRE").Select
Set Debut = Selection.Address

Ou alors :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Dim Debut As Range
Columns(1).Find(What:="OBLIGATOIRE").Select
Set Debut = ActiveCell.Address

Ou encore :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Dim Debut As Range
Set Debut = Columns(1).Find(What:="OBLIGATOIRE").Address

[Laïnea]

Pour ceux qui comme moi se posaient la question, il s'agissait de :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Dim Debut As Range
Set Debut = Columns(1).Find(What:="OBLIGATOIRE")
Debug.Print Debut.Address