Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Sélectionner une plage de donnée à partir d'une cellule

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion Wishguu
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
W

Wishguu

Guest
Bonjour,

J'ai une routine qui me permet de copier coller des lignes en fonction d'un critère présent dans la première cellule.

Code: 
    If UCase(.Cells(i, 1)) = "1" Then
    .Cells(i, 2).EntireRow.Copy Destination:=Range("Tableau4").Cells(j, 1)

Cependant, je ne veux pas copier la totalité de la ligne mais juste les cellules à partir de la cellule définie par "Cells(i, 2)"

le résultat serait quelque chose du genre :

Code: 
    If UCase(.Cells(i, 1)) = "1" Then
    .Range(Cells(i, 2).End(xltoRight)).Copy Destination:=Range("Tableau4").Cells(j, 1)

Une simple question de syntaxe, mais je bloque...
 
Trier par date Trier par votes
Re : Sélectionner une plage de donnée à partir d'une cellule

Bonjour à tous


Utilises Resize
(dans cet exemple j'ai "resizé" de 5 cellules)
If UCase(.Cells(i, 1)) = "1" Then
.Cells(i, 2).Resize(,5).Copy Range("Tableau4").Cells(j, 1)

PS: On peut ne pas écrire le: Destination:=
 
Vote positif 0 Vote négatif
Re : Sélectionner une plage de donnée à partir d'une cellule

Merci Staple pour ta réponse,

Quelle serait la solution pour resizer jusq'à la dernière valeur de la ligne (équivalent au xltoRight) ?
 
Vote positif 0 Vote négatif
Re : Sélectionner une plage de donnée à partir d'une cellule

Re

Tu devrais pouvoir t'en sortir en t'inspirant de ceci
(voir notamment ce que contient le Resize)
Code: 
Sub a()
'ceci est juste une macro de test pas une solution
MsgBox ActiveCell.Resize(, Cells(ActiveCell.Row, Columns.Count).End(xlToLeft).Column).Address
End Sub
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

J
  • Résolu(e)
Microsoft 365 Première cellule vide ou égal zéros dans une plage définie
Réponses
11
Affichages
458
juju91
J
F
  • Question Question
Microsoft 365 Problème mémoire insuffisante
Réponses
5
Affichages
912
TooFatBoy
G
  • Résolu(e)
XL 2021 Transformer une formule en vba
2
Réponses
20
Affichages
1 K
kiki29
  • Question Question
XL 2019 Prénoms à souhaiter
2
Réponses
15
Affichages
786
lynyrd
  • Question Question
XL 2016 Renseigner une plage 2 a partir d'une plage 1 selon le mois.
Réponses
4
Affichages
273
KTM
  • Résolu(e)
XL 2021 Problème réaffectation variable Objet
Réponses
2
Affichages
239
treza88
F
  • Résolu(e)
Autres Insérer une ligne
2 3
Réponses
36
Affichages
3 K
francescofrancesco
F
A
  • Question Question
XL 2019 Copie d'une valeur dans la cellule à côté d'une valeur trouvé
Réponses
1
Affichages
585
sylvanu
M
  • Résolu(e)
Microsoft 365 Trouver une valeur dans une colonne
Réponses
7
Affichages
564
mikeduff
M
W
  • Résolu(e)
XL 2016 Placer mes photos dans la colonne A, [A3], [A4],etc, jusqu'en [A99] selon le prénom et le nom colonnes B et C
2
Réponses
29
Affichages
2 K
TooFatBoy
  • Question Question
Microsoft 365 Excel VBA: manipuler des fichiers partagés via Teams / Sharepoint
Réponses
2
Affichages
130
Eric 888
A
  • Résolu(e)
XL 2016 Recherche d'un mot dans une cellule et surlignage de la ligne
Réponses
4
Affichages
571
Abi23
A
T
  • Résolu(e)
Microsoft 365 VBA Exporter une sélection de plages nommées au format PDF
Réponses
12
Affichages
1 K
tnion
T
M
  • Résolu(e)
XL 2021 Problème d'activation d'une macro pour transférer des valeurs d'une feuille 1 à une feuille 2
Réponses
3
Affichages
420
MATLEA
M
K
  • Question Question
Microsoft 365 vba :Vlookup + incrémentation d'une plage de donnée
Réponses
1
Affichages
440
vgendron
P
  • Résolu(e)
XL 2021 Comment détecter la modification MANUELLE d'une cellule dans une feuille ?
Réponses
3
Affichages
332
PRy
P
  • Résolu(e)
XL 2016 XLS - Comment déterminer les zones présentent au niveau d'une cellule ?
Réponses
2
Affichages
850
Lu76Fer
  • Question Question
Microsoft 365 Initialisation d'une variable tableau à partir d'une plage de cellules
2
Réponses
17
Affichages
891
job75
  • Résolu(e)
Microsoft 365 VBA - BeforeDoubleClick, 1ère cellule vide à partir de cellule active pour insertion de ligne
Réponses
4
Affichages
441
AlCapone
S
  • Résolu(e)
Microsoft 365 VBA Concaténer contenu de plusieurs cellules dans une seule avec séparateurs / évolutifs
Réponses
3
Affichages
633
spike29
S
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…