Macro: Blocage, la classe select range a échoué

Bonjour,

J'ai enregistrer une macro en réalisant les différentes étapes à prendre en compte dans cette macro. La macro consiste à enregistrer des données dans un tableau. A chaque enregistrement, une ligne se créée.

Voici le code:

image

Quand je l'essaye, la macro fonctionne. Une fois les tests terminés, je supprime les données test qui ont été enregistrées et j'essaye de lancer ma macro avec un bouton, mais ca ne fonctionne plus.

Le message suivant apparaît:

image

Qu'est ce qui ne va pas?

Merci d'avance.

Salut,

Peut être que le "Tableau33" n'existe pas, ou alors tu n'es pas placé sur la bonne feuille :/

Bonjour,

Le tableau 33 existe bien. Que voulez-vous dire par le fait que je ne sois pas sur la bonne feuille?

Le code

Range("Tableau33").Select

Va s'appliquer sur la feuille active, c'est à dire la feuille sur laquelle on se trouve.

Il faut faire attention quand on lance la macro de se trouver sur la feuille où le tableau est présent.

Par exemple, si la feuille où se trouve le tableau se nomme "Feuille 1", alors :

Dim Ws_feuil As Worksheet
Set Ws_feuil = ThisWorkbook.Worksheets("Feuille 1")

Ws_feuil.Activate

Ws_feuil.Range("Tableau33").Select

Bibu

Merci beaucoup Bibu!

Pense à placer le topic en "Résolu" si ma solution te convient et fonctionne :)

Au plaisir,

Bibu

Rechercher des sujets similaires à "macro blocage classe select range echoue"