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 :

lignes et colonnes


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre éclairé
    Homme Profil pro
    retraité
    Inscrit en
    Novembre 2002
    Messages
    391
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Meurthe et Moselle (Lorraine)

    Informations professionnelles :
    Activité : retraité
    Secteur : Santé

    Informations forums :
    Inscription : Novembre 2002
    Messages : 391
    Par défaut lignes et colonnes
    Bonjour,

    J'ai défini les lignes et colonnes suivantes (pour première et dernière) :

    LignePrem
    LigneDern
    ColPrem
    ColDern

    Je n'arrive pas sélectionner une plage délimitée par ces variables de lignes et de colonnes.
    Faut-il utiliser Range ou Cells ?
    Je suis en panne. Tout ce que j'essaie ne marche pas.
    Y a_t_il un tuto bien détaillé pour apprendre les bonnes utilisations de Range et de Cells

    Merci si vous pouvez m'aider.

  2. #2
    Expert confirmé
    Avatar de Qwazerty
    Homme Profil pro
    La très haute tension :D
    Inscrit en
    Avril 2002
    Messages
    4 125
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 45
    Localisation : France

    Informations professionnelles :
    Activité : La très haute tension :D
    Secteur : Service public

    Informations forums :
    Inscription : Avril 2002
    Messages : 4 125
    Par défaut
    Salut
    alors dans ce cas il faut utiliser... roulement de tambour ...les 2

    Ca doit donner un truc comme ca

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    With Sheets("Feuil1") 'il faut toujours bien preciser sur quelle feuille tu travailles
        .Range(.Cells(LignePrem, ColPrem), .Cells(LigneDern, ColDern)).Select 'je met le select pour exemple, mais bien sur il faut l'éviter
        'Concrétement on veut un range
            'qui part de la cellule 1erLigne, 1ercolonne (represente le coin superieur gauche)
            'et qui va a la cellule derLigne derColonne (inferieur droit)
    End With
    Pour déterminer une telle zone il est, ou peut être, utile de connaitre les fonctions suivantes
    End() lié a l'object range (cells et aussi un object range)
    UsedRange lié a l'object sheet
    Rows.count qui permet de connaitre le nombre de ligne maxi que peut contenir un tableau excel indépendamment de la version utilisé

    Si tu ne t'y retrouves pas trop dis le je te posterais un exemple

    A++
    Qwaz

    MagicQwaz := Harry Potter la baguette en moins
    Le monde dans lequel on vit
    Ma page perso DVP
    Dernier et Seul Tutoriel : VBA & Internet Explorer
    Dernière contribution : Lien Tableau Structuré et UserForm
    L'utilisation de l’éditeur de message

  3. #3
    Membre éclairé
    Homme Profil pro
    retraité
    Inscrit en
    Novembre 2002
    Messages
    391
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Meurthe et Moselle (Lorraine)

    Informations professionnelles :
    Activité : retraité
    Secteur : Santé

    Informations forums :
    Inscription : Novembre 2002
    Messages : 391
    Par défaut
    Merci Qwazerty, tu es très gentil.
    En effet, ça n'est pas tout simple.

    Ça ne marche pas.
    J'ai le message :

    Erreur définie par l'application ou par l'objet.
    J'ai bien recopié ton modèle, en changeant évidemment le nom de la feuille.
    J'ai vérifié que toute mes définitions fonctionnaient.
    Pourquoi tu n'aimes pas le 'Select', parce que je voudrais sélectionner cette plage.

    A++

  4. #4
    Expert confirmé
    Avatar de Qwazerty
    Homme Profil pro
    La très haute tension :D
    Inscrit en
    Avril 2002
    Messages
    4 125
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 45
    Localisation : France

    Informations professionnelles :
    Activité : La très haute tension :D
    Secteur : Service public

    Informations forums :
    Inscription : Avril 2002
    Messages : 4 125
    Par défaut
    Met ici ton code, afin que je puisse voir ce que tu souhaite faire.
    Si je dis ne pas aimer le Select, c'est qu'il n'est pas utile de sélectionner une plage de cellule pour modifier leur contenu ou leur apparence. Le seule cas ou le select est utile a mon gout, est lorsque tu veux montrer une plage de cellule a l'utilisateur.
    ++
    Qwaz

    MagicQwaz := Harry Potter la baguette en moins
    Le monde dans lequel on vit
    Ma page perso DVP
    Dernier et Seul Tutoriel : VBA & Internet Explorer
    Dernière contribution : Lien Tableau Structuré et UserForm
    L'utilisation de l’éditeur de message

  5. #5
    Membre éclairé
    Homme Profil pro
    retraité
    Inscrit en
    Novembre 2002
    Messages
    391
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Meurthe et Moselle (Lorraine)

    Informations professionnelles :
    Activité : retraité
    Secteur : Santé

    Informations forums :
    Inscription : Novembre 2002
    Messages : 391
    Par défaut
    Voici le code d'essi:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
     
    Sub macroprov()
        Sheets("tr01").Select
        MsgBox ("xxxx")  ' un controle
        With Sheets("tr01") 'il faut toujours bien preciser sur quelle feuille tu travailles
            .Range(.Cells(LignePrem, ColPrem), .Cells(LigneDern, ColDern)).Select 'je met le select pour exemple, mais bien sur il faut l'éviter
            'Concrétement on veut un range
            'qui part de la cellule 1erLigne, 1ercolonne (represente le coin superieur gauche)
            'et qui va a la cellule derLigne derColonne (inferieur droit)
        End With
     End Sub

  6. #6
    Expert confirmé
    Avatar de Qwazerty
    Homme Profil pro
    La très haute tension :D
    Inscrit en
    Avril 2002
    Messages
    4 125
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 45
    Localisation : France

    Informations professionnelles :
    Activité : La très haute tension :D
    Secteur : Service public

    Informations forums :
    Inscription : Avril 2002
    Messages : 4 125
    Par défaut
    Salut
    Alors, dans ton code a quoi correspondent LignePrem, ColPrem,LigneDern et ColDern, je ne vois leur definition null part, comment les déclares tu et surtout comment les déterminent tu ?

    A++
    Qwaz

    MagicQwaz := Harry Potter la baguette en moins
    Le monde dans lequel on vit
    Ma page perso DVP
    Dernier et Seul Tutoriel : VBA & Internet Explorer
    Dernière contribution : Lien Tableau Structuré et UserForm
    L'utilisation de l’éditeur de message

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

Discussions similaires

  1. [T-SQL] Convertir des lignes en colonne
    Par cortex93 dans le forum Langage SQL
    Réponses: 1
    Dernier message: 07/12/2005, 16h17
  2. Supprimer toutes les lignes et colonnes d'un tableau
    Par pekka77 dans le forum Général JavaScript
    Réponses: 8
    Dernier message: 01/12/2005, 11h26
  3. Tableau 5 lignes * 3 colonnes
    Par slackjayo dans le forum Algorithmes et structures de données
    Réponses: 4
    Dernier message: 05/04/2005, 11h27
  4. Demande de conseil pour migration de lignes vers colonnes
    Par ririd dans le forum Administration
    Réponses: 6
    Dernier message: 04/11/2004, 17h02
  5. [TSynMemo] Positionnement par ligne et colonne
    Par Mercilius dans le forum Composants VCL
    Réponses: 9
    Dernier message: 16/04/2003, 16h22

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