Création onglet

Le 02/09/2019 à 22:43

Bonjour

J'aurais besoin d'aide svp. J'ai créé un formulaire de saisie afin d'ajouter les salariés, mais je voudrais que lorsque l'on fait un ajout d'employé, cela créer un onglet à partir du modèle que j'ai fais en gardant les formules, mise en page, les protection, bref il faut qu'il soit identique au modèle. Je veux aussi que les données du formulaire de saisie se retrouve sur la feuille créée et celle-ci devra être renommé.

N.B Si vous trouvez des choses que je pourrai améliorer afin que mon fichier ne soit pas trop volumineux (au moins 350 onglets à créer) se serai apprécié

Je vous joins mon fichier

Merci beaucoup

Chantal

12suivi-temps.xlsm (70.16 Ko)

Le 03/09/2019 à 07:01

Bonjour,

Une piste :

Sub ajouter_employe()

    Worksheets("Modèle").Copy , Sheets(Sheets.Count)

    With ActiveSheet

        .Name = Worksheets("Formulaire").Range("B11").Value
        .Range("F2").Value = Worksheets("Formulaire").Range("B11").Value & " " & Worksheets("Formulaire").Range("B8").Value
        .Range("E2").Value = Worksheets("Formulaire").Range("B5").Value
        .Range("E3").Value = Worksheets("Formulaire").Range("B14").Value

    End With

    Worksheets("Formulaire").Range("B5, B8, B11, B14").ClearContents

End Sub

Le 03/09/2019 à 07:41

Bonjour

Bonjour à tous

Un essai à tester.Te convient-il ?

Bye !

8suivi-temps-v1.xlsm (73.23 Ko)

Le 04/09/2019 à 00:12

Bonjour GMB

J'ai regardé ce que tu m'as fait et j'aimerais te faire apporter des changements (je me suis essayé, mais sans grand succès malheureusement). Je te joints mon fichier ou j'ai ajouté des commentaires dans les feuilles Formulaire et données

Merci beaucoup

5suivi-temps-test.xlsm (75.63 Ko)

Le 04/09/2019 à 10:01

Bonjour

Nouvel essai.

Bye !

7suivi-temps-v2.xlsm (116.58 Ko)

Le 04/09/2019 à 23:44

Bonjour

Je veux que ma nouvelle feuille créer soit protéger, ou et comment l'ajouté

'Création de la fiche du nouveau nom

Application.ScreenUpdating = False