Discussion :

[desatan]

Bonjour,
Encore moi

Je vous joins un fichier.

Je souhaiterais avoir une macro qui permette de copier-coller en valeur et garder le format de toutes les feuilles d'un classeur, toutes les lignes et toutes les colonnes.

Dans le fichier joint, il n'y a que 3 feuilles mais il pourrait y en avoir 5, 10 ou 15.
Idem que 3 colonnes et 17 lignes mais cela pourrait être beaucoup plus

Encore une fois, merci par avance pour votre aide

[jfontaine]

bonjour,

Le code ci dessous copie et colle les données en valeur dans le même onglet. (Attention les formules seront perdues après exécution) et cela pour chaque onglet du classeur

Code :

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

1
2
3
4
5
6
Dim Sh As Worksheet
 
For Each Sh In ThisWorkbook.Worksheets
    Sh.Cells.Copy
    Sh.Range("A1").PasteSpecial xlPasteValues
Next Sh

[desatan]

Merci ca fonctionne