demande d'explication syntaxe macro

bpol · 26 Octobre 2009

bonsoir le forum,

j'ai une macro:
Sheets("récap").PrintOut
'and
Sheets("récap").Copy After:=Worksheets(Sheets.Count)
ActiveSheet.Name = Range("D12")
'and
Sheets("récap").Select
Range("A15:E265").Select
Selection.ClearContents
'and
Worksheets("tableau").Select

est ce qu'une bonne âme pourrait me traduire en français la ligne en gras car nous avons des soucis selon la version d'excel ou du pc? car la macro bug à la hauteur de cette phrase

merci

BPOL

Excel-lent · 26 Octobre 2009

Re : demande d'explication syntaxe macro

Bonsoir Bpol

bpol à dit:
Code:

Sheets("récap").Copy After:=Worksheets(Sheets.Count)

Personnellement, en lisant ce code j'en déduis que tu veux copier la feuille "Récap", et que tu souhaite mettre cette copie après le dernier onglet.

Ce qui revient au même que la manipulation :
-> sélectionner la feuille nommé "récap"
-> cliquer sur "Edition" / "Déplacer ou copier une feuille..."
-> cocher "créer une copie"
-> sélectionner dans la liste "en dernier"
-> cliquer sur "Ok" pour valider

Si le code ci-dessus a du mal à passer, essaye celui-ci (il fonctionne très bien chez moi - Excel 2003) :

Code:

Sheets("récap").Copy After:=Sheets(Sheets.Count)

Bonne soirée

bpol · 26 Octobre 2009

Re : demande d'explication syntaxe macro

Bonsoir Excel-lent,

et merci

Bpol

Excel-lent · 26 Octobre 2009

Re : demande d'explication syntaxe macro

Re-bonsoir Bpol,

Pour information, ton code ci-dessous :

Code:

Sheets("récap").Select
Range("A15:E265").Select
Selection.ClearContents

Peux-être simplifié de la façon suivante (et ta macro tourneras plus vite) :

Code:

Sheets("récap").[A15:E265].ClearContents

Bonne fin de soirée

demande d'explication syntaxe macro

bpol

XLDnaute Impliqué

Excel-lent

XLDnaute Barbatruc

bpol

XLDnaute Impliqué

Excel-lent

XLDnaute Barbatruc

Discussions similaires

demande d'explication syntaxe macro

bpol

XLDnaute Impliqué

Excel-lent

XLDnaute Barbatruc

bpol

XLDnaute Impliqué

Excel-lent

XLDnaute Barbatruc

Discussions similaires

Privacy & Transparency

Privacy & Transparency