macro bug quand associée à 1 bouton

Silver Groover · 6 Août 2004

Bonjour vous tous ;o)

cette ligne de commande (et toute la macro) fonctionne quand je l'execute par outils/macro/etc...

lign = Columns(1).Find("", [A1], , , xlByRows).Row

Mais quand j'associe cette macro à un bouton, j'ai l'erreur suivante :
Erreur d'execution 404
impossible de lire la propriété Find de la classe Range

(lign est déclaré comme Long)

Quelqu'un comprend pourquoi cela ne marche plus quand c'est par l'intermédiaire du bouton que je passe ?

Merci à tous

myDearFriend · 6 Août 2004

Bonjour Silver Groover.

Aurais-tu Excel 97 par hasard ?

Si c'est le cas, essaie de modifer les propriétés de ton bouton :

CommandButton1.TakeFocusOnClick = False

et si ça ne suffit pas :

ActiveSheet.Range("A1").select
lign = Columns(1).Find("", [A1], , , xlByRows).Row

Cela dit, je ne suis pas sûr que cela soit le fond de ton problème... sinon, essaie de joindre ton fichier en pièce jointe afin que l'on puisse voir.

Cordialement,
Didier_mDF

Silver Groover · 6 Août 2004

Re: résolu

Salut Didier,

Effectivement , j'ai Exel 97, et en mettant l'option False ca résoud tout !

Merci bcp.

Pour info, quelle est l'action de cette option : TakeFocusOnClick ?

Bon WE

Pascal76 · 6 Août 2004

Bonjour,

L'aide excel vba dis ceci :

Spécifie si un contrôle prend le focus lorsqu'il fait l'objet d'un clic.

Donc, si je dis pas trop de bétises, en gros lorsque tu cliquais sur ton bouton il prenait le focus et donc ta macro cherchait à effectuer un "find" sur ton bouton et pas sur ta feuille.

Bonne journée

Pascal

macro bug quand associée à 1 bouton

Silver Groover

Guest

myDearFriend

Guest

Silver Groover

Guest

Pascal76

Guest

Discussions similaires