Classeur en cours

[kant]

Bonjour à tous, et meilleurs vœux pour 2011,

Comment dans une macro désigner le classeur en cours?
Mon fichier ne comporte au départ que 2 classeurs qui sont des trames. Je crée par une macro de nouveaux classeurs pour chaque salarié, je voudrais enregistrer une macro la création de ces classeurs, qui me permette de faire un tri sur des dates . Une fois un ensemble de nouveaux classeurs crées, je voudrais que ma macro s'effectue sur le classeur en cours.

 

[Pierrot93]

Re : Classeur en cours

Bonjour,
pour le classeur actif :
ActiveWorkbook

bonne journée
@+

 

[kant]

Re : Classeur en cours

Thanks a lot

 

[kant]

Re : Classeur en cours

Je rame un peu comme tout bon débutant
Je voudrais dans ma macros désigner le groupe de cellules B6:E39 dans le classeur actif

 

[Pierrot93]

Re : Classeur en cours

Re,

essaye ainsi, le nom de la feuille est nécessaire :

ActiveWorkbook.Sheets("NomFeuille").Range("B6:B39").Select

tu peux simplifier ainsi :

Sheets("NomFeuille").Range("B6:B39").Select

sans précision, les instructions s'appliquent au classeur actif et également à la feuille active....

soit :

Range("B6:B39").Select

pour selectionne la plage en question de la feuille active du classeur actif....

 

[kant]

Re : Classeur en cours

A quoi doit correspondre le champ "Nom de feuille"? La macro doit pouvoir s'appliquer à toutes les feuilles qui seront créer.

 

[Pierrot93]

Re : Classeur en cours

A quoi doit correspondre le champ "Nom de feuille"? La macro doit pouvoir s'appliquer à toutes les feuilles qui seront créer.

Re au nom de la feuille....

 

[kant]

Re : Classeur en cours

Petite précision car j'ai mal formulé les choses, je m'en excuse.
Il s'agit pour moi dans un classeur de sélectionner une plage de cellules appartenant à une feuille, qui quand je crée ma macro, n'est pas existante, elle sera crée en fonction des besoins futurs.
Donc cette macro doit sélectionner la plage de la feuille active quelle qu'elle soit.

 

[Pierrot93]

Re : Classeur en cours

Re,

cette synthaxe selectionne la plage en question de la feuille active :

Range("B6:B39").Select

 

[kant]

Re : Classeur en cours

Voici la syntaxe de ma macro :

Sub TrierDates()
'
' TrierDates Macro
'
' Touche de raccourci du clavier: Ctrl+d
'
Range("B6:E39").Select
ActiveWindow.SmallScroll Down:=-13
ActiveWorkbook.Worksheets("XTRAME").Sort.SortFields.Clear
ActiveWorkbook.Worksheets("XTRAME").Sort.SortFields.Add Key:=Range("B6"), _
SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
With ActiveWorkbook.Worksheets("XTRAME").Sort
.SetRange Range("B6:E39")
.Header = xlNo
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With
End Sub

Quand je lance la macro, le tri se fait non pas sur la feuille active mais sur la trame...

 

[Pierrot93]

Re : Classeur en cours

Re,

normal pusique dans ton code la feuille "trame" est précisée :
"Worksheets("XTRAME")"
remplace partout dans ton code :
"ActiveWorkbook.Worksheets("XTRAME")"
par :
"ActiveSheet"

 

[kant]

Re : Classeur en cours

Encore un grand merci à vous tous qui par votre disponibilité, votre gentillesse,vos conseils et vos solutions font que l'on s'interesse de plus en plus à Excel. J'suis épaté.
Bonne année à tous.
(Discussion à clore. 😉)