FORMULE POUR FONCTION COPIE D'ECRAN

[br44]

Bonsoire le forum

je me permet de vous poser une petite question

existe-t-il une fonction vba pour déclancher une copie d'écran de maniere à copier sans les formules de calcule mais en conservant les valeures et le formats aprés l'enregistrement des données?

si une telle formules (ou similaire) existe pouriez vous me la communiquer.

vous en remerciant par avance je vous dis à plus sur le forum

br44

 

[Temjeh]

Bonjour

Pas trop sur de savoir ce que tu veut copier.
Pour une plage on m'a donné ici:

Dim R As Range
Application.ScreenUpdating = False
Set R = ActiveSheet.Range('A1:F15')
R.CopyPicture
ActiveSheet.Paste
Selection.Name = 'Temp'
With ActiveSheet.ChartObjects
With .Add(0, 0, Selection.Width, Selection.Height).Chart
.Paste
.Export 'C:\\Image.gif', 'gif'
End With
.Delete
End With
ActiveSheet.Shapes('Temp').Delete
Application.ScreenUpdating = True


Temjeh

 

[br44]

re: bonsoir le forum ,bonsoir Temjeh

tout d'abor merci pour ta réponse .Il faut wque je test pour voir si sa convienne ou pas . je te tient au courant rapidement.

Pour répondre à ta question je voudrais copier/coller deux feuilles simultanèment d'un classeur 'F'(source)vers une feuille d'un classeur 'A' (déstination) sans que les formules effectuer dans le premier sois copier dans le second (juste formats et valeures).

actuellement je suis obliger de remettres toutes les formules copier à jours dans le classeur 'A' car jai un décalge de formule que je ne sais pas résoudre .

voici un exemple de décalage :
dans le classeur source ma fomule : = 'G3'
dans le classeur destination sa donne :='G33'
se qui m'affiche un copie vide de tout calcul

Si tu voeux plus d'infos ou si tu as une solution pour résoudre le prombleme (Temjeh ou les autres excelien où excellienne qui liront se message) je peux envoyer un fichier avec l'enssemble du program

Merci à tous ceux et toutes celles qui sont passer lire se fil ,ainssi qu'à toi Temjeh .

Je vous dis à bientôt sur le forum
br44