[Excel] VBA pour un collé transposé sans MFC
Résolu
Bonjours à tous,
Je dois faire un collé / Transposé de certaines valeurs.
Les cellules sources (en 1 colonne) contiennent une Mise en Forme Conditionnelle.
Et lors de ce collage, Excel, 1x/2 Plante (Ne répond pas).
Je suis obligé de fermer le programme ;((
Quel serait la syntaxe du code, pour coller en ligne, une sélection Préalablement copiée
et ceci sans MFC ?
Est-possible ?
Voici mon code :
Je pense que
Merci d'avance de vos réponses ou conseils éclairés.
A question détaillée, Réponse précise ! ☼► Si question résolue, côcher l'option voulue. Mettez vos logiciels à jour ! et... Merci n'est pas un luxe ♪♫.
Je dois faire un collé / Transposé de certaines valeurs.
Les cellules sources (en 1 colonne) contiennent une Mise en Forme Conditionnelle.
Et lors de ce collage, Excel, 1x/2 Plante (Ne répond pas).
Je suis obligé de fermer le programme ;((
Quel serait la syntaxe du code, pour coller en ligne, une sélection Préalablement copiée
et ceci sans MFC ?
Est-possible ?
Voici mon code :
Sub Collage_Transpose_SANS_MFC()
'
' Collage_Tranpose_SANS_MFC Macro
'
'
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=True
End Sub
Je pense que
xlPasteAlldoit être remplacé par un autre terme ???
Merci d'avance de vos réponses ou conseils éclairés.
A question détaillée, Réponse précise ! ☼► Si question résolue, côcher l'option voulue. Mettez vos logiciels à jour ! et... Merci n'est pas un luxe ♪♫.
3 réponses
-
Bonjour,
Paste:=xlPasteValues -
ModérateurBonjour,
Le paramètre Paste peut en effet prendre plusieurs valeurs.
Tu peux utiliser :
Pour coller uniquement les valeurs :Paste:=xlPasteValues
Pour coller uniquement les formules :Paste:=xlPasteFormulas
etc...
Si tu veux, tu peux les retrouver par toi-même en utilisant l'enregistreur de macro.
- Onglet Développeur, clic sur Enregistrer une macro
- Copies ta plage de cellules
- Clic droit / Collage spécial / collage spécial
==> Là tu peux essayer et enregistrer les 12 possibilités de Coller...
Les macros enregistrées par ce biais sont disponibles dans un module de ton classeur.
-
ContributeurMerci à vous de vos réponses rapides ;)
J'ai testé :
Sub Macro1()
'
' Macro1 Macro
'
'
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=True
End Sub
C'est OK...
... mon problème n'est cependant pas vraiment résolu; en effet, les cellules sources ont des motifs (remplissage) ... gris pour les impaires et par défaut (rien) pour les paires. motifs, que j'aimerais pouvoir garder.
Dans la fenêtre "collage spécial", je ne puis sélectionner qu'une des options
(encadré rouge)
:
Edit,
16:50
Je pense à un " remplissage par macro des nombres impairs
P.s.:
J'ai Excel 2010
Merci de votre temps :D
A question détaillée, Réponse précise ! ☼► Si question résolue, côcher l'option voulue. Mettez vos logiciels à jour ! et... Merci n'est pas un luxe ♪♫.
-
-
ContributeurSalut pijaku,
Ne fonctionne pas snif
et j'ai collé la sélection dans une partie vierge de mon classeur
j'ai associé la macro :
Sub Collage_Transpose_SANS_MFC_04()
'
' Macro4 Macro
'
'
Selection.PasteSpecial Paste:=xlPasteValuesAndNumberFormats, Operation:= _
xlNone, SkipBlanks:=False, Transpose:=True
'Application.CutCopyMode = False
End Sub
à un bouton, enregistré le tout fermé XLS en re testé
mais les cellules impaires ne contiennent pas de remplissage gris.
Je dois sortir un moment : RDV je "reviendre" dès que possible !
Bon apéro ! -
-
-
-
