Simplification de macro sur Excel

Simplification de macro sur Excel - Logiciels - Windows & Software

Marsh Posté le 12-07-2007 à 10:54:21    

Bonjour à tous.
 
Je cherche à faire une macro sous Excel permettant de copier le contenu d'une même case de chaque onglet, par exemple la case F13, sur un dernier onglet, par exemple "cumul".
 
Il faut également que les données automatiquement copié ne se chevauche pas dans le dernier onglet, donc se copie en A1,A2,A3, etc.
 
Je suis arrivé à faire cette macro (merci p'tit loup ;) ) mais je dois rentrer à la main le nom de chaque onglet, donc ma formule n'est plus valide si je rajoute un nouvel onglet.
 
Je voudrais donc simplifier ma formule pour que chaque onglet soit traiter automatiquement!
 
voici ma macro:
 
 
Sub Macro1()
'
    Sheets("Onglet1" ).Select
    Range("F13" ).Select
    Application.CutCopyMode = False
    Selection.Copy
    Sheets("cumul" ).Select
    Range("A1" ).Select
    ActiveSheet.Paste
 
    Sheets("Onglet2" ).Select
    Range("F13" ).Select
    Application.CutCopyMode = False
    Selection.Copy
    Sheets("cumul" ).Select
    Range("A2" ).Select
    ActiveSheet.Paste
 
    Sheets("Onglet3" ).Select
    Range("F13" ).Select
    Application.CutCopyMode = False
    Selection.Copy
    Sheets("cumul" ).Select
    Range("A3" ).Select
    ActiveSheet.Paste
 
End Sub
 
 
hm, dur à expliquer tout ça! :pt1cable:  
J'éspère que vous m'aurez compris!
et merci..

Reply

Marsh Posté le 12-07-2007 à 10:54:21   

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed