INDEX + EQUIV Le sujet est résolu

Y compris Power BI, Power Query et toute autre question en lien avec Excel
s
sophiane
Jeune membre
Jeune membre
Messages : 39
Inscrit le : 11 mars 2016
Version d'Excel : 2003

Message par sophiane » 23 mars 2016, 18:46

En fait c'est plus compliqué que ca jai realisé une macro qui me copie x fois la valeur de chaque cellule de la colonne A

X represente un nombre variable aussi

Exemple feuille 1

A1 B1
toto 10
soso 12
rara 8


Resultat en feuille 2 cellule A1
toto de A1 a A10
soso de A11 a A22
sachant quen feuille 1 colonne A il sagit de resultat de resultat de formule du coup quand je recopie en macro il me renvoi une erreur car formule et non texte
s
sophiane
Jeune membre
Jeune membre
Messages : 39
Inscrit le : 11 mars 2016
Version d'Excel : 2003

Message par sophiane » 24 mars 2016, 10:17

bonjour Steelson,

comment vas-tu ?peux-tu me dire comment copier toutes les valeurs à partir d'une colonne E jusqu'a X colonne (plage variable) mais en recopiant aussi les doublons

tu m'avais donné ce code qui fonctionne parfaitement mais qui supprime les doublons

Dim References As Object
Set References = CreateObject("Scripting.Dictionary")
Sheets("SIMULATEUR").Select
lig = Range("E5").Row
col = Range("E5").Column
Do Until Cells(lig, col).Value = ""
Do Until Cells(lig, col).Value = ""
References(Cells(lig, col).Value) = Cells(lig, col).Value
col = col + 1
Loop
col = Range("E5").Column
lig = lig + 1
Loop
Sheets("TEST").Select
Columns("B:B").ClearContents
Range("B1") = "MATIERE"
Cells(Range("B2").Row, Range("B2").Column).Resize(References.Count) = Application.Transpose(References.Items)
Répondre Sujet précédentSujet suivant
  • Sujets similaires
    Réponses
    Vues
    Dernier message
  • index et equiv
    par TouToune » 7 août 2015, 17:22 » dans Excel - VBA
    3 Réponses
    156 Vues
    Dernier message par TouToune
    9 août 2015, 19:50
  • Index/equiv ? #N/A
    par pika83 » 30 novembre 2019, 14:16 » dans Excel - VBA
    9 Réponses
    86 Vues
    Dernier message par xorsankukai
    30 novembre 2019, 17:09
  • INDEX-EQUIV
    par lucie1206 » 25 octobre 2016, 14:41 » dans Excel - VBA
    5 Réponses
    228 Vues
    Dernier message par Steelson
    26 octobre 2016, 16:48
  • Index + equiv
    par ruliann » 18 avril 2018, 13:18 » dans Excel - VBA
    3 Réponses
    259 Vues
    Dernier message par ruliann
    20 avril 2018, 17:46
  • Index Equiv N/A
    par PEEMEH » 3 octobre 2019, 16:30 » dans Excel - VBA
    5 Réponses
    81 Vues
    Dernier message par tulipe_4
    8 octobre 2019, 13:43
  • Index Equiv
    par Botis » 23 octobre 2019, 15:17 » dans Excel - VBA
    6 Réponses
    74 Vues
    Dernier message par Botis
    23 octobre 2019, 18:32