recopier et incrémenter un tableau excel Fermé

Question

Bonjour,

J'ai un document excel, c'est un tableau que que l'on remplit. j'aurais besoin que ce tableau réapparaisse sur mes nouvelles feuilles. Faire copier coller à chaque fois c'est un peu lourd.

Sur ce taleau il ya une case qui change sur chaque feuille c'est un repère qui va de type A1, A2, A3, ...
comme ça de 1 à 99 et de A à Z. 
Si quelqu'un peu me dire si une on peux faire une macro pour ça.

Merci.

salshita · Answer

Tu selectionnes ton tableau ensuite tu vas dans crées une nouvelle macro dans outils-macro-nouvelle macro (tu choisisis ton raccourci). Ensuite tu fais Copier puis tu ouvres une nouvelle feuille et tu colles. Et là tu retournes dans outils-Macro et tu cliques sur arreter l'enregistrement. et tu testes sur une nouvelle feuille, normalement c bon

jeldwen · Answer

C'est bon j'ai trouvé la solution!!!!!!!

Si ça peux aider quelqu'un :

Sub Macro2()
'
' Macro2 Macro
' Macro enregistrée le 02/07/2007 par BEAUMONT Tony
'



'
num = 1
x = 1
txt = InputBox("entrez une lettre.")

Do
    
    'copie de la feuille
    
  
    Range("A1:K61").Select
    Range("K61").Activate
    Selection.Copy
    Sheets.Add
    Sheets("Feuil" & x).Select
    ActiveSheet.Paste
    
        ActiveWindow.View = xlPageBreakPreview
    Application.CutCopyMode = False
    ActiveSheet.VPageBreaks(1).DragOff Direction:=xlToRight, RegionIndex:=1
    ActiveWindow.SmallScroll Down:=-3

    'sélection de la case et incrémantation
    
    Range("J1").Select
    num = Right(num, 2)
    txt = Left(txt, 1)
    num1 = num + 1
   
    num = num1
    
    
    
Range("J1").Value = txt & num
x = x + 1
'encore = InputBox("encore une autre feuille?")

Loop Until num = 99
'encore = o

    
End Sub

voila il faut bien faire attention a parti de feuil1.

Recopier et incrémenter un tableau excel

2 réponses