Discussion :

[cbredeche]

BONJOUR
J'ai une macro dans mon onglet "00-recap" qui autorise a dupliqué une ligne sélectionné x fois avec les donnée mais je voudrais aussi dupliquer l'onglet associer et l' indicé avec une lettre

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
 
Sub test()
'Updateby Extendoffice 20160616
    Dim xCount As Integer
LableNumber:
    xCount = Application.InputBox("Nombres de ligne à copier", "macro copie de lignes", , , , , , 1)
    If xCount < 1 Then
        MsgBox "Entre un nombre superieur a 0", vbInformation, "macro copie de lignes"
        GoTo LableNumber
    End If
    ActiveCell.EntireRow.Copy
    Range(ActiveCell.Offset(1, 0), ActiveCell.Offset(xCount, 0)).EntireRow.Insert Shift:=xlDown
    Application.CutCopyMode = False
End Sub

exemple LIGNE sélectionner COR_01_19 nom idem que l'onglet
la macro demande nombre de ligne exemple x2 la ligne prend le même non mais je voudrais quel indice avec une lettre
exemple
COR_01_19 A
COR_01_19 B
Et que mon onglet COR_01_19 soit aussi duplique avec les donne et soit renommé comme mes lignes
COR_01_19 A
COR_01_19 B

je vous joins mon fichier te mon code


merci de votre aide