Discussion :

[ranzoken]

Bonjour,

comme écrit dans le titre c'est une histoire de copier coller tout bonnement,
au départ j'ai une feuille cacher au yeux des utilisateurs qui contient le model qui est copier dans la feuille que les utilisateur voit
puis des méthodes sont appelés et remplisse cette dernière suivant les info enregistré en base

jusque la tout fonctionne nickel, mais le Hic arrive :
dans les dernière méthode exécutés il y en a une qui va chercher des cellules (fusionner ou non) dans la feuille non visible et les coller dans la feuille visible
mais ces cellules contiennes un calcul (une somme par exemple) et une fois le coller effectué le calcul devient faux

code pour le copier coller :

Code :

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

1
2
3
4
5
6
7
8
 
    Sheets("ModeleMois").Select
    Application.GoTo Reference:="Absentéïsme_Value"
    Selection.Copy
    Sheets(NomFeuilleDeSaisie).Select
    Range("V38:V38").Select
    ActiveSheet.Paste
    Application.CutCopyMode = False

valeur dans la cellule du model :

Code :

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

=SI(S30<>0;1-(S30-S31)/S30;"")

valeur une fois coller :

Code :

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

=SI(S3<>0;1-(S3-S4)/S3;"")

A savoir que le principe de fonctionnement est bon, puisqu'il faut laisse de la marge a l'utilisateur si il veux changer le model
si vous avez une idée

Cordialement

[ranzoken]

rebonjour,

Désoler je reposte mais j'ai trouvé la solution (ou plutôt l'éclair de génie de mon tuteur)
en faite lors du copier coller des cellules, je décalais ces même cellules du coup les valeurs a l'intérieur changeai elle aussi

alors si la cellule était en U27 elle doit aussi se trouver en U27, sinon si elle se retrouve en U17 les valeurs de la cellule sont égale à la cellule -le décalage


je profite de ce poste pour poser une question qui va de soit avec le poste :
est-il possible de copier coller tout en changeant les cellules de destination ?


sur ce je clos ce sujet (ça n’empêchera pas de répondre à la question)

Cordialement