Débutant [VB pour XL] test de l'existence d'un page
Résolu
Magicien Blanc
Messages postés
78
Date d'inscription
lundi 25 juillet 2005
Statut
Membre
Dernière intervention
22 août 2010
-
8 août 2005 à 19:32
Magicien Blanc Messages postés 78 Date d'inscription lundi 25 juillet 2005 Statut Membre Dernière intervention 22 août 2010 - 8 août 2005 à 22:19
Magicien Blanc Messages postés 78 Date d'inscription lundi 25 juillet 2005 Statut Membre Dernière intervention 22 août 2010 - 8 août 2005 à 22:19
A voir également:
- Débutant [VB pour XL] test de l'existence d'un page
- Exemple de page d'authentification - Conseils pratiques -PHP
- Test technique java - Conseils pratiques -C# / .NET
- Plan de test exemple excel ✓ - Forum Visual Basic 6
- Page d'inscription - Forum PHP
- Vb vba - Forum Visual Basic
2 réponses
Magicien Blanc
Messages postés
78
Date d'inscription
lundi 25 juillet 2005
Statut
Membre
Dernière intervention
22 août 2010
8 août 2005 à 22:19
8 août 2005 à 22:19
Je te remercie galopin01 ! Je connaissais pas le If not et le "on error resume next". En plus d'être plus court, ça me fait apprendre des choses !!
galopin01
Messages postés
133
Date d'inscription
lundi 4 octobre 2004
Statut
Membre
Dernière intervention
14 octobre 2011
1
8 août 2005 à 22:14
8 août 2005 à 22:14
Bonsoir,
Sub Test()
Dim Y As Boolean
On Error Resume Next
Y = Sheets("Archive").Index
If Not Y Then
Sheets.Add.Name = "Archive"
Sheets("Archive").Move After:=Sheets("Dépenses - Disponible")
End If
End Sub
A+
Sub Test()
Dim Y As Boolean
On Error Resume Next
Y = Sheets("Archive").Index
If Not Y Then
Sheets.Add.Name = "Archive"
Sheets("Archive").Move After:=Sheets("Dépenses - Disponible")
End If
End Sub
A+
