Bonjour,
j'ai trouvé sur le forum une fonction perso pour compter les couleurs d'une plage de cellules. Cela fonctionne parfaitement bien.
Par contre le fichier sur lequel je veux utiliser cette fonction est placé sur un serveur. Il s'agit d'un planning qui est modifiable par plusieurs personnes.
Le problème est que placé sur un serveur la fonction ne donne plus de résultats. Si j'installe cette fonction sur chaque pc ayant accès au serveur il faut corriger la fonction en remplaçant le chemin de la fonction vers un chemin situé vers le pc qui consulte le fichier.
Est ce qu'il y aurait un moyen pour que cette fonction soit lisible depuis chaque pc sans manipulation?
En pièce jointe un fichier avec l'utilisation de la fonction dont voici le code :
j'ai trouvé sur le forum une fonction perso pour compter les couleurs d'une plage de cellules. Cela fonctionne parfaitement bien.
Par contre le fichier sur lequel je veux utiliser cette fonction est placé sur un serveur. Il s'agit d'un planning qui est modifiable par plusieurs personnes.
Le problème est que placé sur un serveur la fonction ne donne plus de résultats. Si j'installe cette fonction sur chaque pc ayant accès au serveur il faut corriger la fonction en remplaçant le chemin de la fonction vers un chemin situé vers le pc qui consulte le fichier.
Est ce qu'il y aurait un moyen pour que cette fonction soit lisible depuis chaque pc sans manipulation?
En pièce jointe un fichier avec l'utilisation de la fonction dont voici le code :
Code:
Function CompteCouleurFond(champ As Range, couleurfond)
Application.Volatile
Dim c, temp
temp = 0
For Each c In champ
If c.Interior.ColorIndex = couleurfond Then
temp = temp + 1
End If
Next c
CompteCouleurFond = temp
End Function
Dernière édition: