Selection Sheets
Résolu
nostra78
Messages postés
137
Date d'inscription
jeudi 10 mars 2005
Statut
Membre
Dernière intervention
6 décembre 2005
-
1 avril 2005 à 12:28
nostra78 Messages postés 137 Date d'inscription jeudi 10 mars 2005 Statut Membre Dernière intervention 6 décembre 2005 - 1 avril 2005 à 14:59
nostra78 Messages postés 137 Date d'inscription jeudi 10 mars 2005 Statut Membre Dernière intervention 6 décembre 2005 - 1 avril 2005 à 14:59
A voir également:
- Selection Sheets
- Selection multiple indesign - Forum Graphisme/design
- Une seule expression peut être spécifiée dans la liste de sélection quand la sous-requête n'est pas introduite par exists. ✓ - Forum SQL
- Jquery selection ✓ - Forum Javascript / DHTML
- Tri par selection en c ✓ - Forum C++ & C++ .NET
- Vba word selection ✓ - Forum VB.NET
6 réponses
nostra78
Messages postés
137
Date d'inscription
jeudi 10 mars 2005
Statut
Membre
Dernière intervention
6 décembre 2005
1 avril 2005 à 14:59
1 avril 2005 à 14:59
J'ai trouvé la solution, matte
Dim ListeImpression1()
ReDim ListeImpression1(MonImpression1.ListCount - 1)
Dim i As Byte
For i = 0 To MonImpression1.ListCount - 1
ListeImpression1(i) = "" & MonImpression1.List(i)
Next
Sheets(ListeImpression1).Select
Sheets(ListeImpression1(0)).Activate
ActiveWindow.SmallScroll Down:=-3
ActiveWindow.SelectedSheets.PrintOut Copies:=Optione.Nombre.Value, Collate:=True
Dim ListeImpression1()
ReDim ListeImpression1(MonImpression1.ListCount - 1)
Dim i As Byte
For i = 0 To MonImpression1.ListCount - 1
ListeImpression1(i) = "" & MonImpression1.List(i)
Next
Sheets(ListeImpression1).Select
Sheets(ListeImpression1(0)).Activate
ActiveWindow.SmallScroll Down:=-3
ActiveWindow.SelectedSheets.PrintOut Copies:=Optione.Nombre.Value, Collate:=True
NHenry
Messages postés
15113
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
22 avril 2024
159
1 avril 2005 à 13:29
1 avril 2005 à 13:29
Si tu veux sélectionner les feuilles les unes après les autres, utilise un tableau avec une boucle for.
Il est plus facile de batiser kk1 que de la convertir. (surtout en programmation)
NH
Il est plus facile de batiser kk1 que de la convertir. (surtout en programmation)
NH
nostra78
Messages postés
137
Date d'inscription
jeudi 10 mars 2005
Statut
Membre
Dernière intervention
6 décembre 2005
1 avril 2005 à 14:07
1 avril 2005 à 14:07
Tu peux préciser ce que tu entends par tableau.
stp
Array est un tableau.
stp
Array est un tableau.
NHenry
Messages postés
15113
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
22 avril 2024
159
1 avril 2005 à 14:15
1 avril 2005 à 14:15
dim Tableau() as string
Redim Tableau(0 to 2)
Tableau(0)="Sheet1"
Tableau(1)="Sheet2"
Tableau(2)="Sheet3"
for i=lbound(Tableau) to ubound(Tableau)
Sheets(Tableau(i)).Select
next
Il est plus facile de batiser kk1 que de la convertir. (surtout en programmation)
NH
Redim Tableau(0 to 2)
Tableau(0)="Sheet1"
Tableau(1)="Sheet2"
Tableau(2)="Sheet3"
for i=lbound(Tableau) to ubound(Tableau)
Sheets(Tableau(i)).Select
next
Il est plus facile de batiser kk1 que de la convertir. (surtout en programmation)
NH
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
nostra78
Messages postés
137
Date d'inscription
jeudi 10 mars 2005
Statut
Membre
Dernière intervention
6 décembre 2005
1 avril 2005 à 14:26
1 avril 2005 à 14:26
Mais c pas exactement ça je veux que les feuilles soit toutes sélectionner. et non une à une
NHenry
Messages postés
15113
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
22 avril 2024
159
1 avril 2005 à 14:41
1 avril 2005 à 14:41
Tu as essayé en faisant une chaine avec des caractères de séparations?
("Feuil1,Feuil2...." c un exemple, sinon enregistre une macro.)
Il est plus facile de batiser kk1 que de la convertir. (surtout en programmation)
NH
("Feuil1,Feuil2...." c un exemple, sinon enregistre une macro.)
Il est plus facile de batiser kk1 que de la convertir. (surtout en programmation)
NH
