déplacer une feuille

[pierre]

bonjour,
dans ma macro, je crée une nouvelle feuille et je voudrais qu'elle se place derrière les autres feuilles.
L'aide de VBA ma donné ceci :
Private Sub Workbook_NewSheet(ByVal Sh As Object)
Sh.Move After:=Sheets(Sheets.Count)
End Sub

mais je voudrais utiliser call pour avoir 2 prog mais quand je met call Workbook_NewSheet, il me dit qu'il manque des arguments et je ne sais pas quoi mettre.
Pourriez vous m'aider s'il vous plait.
Merci d'avance

 

[Gibson94]

Bonsoir pierre, le forum

J'ai l'impression que ta demande est un peu floue, d'ailleurs presque 6 heures se sont écoulées et tu n'as aucune réponse.

Je ne saisis pas l'histoire de tes 2 progs. Pour ma part j'utilise 'Call' pour appeler une 'Sub' avec plus d'un argument.

Par exemple:
Call macro1(1,toto)

Sub macro1(Chiffre,Nom)
'Chiffre = 1
'Nom = 'toto'
end sub

Donc là, je ne vois pas du tout comment tu veux l'utiliser. Donne-nous un peu plus d'explications.

Message édité par: gibson94, à: 05/06/2005 01:21

 

[pierre]

Désolé pour mes explications.
Voila, une fois que ma macro crée la nouvelle feuille, je veux qu'elle se place après les autres feuilles.
Donc soit incorporé dans la macro ou en utilisant call ...
Voila en espérent avoir été un petit plus clair

 

[Gibson94]

Bonsoir pierre, le forum

Cette ligne VBA te permet de créer une nouvelle feuille et de la positionner en dernière feuille.

Sheets.Add.Move After:=Sheets(Sheets.Count)

Espérant avoir répondu à ta demande.

 

[pierre]

je te remercie beaucoup.
C'est ce que je cherchait et en plus c plus simple