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 :

Selection range en référence absolue & Argument d'une function prédéfini


Sujet :

Macros et VBA Excel

  1. #1
    Membre averti
    Inscrit en
    Octobre 2008
    Messages
    12
    Détails du profil
    Informations forums :
    Inscription : Octobre 2008
    Messages : 12
    Par défaut Selection range en référence absolue & Argument d'une function prédéfini
    Bonjour à tous,

    J'ai plusieurs soucis :

    (1) est-ce possible d'utiliser une variable comme numéro de ligne. J'ai compteur qui varie en fonction d'un nombre de données entre par l'utilisateur et ensuite j'aimerais récupérer un tableau du même nombre de ligne. En l'occurence mon code donne :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Set maplageStoSlow = Range("F20;F&""I")
    avec I défini avant gràce à un compteur.. ou bien devrait mettre : I.Value..?

    (2) Est-il possible d'utiliser la référence absolue en VBA avec une macro qui effectue un calcul dans toute une colonne? Mon code donne ca :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
     
    For Each Cellule In maplageStoSlow
    Set Base = Range("L(-5)C(-13):L(-2)C(0)")
    Cellule.Value = Application.Run(Sto(Base))
    Next Cellule
    mais j'ai deux problème. En fait la plage selectionnée est de taille constante, càd de 14 lignes et 3 colonnes en haut à gauche de la cellule ou j'effectue le calcul, mais le cadre doit se déplacer en même temps que j'avance dans les celuules de maplagestoslow...

    (3) Deuxièmement toujours dans ce code, j'utilise une fonction qui demande un argument mais j'aimerais automatisé celui-ci... Est-ce possible de spécifié l'argument avant de lancé la fonction comme j'ai essayé de le faire?

    Merci d'avance pour vos réponses... En espérant que ca va pas rebuter tout le monde!

    PS : si il faut je peux envoyer le fichier excel pour que ce soit plus compréhensible...

    ++

  2. #2
    Membre Expert
    Profil pro
    Inscrit en
    Juillet 2007
    Messages
    2 130
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2007
    Messages : 2 130
    Par défaut
    Salut sunstrike69 et le forum
    (1) est-ce possible d'utiliser une variable comme numéro de ligne : Oui. Moi je les déclare en Long, pour nr pas avoir de plantage en cas de ligne dépassant les 32767.
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Set maplageStoSlow = Range("F20;F&""I")
    syntaxe correcte

    (2) Est-il possible d'utiliser la référence absolue en VBA avec une macro qui effectue un calcul dans toute une colonne? Mon code donne ca :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    For Each Cellule In maplageStoSlow
    Set Base = Range("L(-5)C(-13):L(-2)C(0)")
    Cellule.Value = Application.Run(Sto(Base))
    Next Cellule
    ??? c'est du pseudo relatif ??? explique ce que tu veux faire. N'utilisant pas Excel en L1C1, je ne suis pas sûr de la justesse de définition de ton range.
    mais j'ai deux problème. En fait la plage selectionnée est de taille constante, càd de 14 lignes et 3 colonnes en haut à gauche de la cellule ou j'effectue le calcul, mais le cadre doit se déplacer en même temps que j'avance dans les celuules de maplagestoslow..
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    For Each Cellule In maplageStoSlow
    Set Base = Range(Cellule.offset(-13,-2),Cellule)
    Cellule.Value = Sto(Base)
    Next Cellule
    Base = cellule à celle située à 13 lignes vers le haut et 2 colonnes à gauche. (soit 14 lignes et 3 colonnes)
    Mais c'est du relatif, pas de l'absolu : toutes les cellules désignées par range, cells ou [] sont en adressage absolu
    Range("$A$1") et Range("A1") ont la même signification en VBA

    (3) Deuxièmement toujours dans ce code, j'utilise une fonction qui demande un argument mais j'aimerais automatisé celui-ci... Est-ce possible de spécifié l'argument avant de lancé la fonction comme j'ai essayé de le faire?
    Je pense avoir répondu, si STO est bien ta fonction
    A+

  3. #3
    Membre averti
    Inscrit en
    Octobre 2008
    Messages
    12
    Détails du profil
    Informations forums :
    Inscription : Octobre 2008
    Messages : 12
    Par défaut
    J'ai pu m'en tirer avec ce que tu m'as donné, notamment le "offset". Et j'ai laissé tombé la référence relative, ca posait trop de problèmes.

    Bref, merci

  4. #4
    Invité de passage
    Homme Profil pro
    excel
    Inscrit en
    Janvier 2018
    Messages
    1
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 40
    Localisation : Congo-Kinshasa

    Informations professionnelles :
    Activité : excel

    Informations forums :
    Inscription : Janvier 2018
    Messages : 1
    Par défaut convertir une référence relative enréférence absolue
    j'aimerais convertir une référence relative enréférence absolue

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

Discussions similaires

  1. Réponses: 5
    Dernier message: 21/03/2012, 18h12
  2. passage par référence d'un argument optionnel
    Par geeksideofme dans le forum Langage
    Réponses: 7
    Dernier message: 30/11/2009, 17h34
  3. Réponses: 4
    Dernier message: 24/02/2008, 21h16
  4. Réponses: 17
    Dernier message: 24/11/2006, 18h25
  5. [VBA-W] Trouver le numero de Page d'une Selection (range)
    Par SfJ5Rpw8 dans le forum Contribuez
    Réponses: 2
    Dernier message: 08/09/2006, 19h34

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