Sélection de feuilles

Bonjour,

Je travaille sur un classeur comportant 6 feuilles. Afin de les sélectionner, j'ai procédé de la manière suivante dans mon code :

Global Const wsDensityName As String = "PTF_Density"

Global Const wsRefName As String = "Référentiel"

Global Const wsTRName As String = "TR"

Global Const wsTabName As String = "Tableaux"

Global Const wsGraphName As String = "Graphiques"

Global Const wsRepName As String = "Répartition"

Puis, dans chaque procédure je commence par déclarer les feuilles que je vais utiliser. Ensuite, lorsque je tente de sélectionner une plage de cellules, le message "La méthode select de la classe range a échoué" s'affiche.

Ex :

Dim wsTab As Worksheet

Set wsTab = ThisWorkbook.Worksheets(wsTabName)

wsTab.Range(wsTab.Cells(l, 1), wsTab.Cells(l + 1, 1)).Select

Je n'arrive pas à savoir d'où vient le problème.

Merci d'avance pour vos réponses

Bonsoir,

Drôle de méthode !...

Commence par ne pas sélectionner ! On le dit sans cesse, ça ne sert à rien sauf à perdre du temps ! Et à l'occasion à te provoquer des erreurs si en plus tu ne respectes pas la syntaxe...

Fais simplement ce qui est à faire, sans aucune sélection ! VBA s'y retrouve fort bien.

Il arrive que Global fonctionne ! Mais tu n'en trouveras pas trace dans l'aide VBA, car le mot-clé à utiliser est Public.

Si tu donnes plus d'informations, on pourra en dire plus...

Merci beaucoup, effectivement en supprimant les sélections, mon programme tourne sans problème , je ne sais pas vraiment pourquoi mais bon... Oui je sais, c'est pas très propre comme code, pour ma défense je n'utilise pas souvent VBA

Bonne fin de journée.