Excel : VBA - Erreur 424
Résolu
JBR
-
JBR -
JBR -
Bonjour,
J'essai de faire fonctionner une macro qui en appelle une autre avec pour objectif de pouvoir appeler plusieurs dizaines de macro. Cela me permettra à terme de ne plus avoir l'erreur de macro trop longue.
Hors en essayant, j'ai une erreur 424 qui apparaît. Voici la macro :
Sub Worksheet_Change(ByVal Target As Range)
With Sheets("CBF")
Dim AuditPieuvre As Variant
AuditPieuvre = ("E32")
Call Auditorium(AuditPieuvre)
End With
End Sub
Sub Auditorium(ByVal Target As Variant)
If AuditPieuvre = "Bur/Pieuvre" Then
ActiveSheets.Rows("61:67").Hidden = True
ElseIf AuditPieuvre <> "Bur/Pieuvre" Then
ActiveSheets.Rows("61:67").Hidden = False
End If
End Sub
Quand l'erreur apparaît, c'est sur la ligne : ActiveSheets.Rows("61:67").Hidden = False
Auriez-vous une idée ?
Merci beaucoup.
J'essai de faire fonctionner une macro qui en appelle une autre avec pour objectif de pouvoir appeler plusieurs dizaines de macro. Cela me permettra à terme de ne plus avoir l'erreur de macro trop longue.
Hors en essayant, j'ai une erreur 424 qui apparaît. Voici la macro :
Sub Worksheet_Change(ByVal Target As Range)
With Sheets("CBF")
Dim AuditPieuvre As Variant
AuditPieuvre = ("E32")
Call Auditorium(AuditPieuvre)
End With
End Sub
Sub Auditorium(ByVal Target As Variant)
If AuditPieuvre = "Bur/Pieuvre" Then
ActiveSheets.Rows("61:67").Hidden = True
ElseIf AuditPieuvre <> "Bur/Pieuvre" Then
ActiveSheets.Rows("61:67").Hidden = False
End If
End Sub
Quand l'erreur apparaît, c'est sur la ligne : ActiveSheets.Rows("61:67").Hidden = False
Auriez-vous une idée ?
Merci beaucoup.
A voir également:
- Excel : VBA - Erreur 424
- Liste déroulante excel - Guide
- Word et excel gratuit - Guide
- Déplacer colonne excel - Guide
- Si ou excel - Guide
- Excel moyenne - Guide
ActiveSheets.Rows("61:67").Hidden = True
En tout cas, merci de cette idée à laquelle je n'avais pas pensée.
ActiveSheet.Rows pas de s a ActiveSheet
AuditPieuvre est une variable locale de la subroutine Worksheet_Change
Vous passez AuditPieuvre en parametre, ce qui se traduit par le parametre Target pour la subroutine Auditorium