VBA : maccro pour copier des feuilles Excel

Bonjour,

Voici mon problème :

J'ai deux onglets : 1 BD et un VIERGE

Dans mon onglet BD, je saisie différentes infos qui se copient automatiquement dans mon onglet VIERGE.

Ensuite, j'ai fait une macro permettant de copier l'onglet vierge dans le même classeur mais en le renommant avec la date de NC saisie au lancement de la macro. (macro "nouveau")

Ensuite, j'insère une autre ligne dans mon onglet BD pour anticiper ma prochaine saisie et en même temps, mon onglet vierge redevient vierge ("macro2")

==> ça fonctionne sauf que l'onglet copier redevient vierge également. comment faire pour qu'il garde les infos copiées ?

la macro enchaînant les 2 (nouveau +macro2) créeés s'appelle "regroupemen"t.

Pouvez vous m'aider ? voici le fichier

Dites moi si ce n'est pas clair

Bonsoir

Modifies ta macro Nouveau

Sub nouveau()

  For n = 1 To 100 '100= maximum de copies (si plus envisagées augmenter)
    x = MsgBox("Créer une NC?", vbYesNo)
    If x = 6 Then
      nom = InputBox("Date de la NC")
      Sheets("VIERGE").Copy After:=Sheets(Sheets.Count)
      With ActiveSheet
        .Range("B2") = nom
        .Name = nom & ""
        .Cells.Copy
        .Range("A1").PasteSpecial Paste:=xlPasteValues
      End With
      Application.CutCopyMode = False
    Else
      Exit Sub
    End If
  Next n
End Sub

super, ça fonctionne

un grand merci

je me permet de vous recontacter concernant la macro.

Elle fonctionen bien, sauf que j'au un message d'excel me disant :

"voulez vous remplacer les cellules de destination" et je ne comprend pas pourquoi j'ai ce message.

Si je met oui, la macro s'exécute normalement, si je met non, elle ne s'exécute pas correctement.

Pouvez vous m'aider ?.

La macro à lancer s'appelle fusion (elle lance la macro copie puis la macro insertion)

j'ai encore une question :

lorsqu'il me demande Créer une fiche de NC, si je mets non, il ne me l'accepte pas. comment faire pour qu'il arrête la macro si je répond non ?

d'avance un grand merci

Bonjour

frizzz24 a écrit :

"voulez vous remplacer les cellules de destination"

A cause des cellules fusionnées

frizzz24 a écrit :

orsqu'il me demande Créer une fiche de NC, si je mets non, il ne me l'accepte pas. comment faire pour qu'il arrête la macro si je répond non ?

Il ne fallait pas modifier la macro que je t'avais postée

Macro rectifiée dans ce fichier

Super, oui effectivemnt j'ai du la modifier pour l'intégrer dans mon fichier.

Effectivement je n'avais pas pensé à la taille de ma feuille à copier.

Encore merci pour ton aide