Excel- VBA- pb avec coordonnée dans Range()

Résolu
mod77 Messages postés 1320 Date d'inscription   Statut Membre Dernière intervention   -  
mod77 Messages postés 1320 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

J'ai un petit pb dans cette formule:

If Application.Intersect(ActiveCell, Range("B3:E8")) Is Nothing Then
MsgBox "Sélection hors zone impossible"

Mon pb est sur le code Range, alors peu importe ce que fait cette formule je pense.

Range("B3:E8") : ceci définit une zone FIGEE d'une feuille, mais moi ma zone est variable et dépend d'un nombre situé en [A1]. J'ai essayé Range("B3:" & "A1") mais c'est pas bon.

Qui peut me dire comment réécrire cette formule correctement SVP?
Configuration: Windows XP
Excel 2002 SP-2

3 réponses

  1. pilas31 Messages postés 1878 Statut Contributeur 648
     
    Bonjour,

    Une bonne syntaxe est :

    Range("B3:" & Range("A1").Value)

    A condition que dans A1 ce soit une cellule texte qui contienne "F5" par exemple. C'est à dire la lettre de la colonne et le numéro de la ligne.

    A+
    0
  2. mod77 Messages postés 1320 Date d'inscription   Statut Membre Dernière intervention   53
     
    Bonjour,

    Non en fait A1 contient uniquement le numéro de la ligne de ma zone variable.
    Donc ceci marchera-t-il ?
    Range("B3:E" & Range("A1").Value)
    j'essaie.

    Merci.
    0
    1. pilas31 Messages postés 1878 Statut Contributeur 648
       
      Oui dans ce cas c'est correct.
      0
  3. mod77 Messages postés 1320 Date d'inscription   Statut Membre Dernière intervention   53
     
    Super ça a marché!

    Merci Pilas31
    0