Bonjour,
je souhaite pouvoir sélectionner une plage de données et la réutiliser après pour par exemple créer un graphique ou encore la transposer.
J'arrive à sélectionner une plage grâce à ce code:
Aselectionner = Application.InputBox(prompt:="selectionner la plage de cellule ", _
Title:=" Plage de cellules à sélectioner", Type:=8)
Cependant, impossible après de m'en servir pour par exemple transposer cette plage après.
J'ai trouver ce code pour transposer qui fonctionne parfaitement, seulement je voudrais qu'il s'applique non pas à la plage A1:Z200 mais seulement à la plage sélectionnée.
c = Application.Transpose(Range("A1:Z200"))
Range("A1").Resize(UBound(c, 1), UBound(c, 2)) = c
Lorsque je remplace A1:Z200 par Aselectionner, VBA m'envoie cette erreur:
Erreur d'éxécution '1004'
La méthode d'éxécution 'range' de l'objet '_global' a échoué.
voila
Si quelqu'un pouvait m'aider sur ce problème
merci d'avance
Norip
je souhaite pouvoir sélectionner une plage de données et la réutiliser après pour par exemple créer un graphique ou encore la transposer.
J'arrive à sélectionner une plage grâce à ce code:
Aselectionner = Application.InputBox(prompt:="selectionner la plage de cellule ", _
Title:=" Plage de cellules à sélectioner", Type:=8)
Cependant, impossible après de m'en servir pour par exemple transposer cette plage après.
J'ai trouver ce code pour transposer qui fonctionne parfaitement, seulement je voudrais qu'il s'applique non pas à la plage A1:Z200 mais seulement à la plage sélectionnée.
c = Application.Transpose(Range("A1:Z200"))
Range("A1").Resize(UBound(c, 1), UBound(c, 2)) = c
Lorsque je remplace A1:Z200 par Aselectionner, VBA m'envoie cette erreur:
Erreur d'éxécution '1004'
La méthode d'éxécution 'range' de l'objet '_global' a échoué.
voila
Si quelqu'un pouvait m'aider sur ce problème
merci d'avance
Norip