Lier des colonnes en VBA

Résolu
lilounice Messages postés 33 Statut Membre -  
lilounice Messages postés 33 Statut Membre -
Bonjour,

J'aimerais faire une check box qui lorsqu'elle est activée lie les plages A6:A60 et B6:B60.
Lorsque vraie le contenu de Ax et Bx sont obligatoirement le même
Si possible seulement si Bx= vide (si non garde l'ancienne valeur)
Lorsque fausse rien

J'ai trouvé des posts pour lier le contenu de cellules mais pas de colonnes vers une autre colonne

Merci d'avance pour votre aide !

1 réponse

  1. via55 Messages postés 14393 Date d'inscription   Statut Membre Dernière intervention   2 759
     
    Bonjour

    Code de la macro à lancer par un bouton ou en mettant le nom de la macro dans le code de la case à cocher
    Sub liaison()
    For n = 6 To 60
    If Range("B" & n) = "" Then Range("B" & n).FormulaR1C1 = "=RC[-1]"
    Next
    End Sub


    Code lié à la Chekbox :
    Private Sub CheckBox1_Click()
    If CheckBox1.Value = True Then liaison
    End Sub


    Cdlmnt
    Via
    0
    1. lilounice Messages postés 33 Statut Membre 1
       
      Merci ta solution fonctionne bien
      Juste je n'avais pas précisé que A et B ne se trouvent pas sur la même feuille
      Je trouve pas à quelle endroit je dois indiquer la feuille de la colonne A pour que RC renvoie à la bonne feuille

      En tous cas merci
      0
      1. via55 Messages postés 14393 Date d'inscription   Statut Membre Dernière intervention   2 759 > lilounice Messages postés 33 Statut Membre
         
        Pourtant tu as fait ce qui fallait
        Sauf si ta Feuille 1 ne s'appelle pas Feuil1 !!
        mettre le bon nom dans la macro à la place de Feuil1

        Si tu rencontres encore un problème postes ton fichier sur cjoint.com et reviens indiquer ici le lien alors fourni, je regarderai ça

        Cdlmnt
        Via
        0
    2. lilounice Messages postés 33 Statut Membre 1
       
      j'ai essayer en mettant
      FormulaR1C1 = "=Feuil1! RC[-1]"
      Mais ça m'ouvre une boite de dialogue pour que je lui indique l'emplacement de "Feuil1"
      0
    3. lilounice Messages postés 33 Statut Membre 1
       
      en effet j'ai essayé sur un nouveau classeur et ça fonctionne bien,
      Je ne comprend pas d'ou vient le problème j'ai essayé tous les noms de la feuille...
      0
    4. lilounice Messages postés 33 Statut Membre 1
       
      Bon j'ai renomé la feuille et ça a marché! donc merci
      0