VBA problème avec méthode Range pour graphique avec plages disctoninues et variable

  • Initiateur de la discussion Initiateur de la discussion chagro
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

chagro

XLDnaute Nouveau
Bonjour, je bloque depuis plusieurs jours sur ce problème:


Private Sub Graphique_Click()

'déclaration des variables

Dim an As String
Dim genre As String
Dim ligne As String
Dim lignebis As String
'corps du texte

'on choisit l'année
an = Annee.Value

'on choisit l'espèce
genre = espece.Value

'on associe pour chaque année l'IPA (abondance) correspondant à l'espèce selon la distance au foyer
If an = 1989 Then
'on sélectionne la feuille de l'année 1989
Sheets("1989").Select
'on sélectionne la cellule contenant le nom de l'espèce
Cells.Find(What:=genre, After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Activate
' on veut faire graphique de l'espèce

ligne = ActiveCell.Offset(2, 0).Address
lignebis = ActiveCell.End(xlDown).Address

Range("D4😀201,""ligne:" & "lignebis""").Select

quand je lance le programme il me dit qu'il y a un problème avec la méthode range. J'ai essayé différentes syntaxes, mais aucune n'a marché. Et je n'ai rien trouvé sur le forum.

Avez vous une idée ou une piste ou alors faut il utiliser une autre méthode et si oui laquelle?

Merci
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Retour