Problème pour passer un tableau en une colonne

Fermé
Fred - Modifié le 7 juin 2018 à 10:56
Fred11400 Messages postés 50 Date d'inscription jeudi 7 juin 2018 Statut Membre Dernière intervention 6 avril 2020 - 8 juin 2018 à 09:47
Bonjour,

J'ai récemment utilisé vos formules pour convertir un tableau en formule mais les valeurs ne correspondent pas tout le temps.

Pourquoi ?

Merci


A voir également:

4 réponses

Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 779
7 juin 2018 à 10:56
Bonjour,

Essaies de mettre un grand miroir face à ton écran pour
qu'on puisse voir à quoi ressemble ton fichier.

Si tu n'as pas de miroir, donnes nous les formules que tu utilises !
0
Fred11400 Messages postés 50 Date d'inscription jeudi 7 juin 2018 Statut Membre Dernière intervention 6 avril 2020
7 juin 2018 à 10:57
=DECALER($A$2;ENT((LIGNES($1:1)-1)/3);(LIGNES($1:1)-1)-ENT((LIGNES($1:1)-1)/3)*3)
0
Fred11400 Messages postés 50 Date d'inscription jeudi 7 juin 2018 Statut Membre Dernière intervention 6 avril 2020
7 juin 2018 à 11:03
En fait j'ai un tableau de 6 colonnes et 8636 lignes et j'aimerais le passer en seule colonne
0
Fred11400 Messages postés 50 Date d'inscription jeudi 7 juin 2018 Statut Membre Dernière intervention 6 avril 2020
7 juin 2018 à 11:07
J'ai essayé ces deux formules mais elles donnent le même résultat

=DECALER($B$1;ENT((LIGNES($1:1)-1)/NBVAL($B$1:$G$1));MOD(LIGNES($1:1)-1;NBVAL($B$1:$G$1)))

=DECALER($B$1;ENT((LIGNES($1:1)-1)/6);(LIGNES($1:1)-1)-ENT((LIGNES($1:1)-1)/6)*6)
0
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 779
Modifié le 7 juin 2018 à 12:58
Re,

Pour un tableau situé en A1:F8636, utiliser la formule (dans une nouvelle colonne, par exemple de H1) :
=DECALER($A$1;MOD(LIGNE()-1;8636);ENT((LIGNE()-1)/8636))

0
Fred11400 Messages postés 50 Date d'inscription jeudi 7 juin 2018 Statut Membre Dernière intervention 6 avril 2020
7 juin 2018 à 13:07
J'ai essayé mais c'est toujours pas les mêmes valeurs
0
Fred11400 Messages postés 50 Date d'inscription jeudi 7 juin 2018 Statut Membre Dernière intervention 6 avril 2020
7 juin 2018 à 13:43
En fait cette formule permet de mettre les colonnes les unes a la suite de la première mais ce n'est pas ce que j'attends

Ce que je voudrais c'est une colonne mais qui fasse: A1
B1
C1
D1
E1
F1
A2
B2
....
F8636
0
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 779
7 juin 2018 à 13:45
Les mêmes valeurs que quoi ????

Exemple :
https://mon-partage.fr/f/gGNEfa2y/
0
Fred11400 Messages postés 50 Date d'inscription jeudi 7 juin 2018 Statut Membre Dernière intervention 6 avril 2020
7 juin 2018 à 14:09
En fait cette formule permet de mettre les colonnes les unes a la suite de la première mais ce n'est pas ce que j'attends

Ce que je voudrais c'est une colonne mais qui fasse:
A1
B1
C1
D1
E1
F1
A2
B2
....
F8636
0
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 779
7 juin 2018 à 14:16
Bonjour,

Il suffit d'inverser le sens de lecture du tableau :
=DECALER($A$1;ENT((LIGNE()-1)/6);MOD(LIGNE()-1;6))
0
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 779
7 juin 2018 à 17:18
Re,

Il y a effectivement toutes les lignes, je ne sais pas comment tu fait l'extraction vers Excel.
Une méthode dans ce fichier :
https://mon-partage.fr/f/7Eyny0dG/
0
Fred11400 Messages postés 50 Date d'inscription jeudi 7 juin 2018 Statut Membre Dernière intervention 6 avril 2020
7 juin 2018 à 18:24
J'ai utilisé un convertisseur en ligne
0
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 779
7 juin 2018 à 21:02
Lequel ?
0
Fred11400 Messages postés 50 Date d'inscription jeudi 7 juin 2018 Statut Membre Dernière intervention 6 avril 2020
7 juin 2018 à 21:15
I love PDF il me semble
0
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 779
7 juin 2018 à 21:24
Effectivement, je viens d'essayer, il manque des lignes !!!!
Avec https://convertio.co/fr/pdf-xls/ tu as toutes les lignes.
Il n'y a plus qu'à supprimer celles qui sont superflues avec la méthode que je t'ai donné.
0
Fred11400 Messages postés 50 Date d'inscription jeudi 7 juin 2018 Statut Membre Dernière intervention 6 avril 2020
7 juin 2018 à 21:26
D'accord merci beaucoup
0
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 779
7 juin 2018 à 22:21
Tu peux automatiser la procédure à partir du fichier converti sur convertio avec cette macro

Sub Test()

  Worksheets("Worksheet").Copy Before:=Worksheets(1)
  With Worksheets(1)
    .Rows("1:1").Delete
    .UsedRange.TextToColumns Destination:=.Range("A1"), DataType:=xlDelimited, _
                             TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=True, _
                             FieldInfo:=Array(Array(1, 4))
    .Range("A1").Sort Key1:=.Range("A1"), Order1:=xlAscending, _
                      Key2:=.Range("B1"), Order2:=xlAscending, Header:=xlNo
    .Rows("8761:9999").Delete
    .Range("K1:K52560").FormulaR1C1 = "=OFFSET(R1C3,INT((ROW()-1)/6),MOD(ROW()-1,6))"
    .Range("J1").Formula = .Range("A1").Text & " 00:00"
    .Range("J2").Formula = .Range("A1").Text & " 00:10"
    .Range("J1:J2").AutoFill Destination:=.Range("J1:J52560")
    .Columns.AutoFit
  End With
    
End Sub
0
Fred11400 Messages postés 50 Date d'inscription jeudi 7 juin 2018 Statut Membre Dernière intervention 6 avril 2020
7 juin 2018 à 22:22
Je n'ai jamais créer de macro sur excel
0
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 779
Modifié le 7 juin 2018 à 22:30
C'est jamais trop tard pour commencer ...
... mais l'apprentissage est assez long.
Un excellent cours pour débutant :
ftp://ftp-developpez.com/bidou/Cours/VBA/formationVBA.pdf
0
Fred11400 Messages postés 50 Date d'inscription jeudi 7 juin 2018 Statut Membre Dernière intervention 6 avril 2020
7 juin 2018 à 22:37
D'accord merci
0
Fred11400 Messages postés 50 Date d'inscription jeudi 7 juin 2018 Statut Membre Dernière intervention 6 avril 2020
8 juin 2018 à 08:53
Salut

Une fois que tu as converti le fichier avec convertio, comment tu fais pour séparer toutes les valeurs de la colonne A ?
0
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 779
8 juin 2018 à 09:34
Bonjour,

- Soit tu appliques rigoureusement la procédure manuelle qui est détaillée dans le fichier du post 25
- Soit tu copies la macro ci-dessus dans un module standard et tu l'exécutes.

Cdlt
Patrice
0