Impossible coller valeurs seules

[paseg]

Bonsoir,
Lorsque je colle uniquement des valeurs (résultat d'une formule), les cellules vides ne sont pas vides.
Dans mon classeur exemple, j'ai effectué un collage spécial (seulement les valeurs) de (F2:H5) en (F8:H10). Effectivement, les formules ne sont pas recopiées mais les cellules blanches (F8, F9, G9 et H9) ne sont pas vides...
Comment les vider complètement ?
En plus, je souhaiterais intégrer cette opération dans une macro.
J'ai essayé avec "Selection.PasteSpecial Paste:=xlPasteValues" mais ça ne fonctionne pas.
Pensez-vous que cela soit possible ?
Merci d'avance
Paseg

 

[Staple1600]

Re : Impossible coller valeurs seules

Bonsoir

EDITION: sans copier/coller

Sub Macro3()
[F8].Resize(3, 3).Value = Application.Trim([F2].Resize(4, 3).Value)
End Sub

Essayes comme ceci

Sub Macro2()
' Macro2 Macro
' Macro enregistrée le 08/11/2009 par  

    Range("F2:H5").SpecialCells(xlCellTypeFormulas, 23).Copy
    Range("F8").PasteSpecial Paste:=xlValues
    Application.CutCopyMode = False
    Selection.Replace " ", "", xlPart, xlByRows, False
End Sub

 

[paseg]

Re : Impossible coller valeurs seules

Merci Staple,

Ca fonctionne mais j'aurais du préciser que je souhaitais copier la feuille entière. Lorsque je sélectionne la feuille (je remplace Range("F2:H5") par Selection), je perds la plupart des données
Pourrais-je les conserver ?
Merci
Paseg

 

[Staple1600]

Re : Impossible coller valeurs seules

Bonjour


Et comme cela ?

Sub Macro1()
Dim r As Range, rvs As Range
Set r = Selection
r.Value = Application.Trim(r.Value)
End Sub

 

[paseg]

Re : Impossible coller valeurs seules

Super Staple,
Je ne comprends pas grand chose mais c'est exactement ce que je voulais.
Encore merci.
Mon problème est résolu mais je ne sais pas comment l'indiquer.
Cordialement
Paseg

 

[pascal21]

Re : Impossible coller valeurs seules

Super Staple,
Je ne comprends pas grand chose mais c'est exactement ce que je voulais.
Encore merci.
Mon problème est résolu mais je ne sais pas comment l'indiquer.
Cordialement
Paseg

bonjour à tous
en fait tu n'as pas à indiquer que le sujet est clos sur ce forum
en effet excel offre tellement de possibilités que quelqu'un peut revenir rajouter sa méthode qui pourra ensuite profiter à d'autres grâces aux archives
cordialement

 

[Kobaya]

Re : Impossible coller valeurs seules

bonjour le Forum,

je pense qu'il est important de préciser une chose : lorsque l'on réserve de la mémoire pour une variable objet, il ne faut pas oublier de la libérer en fin de macro.
Donc, il faut rajouter la ligne Set r = Nothing :

Sub Macro1()
Dim r As Range, rvs As Range
Set r = Selection
r.Value = Application.Trim(r.Value)
Set r = Nothing
End Sub