Référence feuille avec indiceRésolu

Question

Bonjour. 

Je cherche à pouvoir sélectionner une feuille (sheet) en fonction d'un indice i. Le code que j'ai écris est le suivant:

Sheets("Résultats").Activate
Columns("A:A").Select
Selection.Copy
i = 1
Do
i = i + 1
Sheets(Feuil & "i").Select 'CE CODE NE MARCHE PAS
Columns("A:A").Select
Selection.copie
Loop Until i <> Counter + 7

Est-il possible de faire ce que je demande? Si oui, est-ce qu'il y a une solution? 

Merci d'avance pour vos réponse

Renfield · Accepted Answer

tu as inversé la partie fixe et le nom de ta variable :

Sheets("Feuil" & i)

ucfoutu · Answer

Bonjour,
Cela implique une parfaite discipline en matière d'attribution de noms de baptême pour tes feuiiles.
Je te rappelle à tout hasard que l'on peut également se référer à une feuille de la collection Sheets en utilisant son Index ..
Exemple :

Application.Sheets(2).Activate
MsgBox ActiveSheet.Index

____________________
Très intéressante fable, L'OISELEUR, L'AUTOUR ET L'ALOUETTE !
Cliquer sur "Réponse acceptée" (en bas d'une solution avérée adéquate) rendra service à d'autres. PENSEZ-Y.

demoiselle1263 · Answer

C'est ok Renfield. Je te remercie

Renfield · Answer

oui, le code fonctionne maintenant, j'imagine, mais tiens compte de la pertinence de la remarque de ucfoutu...

utilises des noms plus parlant pour tes feuilles, et accèdes y par leur indice directement :

Sheets(i)


Renfield - Admin CodeS-SourceS - MVP Visual Basic

Référence feuille avec indice

4 réponses

Votre réponse

Discussions similaires