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 :

FormulaR1C1 Problème variable par rapport à la valeur d'une cellule


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Candidat au Club
    Homme Profil pro
    Lycéen
    Inscrit en
    Juillet 2016
    Messages
    2
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 28
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Lycéen

    Informations forums :
    Inscription : Juillet 2016
    Messages : 2
    Par défaut FormulaR1C1 Problème variable par rapport à la valeur d'une cellule
    Salut, je cherche depuis un moment mais je ne trouve pas comment faire. J'aimerais remplacer C" & 1 + variable_calendrier & " par C " address d'une cellule " pour que la formule qui s'écrit dans la cellule change lorsque la cellule cible change sans relancer le code. J'ai tenté avec INDIRECT mais je pense que je n'ai pas la bonne facon de l'écrire. Si quelqu'un à une idée. (Le but étant vraiment d'avoir une formule dont la colonne dépend de la valeur d'une cellule est qui me permettent de l'adapter en fonction d'elle sans relancer un code vba par un event _change)


    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
     
                        For Each cell In Range(Cells(i, 2), Cells(i, 2 + 30))
                            If Cells(1, 1).Value > 0 Then
                              cell.FormulaR1C1 = "=if('" & Sheets(j).name & "'!R[" & lign_form & "]C" & 1 + variable_calendrier & "="""","""",""C"")"
                              cell.Interior.ColorIndex = 24
                                If cell.Value = "C" Then
                                    cell.Interior.ColorIndex = 3
                                End If
                            End If
                            ligne = ligne + 1
                        Next

  2. #2
    Expert confirmé

    Homme Profil pro
    Curieux
    Inscrit en
    Juillet 2012
    Messages
    5 169
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Curieux
    Secteur : Arts - Culture

    Informations forums :
    Inscription : Juillet 2012
    Messages : 5 169
    Billets dans le blog
    5
    Par défaut
    Bonjour,

    en notation R1C1, ce qui suite après le R et après le C n'est pas une adresse mais un décalage par rapport à la cellule qui portera la formule.

    donc tu ne pourrais pas y intégrer un .Address comme tu les demandes

    peux-tu plutôt nous présenter un exemple de la formule telle qu'elle serait écrite dans une cellule, en précisant :

    - les coordonnées de la cellule qui porte la formule
    - les autres cellules qui rentrent en jeu dans cette formule, ainsi que la valeur qu'elles contiennent

  3. #3
    Candidat au Club
    Homme Profil pro
    Lycéen
    Inscrit en
    Juillet 2016
    Messages
    2
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 28
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Lycéen

    Informations forums :
    Inscription : Juillet 2016
    Messages : 2
    Par défaut
    =SI(INDIRECT("rz_er!"&CAR(64+13+C1)&COLONNE(B13)+6)="";"";"C") est ce que je dois coder en vba

    Avec C1 le mois et B13 la cellule actuelle.

    Ainsi quand je passe d'une colonne a une autre COLONNE(X) s'incrémente pour récupérer dans l'autre tableau la valeur correspondante, et C1 lui correspond au mois choisi par l'utilisateur (allant de 1 a 12) Le +13 correspond à la constante pour être a la bonne colonne au début

Discussions similaires

  1. Réponses: 2
    Dernier message: 13/09/2014, 15h57
  2. [XL-2010] Rechercher et récupérer le nom d'un fichier par rapport à la valeur d'une cellule
    Par froggy39 dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 11/07/2014, 11h15
  3. [XL-2007] Liaison entre classeurs par rapport à la valeur d'une cellule
    Par XceSs dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 24/04/2013, 14h30
  4. [PEAR] Initialisation d'une variable par rapport à la structure d'une table
    Par Katachana dans le forum Bibliothèques et frameworks
    Réponses: 2
    Dernier message: 22/01/2008, 11h12
  5. Réponses: 5
    Dernier message: 10/12/2007, 15h24

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