[HELP] prog. excel! Résolu

Question

Bonjour,

Je m'adresse a vous car je rencontre un gros soucis. Je suis un grand débutant en programmation vb sur excel, et il faudrait que quelqu'un m'aide pour réaliser ceci :

Voici comment se compose mon classeur excel : 
http://img139.imageshack.us/img139/5720/zdqdvg4.png

Le nom du classeur est : Asan.xls

Ce que j'aimerais faire: Arriver, a partir d'un click sur un bouton (code vb) dans la feuille "parametre", de créer une nouvelle feuille (dans ce même classeur), contenant la mise en page de la feuille "semtest" et le même nom que la feuille "SO1", sauf que le "1" de "SO1" s'incrémenterait de 1 pour chaque nouvelle page créée par ce biais là. Rangée ensuite a la fin de toute les feuilles.

Merci beaucoup de votre aide!
Et bonne journée à toutes et à tous.

LePierre · Answer

Bonjour

Essaye ce code :
Sub Macro1()
    CptSO = 0
    For i = 1 To Sheets().Count
        If Left(Sheets(i).Name, 2) = "SO" Then CptSO = CptSO + 1
    Next i
    Sheets("Semtest").Select
    Sheets("Semtest").Copy After:=Sheets(3)
    Sheets("Semtest (2)").Select
    Sheets("Semtest (2)").Name = "SO" & CptSO + 1
    Sheets("Paramètres").Select
End Sub
à plus

[HELP] prog. excel!

1 réponse

Newsletters