IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Excel Discussion :

macro qui transpose "intelligemment"


Sujet :

Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Invité
    Invité(e)
    Par défaut macro qui transpose "intelligemment"
    bonjour
    Novice dans les macros , je viens sur ce forum avec beaucoup d'espoir , ( la transposition intelligente n'est pas mon fort )
    après avoir consulter longuement le forum , je n'ai pas trouvé de macro qui ressemble à ce dont j'ai besoin.

    je vous présente mon problème
    je vous joint le fichier avec ses 2 feuilles comme exemple

    j'ai 1 fichier texte que je "tronçonne" avec excel : c'est la feuille "mon fichier."

    j'ai 1 colonne A ou je veux transposer mes x et y , et des valeurs en colonne B ou je veux faire la même chose
    de temps en temps j'ai un nom que je veux récupérer pour y affecter les dites valeurs.

    comme dans ma feuille "sortie"

    je ne sais pas si je suis clair , je pense que mon fichier en attach le sera plus

    merci de votre aide.
    phil
    Fichiers attachés Fichiers attachés

  2. #2
    Expert éminent Avatar de Menhir
    Homme Profil pro
    Ingénieur
    Inscrit en
    Juin 2007
    Messages
    16 037
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Finistère (Bretagne)

    Informations professionnelles :
    Activité : Ingénieur
    Secteur : Industrie

    Informations forums :
    Inscription : Juin 2007
    Messages : 16 037
    Par défaut
    Citation Envoyé par phil911 Voir le message
    je ne sais pas si je suis clair , je pense que mon fichier en attach le sera plus
    http://www.developpez.net/forums/d84...s-discussions/

    Novice dans les macros
    Est-ce que par "novice", tu sous-entends "je n'y connais rien et j'ai besoin qu'on me livre un truc tout prêt dans lequel je n'aurai rien à toucher" ?
    Si c'est le cas : http://excel.developpez.com/cours/?page=prog

    après avoir consulter longuement le forum , je n'ai pas trouvé de macro
    Ca semble logique puisque tu ne postes pas dans la rubrique macro :
    http://www.developpez.net/forums/f66...ros-vba-excel/

  3. #3
    Invité
    Invité(e)
    Par défaut
    bonjour
    je pensais avoir été poli et avoir écrit en Français

    oui , effectivement je me suis trompé de sous forum
    oui j'ai cherché ma réponse dans le bon sous forum
    oui j'ai lu la charte , et il m'a semblé plus clair de préciser ma demande avec un fichier que j'ai pris le temps de faire
    non , je ne sais pas programmer , mais je connais excel

    oui visiblement je me suis trompé de site , on n'est pas la pour aider les gens
    pourtant j'en parcours des sites ( 1er accueil de ce genre )

    sur ce , salutations

  4. #4
    Expert éminent Avatar de Menhir
    Homme Profil pro
    Ingénieur
    Inscrit en
    Juin 2007
    Messages
    16 037
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Finistère (Bretagne)

    Informations professionnelles :
    Activité : Ingénieur
    Secteur : Industrie

    Informations forums :
    Inscription : Juin 2007
    Messages : 16 037
    Par défaut
    La plupart des participants à ce forum préfèrent simplement ignorer les demandes comme celles que tu as postée.
    Personnellement, je préfère expliquer (sans agressivité ni mépris) à la personne ce qui ne va pas dans son message pour qu'elle ait une chance de se corriger et ainsi avoir plus de chance d'obtenir de l'aide.

    Pour les raisons qui ont été exposées dans le lien que j'ai indiqué, beaucoup n'ouvrent pas les pièces jointes.
    C'est au demandeur d'expliquer clairement et en détail son problème pour qu'il soit compréhensible par des personnes qui sont étrangères à son contexte.
    Ce n'était pas le cas de ta demande.

    Si tu ne souhaites pas la corriger et préfère prendre la mouche pour cette critique, ce n'est pas grave. C'est certainement toi que ça ennuiera le plus.

    Bonne chance pour la suite.

  5. #5
    Invité
    Invité(e)
    Par défaut
    bon ok , j'essaye
    je poste dans la bonne rubrique et je ne met pas le fichier en attaché

  6. #6
    Membre éprouvé Avatar de Klin89
    Profil pro
    Inscrit en
    Octobre 2008
    Messages
    119
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Octobre 2008
    Messages : 119
    Par défaut
    Bonsoir phil911, le forum

    Peut-être commne ça :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    Option Explicit
     
    Sub test()
    Dim myAreas As Areas, myArea As Range, i As Long, n As Long
        Application.ScreenUpdating = False
        Set myAreas = Sheets(1).Columns(2).SpecialCells(2).Areas
        n = 1
        For Each myArea In myAreas
            For i = 1 To myArea.Rows.Count Step 2
                If i = 1 Then
                    Sheets(2).Cells(n, 1).Value = myArea.Cells(1)(0, 0).Value
                End If
                myArea.Cells(i).Resize(2).Copy
                Sheets(2).Cells(n, 2).PasteSpecial Transpose:=True
                n = n + 1
            Next
            n = n + 1
        Next
        Set myAreas = Nothing
        Application.CutCopyMode = False
        Application.ScreenUpdating = True
    End Sub
    klin89

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo