Référence à une cellule nommée dans une macro Résolu/Fermé

Question

Bonjour,

Voici ma question:

Afin d'éviter les problèmes de non fonctionnalité d'une macro, j'ai nommée ma cellule par un nom.
Je veux ensuite prendre cette cellule comme référence pour appliquer la macro au bon endroit.
Je mets les lignes de code que j'ai écrite jusqu'à maintenant afin que ca soit parlant.

Sub Test()

If Range("Test").Value = "Test" Then
 Range("A5:A10").Select
    With Selection
        .Value = "Voila"
    End With
End If
End Sub

Ce que je veux donc faire c'est simplement remplacé Range("A5:A10") par quelque chose du genre Range("Test+1: Test+10") (si on considère que Test est le nom de la cellule A4).
Avez-vous quelque chose à me proposer?

Merci d'avance

michel_m · Answer

bonjour,

si j'ai bien pigé, tu veux sélectionner les 11 cellules en dessous de ta sélection ?

dim lig as long
lig=range("test").row

with range(cells(lig+1,1),cells(lig+10,1))
.value= "voila"
end with

Les "select-selection sont inutiles, bouffent de la mémoire et ralentissent considérablement la macro.

en espérant que...
Michel

flinst02 · Answer

Bonjour,

Merci bien pour la réponse. C'est en effet, ce que je recherchais.

Référence à une cellule nommée dans une macro

2 réponses

Discussions similaires