Pb d'argument dans une fonction de recherche de feuille excel

Question

bonjour, 
j'ai une fonction me permettant de rechercher une feuille excel existanta afin de lui appliquer un traitement ult&#233;rieur: 
 
Function WsExist(Nom$) As Boolean 
On Error Resume Next 
WsExist = Sheets(Nom).Index 
End Function 
 
mon probl&#232;me se situe sur l'argument Nom 
si je saisis l'argument nom &#224; partir d'une textbox d'un formulaire, comme suit: 
 
If WsExist(saisie2.Controls("txtnaff" & j).Value) = True Then 
  ActiveWorkbook.Sheets(saisie2.Controls("txtnaff" & j).Value).Select: GoSub coloration: 
Else... 
 
...pas de probl&#232;me 
  
par contre si je saisis l'argument &#224; partir d'une cellule d'une autre feuille excel du style: 
 
If WsExist(avancement!Range("a5").Value) = True Then 
  ActiveWorkbook.Sheets(avancement!Range("a5").Value).Select 
Else... 
 
....l&#224; j'ai une erreur d'excution de type "424" 
 
ou est mon erreur?

Niikko

mrdep1978 · Answer

Salut, 

Je suppose que avancement est le nom d'une feuille.

Remplace
avancement!Range("a5").Value
par
avancement.Range("a5").Value

aieeeuuuuu · Answer

salut,

"avancement" c'est quoi ???
ca ne serait pas le nom d'une des feuilles de ton classeur par hasard ?
dans ce cas essaie 

WsExist(sheet(indexDeTaFeuilleAvancement).range("a5").value

Pb d'argument dans une fonction de recherche de feuille excel

2 réponses

Discussions similaires