Résolu VBA : Copier feuille si valeur cellule.

[fr.guillaume.robache]

Bonjour à tous,

Je suis un peu perdu.
Débutant en VBA.

Je crée un fichier excel, et j'aurais besoin d'effectué une copie d'une feuille qui se placera juste après celle-ci grâce à la valeur d'une cellule sur une autre feuille.

Exemple : Valeur de la cellule = 2; copie de la feuille "LOCAL" placer juste après (LOCAL2)
Valeur de la cellule = 3; copie de la feuille "LOCAL" x2 placer juste après. (LOCAL2;LOCAL3
et ainsi de suite.

Merci de votre aide.

 

[drul]

Salut, tu as une ébauche de code ?

Mais en gros:

Sub test()
    Sheets(1).Copy after:=Sheets(Sheets(1).Range("A1").Value)
End Sub

 

[fr.guillaume.robache]

Bonjour Drul,

Merci pour ta réponse et désolé pour la réponse tardive mais en Gros voila ce que j'ai pu commencer à faire.

Sub test()


If Worksheets("Feuil3").Range("C52").Value = 2 Then
Sheets("LOCAL").Copy after:=Sheets(Sheets("LOCAL")).ActiveSheet.Name = "LOCAL2"
End If



End Sub

Voila ce que j'ai effectué mais ceci ne fonctionne pas.

J'ai besoin d'une condition If pour pouvoir additionner la page autant de fois.

 

[drul]

La tu essayes d'en faire un peu trop sur la même ligne ...
mais je suis pas sur de tout savoir ce que c'est ...