Discussion :

[lucasgaetan]

Bonjour,

J'ai certaines cellules dans une feuille Excel qui font appelle à une fonction VBA.
Lorsque je passe sur un autre classeur et que j'y lance un code VBA puis que je reviens sur le classeur avec la fonction, celle-ci revoit #VALEUR!

Exemple: cellule "A1" =Get_Val()

Code :

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

1
2
3
Public Function Get_Val() As String
    Get_Val = "Pour test"
End Function

la cellule "A1" affiche #VALEUR!

Mon classeur est en calcule automatique.
Dans le "Centre de gestion de la confidentialité" d'Excel, les macros VBA sont activées.
"Accès approuvé au modèle d’objet du projet VBA" est coché.

J'arrive à résoudre ce problème:
-en cliquant dans la barre de formule puis en validant (entrée) chaque cellule
-en convertissant chaque colonne de ma feuille (onglet Donnée/Convertir/Terminer)

Mes classeurs on un nombre important de cellules remplies (5000/feuille) , le nombre de cellules affichant #VALEUR! est 100.
J'ai beaucoup de cellules fusionnées, donc "Convertir" ne fonctionne pas/mal.

J'observe ce problème sur plusieurs classeurs, même à partir d'un nouveau.

Connaissez-vous une option à cocher ou autre qui me permettrais de résoudre ce problème ?

Merci

[Qwazerty]

Salut

Essaie d'ajouter

Code :

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

Application.volatile True

au début du code de ta fonction.

Ça force le recalcule des cellules qui contiennent cette fonction... par contre ça le force à chaque modification d'une cellule de la feuille... et donc s'il y a beaucoup de cellules avec cette fonction, ça peut provoquer des lenteurs.

Essaie déjà pour voir si ça résout ton problème

[Edit]
J'ai testé chez moi (Office 365) mais même sans Volatile, je n'ai pas de problème, tu n'aurais pas une macro dans ton 2ème fichier qui mettrait le bazars?
[/Edit]

++
Qwaz

[Franc]

Salut, ajoute ceci dans ThisWorkbook:

Code :

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

1
2
3
Private Sub Workbook_Activate()
    Application.CalculateFullRebuild
End Sub

Cela force un recalcul complet de toutes les cellules à chaque activation du classeur.
Les cellules fusionnées posent souvent problème, utilise plutôt Format > Alignement > Centrer sur plusieurs colonnes

[Qwazerty]

Les cellules fusionnées posent souvent problème, utilise plutôt Format > Alignement > Centrer sur plusieurs colonnes

Ah ben je connaissais pas cette fonction! Je te remercie

++
Qwaz

[lucasgaetan]

Cette solution fonctionne parfaitement:

Salut, ajoute ceci dans ThisWorkbook:

Code :

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

1
2
3
Private Sub Workbook_Activate()
    Application.CalculateFullRebuild
End Sub

celle là ne fonctionne pas dans mon cas:

Code :

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

Application.volatile True

Merci de vos aides.

[ExcelTastic]

Bonjour lucasgaetan

Avant de dire "ça ne fonctionne pas", il faudrait commencer par comprendre ce que font les instructions

"Application.Volatile" recalcule la fonction à chaques modifications dans le classeur

"Application.CalculateFullRebuild" force le classeur entier à recalculer ces formules,
mais attention, placé dans l'évènement "Activate", cela ne se fera qu'à l'activation du classeur... après plus rien

Donc pour moi, l'instruction la plus sûre reste la 1ère

[lucasgaetan]

Bonjour ExcelTastic,

Je n'ai pas dis que ça ne fonctionnait pas, j'ai dis "celle là ne fonctionne pas dans mon cas".
La nuance est que quand j'arrive d'un 2eme classeur, puis que je reviens sur mon 1er, les cellules ne sont plus valide.
D'où l'intérêt de la procédure Workbook_Activate.

Mais j'ai bien noté ta fonction et j'ai même commencé à la déployer.

Merci encore.