Discussion :

[Raphael13]

Bonjour,

pour mon travail, je suis à la recherche d'un fonction recherchant l'existance d'une feuille ou non à partir de son nom

Le but étant de pouvoir faire une formule du type :
"si cette feuille 2 existe; alors ....; sinon feuille 1"

Les noms de ces feuilles sont connus d'avance.

Cette fonction existe-t-telle? dois-je faire une macro ? et comment ?

D'avance merci

[Krovax]

Il doit y avoir plus simple mais tu peux essayer de faire une fonction comme ceci

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Function exist(nom As String) As Boolean
Dim ws As Worksheet
exist = False
For Each ws In Worksheets
 
If ws.Name = nom Then
exist = true
Exit For
End If
Next
End Function

Pour l'utiliser tu fait

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
If exist("nom_de_lal_feuille") then
'ce que tu veux faire si elle existe
else
'ce que tu veux faire si elle n'existe pas
end if

Si tu veux travailler sur cette feuille tu peux faire

dim ftravail as worksheet

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
If exist("nom_de_lal_feuille") then
set ftravail=worksheet("nom_de_lal_feuille")
else
set ftravail=worksheet("Feuil1")
end if
dans la suite tu utilise 
ftravailL.cells(
ftravail.range(
...

Voila j'espère que cela t'aidera, mais peut être que quelqu'un aura une solution plus simple a te proposer

[Raphael13]

Merci bcp pour l'aide!!