débutant VBA selection

bonjour Michael,

voici des exemples pour un classeur contenant les feuilles "Feuil1" à "Feuil6"

'sélectionner toutes les feuilles,
Sheets(Array("Feuil1", "Feuil2", "Feuil3", "Feuil4", "Feuil5", "Feuil6")).Select

'sélectionner toutes les feuilles, sauf la Feuil4.
For Each f In Worksheets
If f.Name <> "Feuil4" Then
Sheets(f.Name).Select Replace:úlse
End If
Next

'créer un objet Sheets
Dim wkh As Sheets
Set wkh = Sheets(Array("Feuil1", "Feuil3", "Feuil4"))
wkh.Select

isabelle

Bonjour,

J'aimerai savoir comment conserver une selection de plusieurs feuilles
manipuler des feuilles une a une
Retrouver cette sélection

Merci beaucoup
Michael

Merci cela m'aide déjà bien à integrer des notions de base mais ce que je
souhaite c'est retrouver une selection de feuilles précedente

Je m'explique

les feuilles 1, 2, 3, 5 sont sélectionnées (par exemple)

Puis par macro :
selection de la feuille 1 - Modifications
selection de la feuille 2 - Modifications
selection de la feuille 3 - Modifications
selection de la feuille 4 - Modifications
selection de la feuille 5 - Modifications
selection de la feuille 6 - Modifications

Comment puis-je retrouver ma selection (1 2 3 5) sachant que j'ai un grand
nombre de feuilles à modifier dans ma macro et que cette sélection n'est pas
toujours la même...

je me réexplique :

sub memo
enregistre.moi.maselection.defeuilles
j'en selectionne une, une autre etc...
redonne.moi.maselection.detoutaleur

Merci de votre aide malgré le mal que j'ai à exprimer le but de la manoeuvre
!

bonjour Michael,

y a surement plusieurs méthode pour y parvenir, voici un exemple.

'à copier sur un module standard

Public x As Integer
Public MaselectionDeFeuille()

Sub test()
For i = 1 To x
MsgBox MaselectionDeFeuille(i)
Next
End Sub

Sub VideTableauMaselectionDeFeuille()
x = 0
ReDim MaselectionDeFeuille(x)
End Sub

'à copier sur la page code de thisworkbook

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
x = x + 1
ReDim Preserve MaselectionDeFeuille(x)
MaselectionDeFeuille(x) = ActiveSheet.Name
End Sub

isabelle

Merci cela m'aide déjà bien à integrer des notions de base mais ce que je
souhaite c'est retrouver une selection de feuilles précedente

Je m'explique

les feuilles 1, 2, 3, 5 sont sélectionnées (par exemple)

Puis par macro :
selection de la feuille 1 - Modifications
selection de la feuille 2 - Modifications
selection de la feuille 3 - Modifications
selection de la feuille 4 - Modifications
selection de la feuille 5 - Modifications
selection de la feuille 6 - Modifications

Comment puis-je retrouver ma selection (1 2 3 5) sachant que j'ai un grand
nombre de feuilles à modifier dans ma macro et que cette sélection n'est pas
toujours la même...

je me réexplique :

sub memo
enregistre.moi.maselection.defeuilles
j'en selectionne une, une autre etc...
redonne.moi.maselection.detoutaleur

Merci de votre aide malgré le mal que j'ai à exprimer le but de la manoeuvre
!

Merci de toutes ces précisions maintenant je maitrise a peu près la chose.

Encore merci.

Amicalement
Michael