XL 2016 Insertion ligne si cellule pleine et création d'une nouvelle feuille

greenman

XLDnaute Nouveau
Bonsoir à tous,
Je trouve toujours les réponses à mes questions en visionant ce forum mais là j'ai décidé de m'inscrire car je sêche.

Est-il possible, qu'au moment où je complète la cellule A21 cela créé une nouvelle feuille portant le nom de cette même cellule ainsi que toute la mise en page de la première feuille (92)

Voir ci-joint mon fichier.

Merci beaucoup et bonne soirée.
 

Pièces jointes

  • TEST.xlsm
    99.9 KB · Affichages: 28

Staple1600

XLDnaute Barbatruc
Bonsoir le fil, le forum

Avec ce code placé dans le code de la feuille Base de données, la macro fait un peu le boulot
(mais ne donne pas complétement satisfaction)
Je te laisse découvrir ce qui ne va pas ;)
VB:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim nom$
If Target.Column = 1 And Target.Row >= 20 Then
On Error Resume Next
nom = Target.Text
Feuil6.Copy after:=Sheets(Sheets.Count)
ActiveSheet.Name = nom
On Error GoTo 0
End If
End Sub
 

greenman

XLDnaute Nouveau
Bonsoir, et merci pour ta prompte réponse.
C'est déjà très bien ! J'ai plus qu'à bosser un peu sur les liens afin de retrouver les valeurs dans chaque nouvelle feuille créée.
Encore un grand merci à toi et au forum, je repasserai pour d'autres hics qui me sont perdre beaucoup de temps.
Bonne soirée.
 

Discussions similaires

Réponses
3
Affichages
745

Statistiques des forums

Discussions
311 741
Messages
2 082 055
Membres
101 882
dernier inscrit
XaK_