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

ajouter la cellule "X" fois dans une autre feuille

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion toksib
  • 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
T

toksib

XLDnaute Nouveau
bonsoir,

Voila, j'ai 2 colonnes avec les même références. mais avec plusieurs repetition des ref et j'aimerai ajouter dans une autre feuille et dans une seule colonne la même liste mais prendre le nombre de référence là où il y en a le plus.

je sais pas si j'arrive à me faire comprendre, du coup je joint un fichier.

j'ai commencé à travailler sur le fichier joint et j'ai réussi à avoir le nombre de fois (en colonne F) qu'il faut répéter la ref 2 (cellule qui est en colonne C) !

en vous remerciant
 

Pièces jointes

Trier par date Trier par votes
Re : ajouter la cellule "X" fois dans une autre feuille

Bonjpur toksib,
Une proposition en m'appuyant sur votre colonne F
Code: 
Sub tri()
Dim derlign As Long
For i = 2 To 1000
    If Not Cells(i, 3).Value = Cells(i + 1, 3).Value Then
        Var = Cells(i, 6).Value
        For k = 1 To Var
            derlign = Range("I65536").End(xlUp).Row + 1
            Cells(derlign, 9).Value = Cells(i, 3).Value
        Next k
    End If
Next i
End Sub
Vous pouvez masquer les colonnes B, D E et F
Cordialement
 

Pièces jointes

Dernière édition:
Vote positif 0 Vote négatif
Re : ajouter la cellule "X" fois dans une autre feuille

Bonsoir

Une autre solution

Code: 
Sub a()
Dim c As Range
For Each c In Range([C2], [C65536].End(xlUp))
Cells(65536, "I").End(xlUp)(2).Resize(c.Offset(, 3)) = c
Next
End Sub

qui ne fonctionne que s'il n'y a pas de doublons en colonne C
 
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

Discussions similaires

  • Question Question
XL 2016 ajouter, une nouvelle feuille avec le contenu d'une cellule
Réponses
7
Affichages
353
job75
N
  • Question Question
XL 2021 Affecter automatiquement une valeur dans une cellule en fonction d'une saisie dans une autre cellule
Réponses
9
Affichages
319
Nico Gre
N
C
  • Question Question
XL 2021 Exporter des données vers une autre feuille...
Réponses
7
Affichages
202
sylvanu
N
  • Question Question
Microsoft 365 Vérifier si une référence existe dans un tableau Excel avant de la créer
2
Réponses
19
Affichages
1 K
nikeu01
N
B
  • Résolu(e)
XL 2021 VBA : activer une feuille dont le nom est la valeur d'une cellule
Réponses
2
Affichages
206
berru76
B
R
  • Question Question
XL 2016 récupérer une image depuis un SharePoint et la coller dans une cellule
Réponses
4
Affichages
166
halecs93
B
  • Résolu(e)
Microsoft 365 Recherche de plusieurs critères dans une cellule
2
Réponses
19
Affichages
808
Bambi35
B
G
  • Question Question
XL 2016 filtrer, copier et coller les données avec la macro
Réponses
4
Affichages
322
job75
M
  • Question Question
Microsoft 365 Chercher dernière valeur d'une ligne mais avec une particularité
Réponses
4
Affichages
346
Marie.
M
M
  • Résolu(e)
XL 2021 Copier/Coller des valeurs d’une feuille à une autre à partir d’une cellule
Réponses
11
Affichages
702
MANU64360
M
C
  • Résolu(e)
XL 2021 Reporter la valeur d'une cellule dans le pied de page.
2
Réponses
17
Affichages
304
sylvanu
A
  • Question Question
Microsoft 365 Vérifier si un texte existe dans une cellule contenant une liste
Réponses
9
Affichages
598
arzac
A
C
  • Question Question
XL 2016 récupérer la mise en forme d'une cellule vers une autre cellule
Réponses
1
Affichages
647
TooFatBoy
F
  • Question Question
Autres Récupération de données d'une feuille X en fonction de la valeur de cellule dans une collone d'une feuille Y
2
Réponses
27
Affichages
1 K
fanfan38
F
  • Question Question
Microsoft 365 Vba : copier certaines cellules suivant la valeur d'une autre
Réponses
2
Affichages
297
mapomme
M
  • Question Question
Microsoft 365 Si cellule texte en bleu, alors écrire "virement" dans une autre cellule
Réponses
5
Affichages
240
job75
P
  • Résolu(e)
XL 2021 Comment détecter la modification MANUELLE d'une cellule dans une feuille ?
Réponses
3
Affichages
333
PRy
P
S
  • Résolu(e)
XL 2016 Avis / Aide réécriture code
2 3
Réponses
38
Affichages
1 K
safranien
S
R
  • Résolu(e)
XL 2021 plage de date comprise dans une autre plage de date
Réponses
3
Affichages
260
Ron74
R
Y
  • Résolu(e)
XL 2021 Afficher < dans une cellule Y comportant le report du calcul d'une autre cellule X
Réponses
3
Affichages
181
YGU1
Y
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…