Fonction macro

Résolu/Fermé
Arlequinn - 10 juin 2011 à 15:06
 Arlequinn - 10 juin 2011 à 16:43
Bonjour, je cherche une formule pour une macro afin de garder la mise en forme, les valeurs et les formules qui font références à une autre feuille dans mon fichier excel.
En fait en ce moment j'utilise ActiveSheet.Paste ce qui me permet de gader la mise en forme et les valeurs mais malheuresement pas les formules qui font référence à cette autre feuille excel.

Merci pour votre aide


A voir également:

4 réponses

Utilisateur anonyme
10 juin 2011 à 15:24
Bonjour,

Votre question n'est pas clair ...

Quand j'exécute la procédure suivante,
tout est transféré sur la seconde feuille,
les valeurs, le format et les formules.

Y compris les formules qui pointent sur la [Feuil1].

Option Explicit

Sub CopieFormule()

    Sheets("Feuil2").Cells.Copy
    Sheets("Feuil3").Select
    ActiveSheet.Paste
    Application.CutCopyMode = False
    Range("A1").Select
    
End Sub
'


Cdt

Lupin
0
J'ai:
Sheet("feuill1").Range("A1:Q15").copy
Range("B20").Select
ActiveSheet.Paste
Comment je peux faire dans cette situation?
0
Bonjour,

Exemple :

Sub CopiePartie() 

    Sheets("Feuil1").Select 
    Range("A1:Q15").Select 
    Selection.Copy 
     
    Range("B20").Select 
    ActiveSheet.Paste 
    Application.CutCopyMode = False 

End Sub 
' 


n.b. Lors du transport de formule (copie de formule), si celles-ci
sont relatives, excel transpose l'indexation.

Ex.:

Si en J8, j'ai la formule : [=SOMME(A1:U1)] et que je copie
en B20 la plage ("A1:Q15"), alors j'obtiens en K29 la formule
suivante : [=SOMME(B20:V20)].

Pour conserver l'adressage initiale, il faut adressé en absolu,
soit en J8, la formule : [=SOMME($A$1:$U$1)]. Au moment
de la copie de cette formule, l'adressage restera intouché.

Cdt

Lupin
0
Merci beaucoup cela fonctionne !!
0