Copie feuille vers nouvelle feuille avec donnees sans formules

Résolu
crouault67 Messages postés 20 Date d'inscription   Statut Membre Dernière intervention   -  
crouault67 Messages postés 20 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

j'espere que je vais etre claire, voila j'ai un fichier qui regroupe des donnees importees d'un autre fichier via des formules, jusque la tout va bien.

par contre j'ai besoin de copier ces donnees vers une nouvelle feuille mais sans les formules qui sont a l'interieur, car j'ai besoin de pouvoir "corriger" certaines de ces donnees. le souci est que lorsque je copie j'importe aussi les formules qui se mettent en "ref", du coup pas evident car je n'ai besoin que des donnees.
et la j'avoue que je perds mon latin (voire mon VBA)
j'aurais bien besoin d'un coup de main !!
merci
A voir également:

4 réponses

Réponse 1 / 4
Patrice33740 Messages postés 8561 Date d'inscription   Statut Membre Dernière intervention   1 780
 
Pas besoin de VBA :
Copier / Collage spécial / valeurs

Et si tu veux garder les formats :
Copier / Coller / Collage spécial / valeurs
Cordialement
Patrice
0
Réponse 2 / 4
crouault67 Messages postés 20 Date d'inscription   Statut Membre Dernière intervention  
 
je te remercie, mais j'aurais voulu au temps que faire se peut passer par une procedure automatisee, car ce n'est pas moi qui utiliserai ce fichier et la personne destinataire est un peu "limitee" en termes de capacite d'utilisation d'excel.
donc j'aurais voulu lui mettre en place une procedure qui limite au maximum les gestes de navigation !
0
Réponse 3 / 4
Patrice33740 Messages postés 8561 Date d'inscription   Statut Membre Dernière intervention   1 780
 
Bonjour,

L'équivalent en VBA : 
Sub test()
Dim wbk As Workbook

  ThisWorkbook.Worksheets(1).Copy
  Set wbk = ActiveWorkbook
  wbk.Worksheets(1).Cells.Value = wbk.Worksheets(1).Cells.Value

End Sub
0
crouault67 Messages postés 20 Date d'inscription   Statut Membre Dernière intervention  
 
cela fonctionne super bien, par contre cela me le copie dans un nouveau fichier, hors j'ai besoin que cela me le copie dans une feuille du meme fichier afin que je puisse lui appliquer la formule de remplacement des caracteres speciaux. de plus, ma plage de la premiere plage s'etend de A2:F500, j'ai bien essaye entre les parentheses de lui definir la plage mais je dois oublier quelque chose ??
0
Réponse 4 / 4
Patrice33740 Messages postés 8561 Date d'inscription   Statut Membre Dernière intervention   1 780
 
Re,

Essaies de comprendre le code : 
Sub test()
Dim rng As Range
  
  'Copier la feuille 1 et la placer après (en feuille 2)
  Worksheets(1).Copy after:=Worksheets(1)
  'Renommer la nouvelle feuille
  Worksheets(2).Name = "MaFeuille"
  'Définir la plage utilisée sur cette feuille
  Set rng = Worksheets(2).UsedRange
  'Afficher l'adresse de la plage utilisée
  MsgBox "Plage utilisée sur " & Worksheets(2).Name & " : " & vbCr & _
         rng.Address
  'Remplacer les formules par leurs résultats (leurs valeurs)
  rng.Value = rng.Value

End Sub

Dans l'éditeur VBA, quand tu places le curseur texte sur un mot du code puis que tu appuis sur la touche F1 tu obtiens l'aide sur ce mot.
0
crouault67 Messages postés 20 Date d'inscription   Statut Membre Dernière intervention  
 
je te remercie pour les explications supplementaires, je ne sais pas si ce sont les heures passees a essayer d'adapter a ma sauce, mais en reprenant ce matin a tete froide, en 5 mn tout fonctionnait !!
Merci !!
0