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

Macros et VBA Excel Discussion :

Recopie vers le bas jusqu'à une nouvelle valeur [XL-2013]


Sujet :

Macros et VBA Excel

  1. #1
    Membre averti
    Homme Profil pro
    Acheteur Production
    Inscrit en
    Octobre 2010
    Messages
    37
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Gironde (Aquitaine)

    Informations professionnelles :
    Activité : Acheteur Production
    Secteur : Aéronautique - Marine - Espace - Armement

    Informations forums :
    Inscription : Octobre 2010
    Messages : 37
    Par défaut Recopie vers le bas jusqu'à une nouvelle valeur
    Bonjour le forum,

    Pouvez vous me donner un petit coup de main sur Excel, à travers une macro je pense.

    Voici mon soucis, je souhaite recopier des données vers le bas tant que la cellule est vide, puis à la rencontre d'une cellule non vide insérer une ligne vide puis recopier la nouvelle valeurs à son tour vers le bas.

    Petit exemple pratique:

    Ce que j'ai :

    Donnée 01
    Vide
    Vide
    Vide
    Donnée 02
    Vide
    Vide
    Vide
    Vide

    Ce que je souhaite :

    Donnée 01
    Donnée 01
    Donnée 01
    Donnée 01
    Nouvelle ligne vide
    Donnée 02
    Donnée 02
    Donnée 02
    Donnée 02
    Donnée 02
    nouvelle ligne vide

    pouvez vous m'aider ?

    Merci à tous d'avance pour vos réponses

    Grégory

  2. #2
    Membre Expert
    Inscrit en
    Septembre 2007
    Messages
    1 142
    Détails du profil
    Informations forums :
    Inscription : Septembre 2007
    Messages : 1 142
    Par défaut
    Bonjour gregory.d

    une petite macro basique
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    Dim lig As Long, derlig As Long
    derlig = Cells(Rows.Count, 1).End(xlUp).Row +1
    For lig = 2 To derlig
        If Cells(lig, 1).Value = "" Then
            Cells(lig, 1).Value = Cells(lig - 1, 1).Value
        Else
            derlig = derlig + 1
            Cells(lig, 1).Insert
            lig = lig + 1
        End If
    Next lig

  3. #3
    Membre averti
    Homme Profil pro
    Acheteur Production
    Inscrit en
    Octobre 2010
    Messages
    37
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Gironde (Aquitaine)

    Informations professionnelles :
    Activité : Acheteur Production
    Secteur : Aéronautique - Marine - Espace - Armement

    Informations forums :
    Inscription : Octobre 2010
    Messages : 37
    Par défaut
    Bonjour et merci pour ta réponse.

    Je souhaite seulement traiter les colonnes B C D E F de la ligne 8 à 8000

    Peux tu me dire comment ne sélectionner cette plage ?

    Merci

    Grégory

  4. #4
    Membre averti
    Homme Profil pro
    Acheteur Production
    Inscrit en
    Octobre 2010
    Messages
    37
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Gironde (Aquitaine)

    Informations professionnelles :
    Activité : Acheteur Production
    Secteur : Aéronautique - Marine - Espace - Armement

    Informations forums :
    Inscription : Octobre 2010
    Messages : 37
    Par défaut
    C'est tout bon j'ai modifié les lignes dans le code

    Merci pour cette aide

    je clôture le ticket

    A bientôt le forum

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. [XL-2013] Recopie vers le bas et décalage
    Par solorac dans le forum Excel
    Réponses: 4
    Dernier message: 18/06/2015, 14h42
  2. [XL-2007] Tableau - recopie vers le bas d'une formule
    Par aereno dans le forum Excel
    Réponses: 1
    Dernier message: 16/06/2011, 16h06
  3. [XL-2003] Trouver le numéro de la semaine et recopier vers le bas ?
    Par Zebulon777 dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 26/05/2010, 14h18
  4. Réponses: 2
    Dernier message: 05/07/2006, 16h52
  5. [VB et Word] Se déplacer d'une ligne vers le bas...
    Par benj63 dans le forum VBA Word
    Réponses: 7
    Dernier message: 15/03/2006, 09h45

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