yoarf
Messages postés215Date d'inscriptionjeudi 19 décembre 2002StatutMembreDernière intervention19 février 2009
-
8 juin 2004 à 12:00
Renfield
Messages postés17287Date d'inscriptionmercredi 2 janvier 2002StatutModérateurDernière intervention27 septembre 2021
-
8 juin 2004 à 12:08
Bonjour,
Je développe sous VBA Excel. Je veux pouvoir dans mon document Excel tester si une feuille (de nom APPSP par exemple) existe (est une worksheet en fait).
En fait je veux faire ça :
if Worksheets("APPSP") existe then
Renfield
Messages postés17287Date d'inscriptionmercredi 2 janvier 2002StatutModérateurDernière intervention27 septembre 202172 8 juin 2004 à 12:06
tu peux utiliser la fonction suivante
Function SheetExist(ByRef Name As String) As Boolean
On Error GoTo DontExists
SheetExist = Not Worksheets(Name) Is Nothing
Exit Function
DontExists:
End Function
Renfield
Messages postés17287Date d'inscriptionmercredi 2 janvier 2002StatutModérateurDernière intervention27 septembre 202172 8 juin 2004 à 12:08
ou une version qui ne fonctionne pas avec la gestion d'erreurs...
Function SheetExist(ByRef Name As String) As Boolean
Dim i As Integer
For i = 1 To Worksheets.Count
If StrComp(Worksheets(i).Name, Name, vbTextCompare) = 0 Then
SheetExist = True
Exit Function
End If
Next i
End Function