Erreur d'exécution 13
celine31190
Messages postés
21
Statut
Membre
-
f894009 Messages postés 17417 Date d'inscription Statut Membre Dernière intervention -
f894009 Messages postés 17417 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Aprés ce code, j'ai le message
Erreur d'exécution '13'
Incompatibilité de type.
Alors que les autres feuilles ont exactement le même code et ça marche très bien.
Aprés ce code, j'ai le message
Erreur d'exécution '13'
Incompatibilité de type.
Alors que les autres feuilles ont exactement le même code et ça marche très bien.
Option Explicit
Private Sub Worksheet_Activate()
Dim x As Byte
For x = 19 To 46
If Cells(x, 2) = "" Or Cells(x, 2) = 0 Then
Rows(x).EntireRow.Hidden = True 'masque
Else
Rows(x).EntireRow.Hidden = False 'affiche
End If
Next x
End Sub
A voir également:
- Erreur d'exécution 13
- Fifa 13 - Télécharger - Jeux vidéo
- Erreur 4101 france tv - Forum Lecteurs et supports vidéo
- Erreur t32 ✓ - Forum Livebox
- Erreur 3000 france tv - Forum Lecteurs et supports vidéo
- Erreur d'exécution 13 incompatibilité de type ✓ - Forum VB / VBA