Discussion :

[Phileo]

Bonjour

Suite à la dernière mise à jour d'Excel 2013 (15.0.4823) une de nos applications ne fonctionne plus et génère une corruption grave du classeur contenant les données et macros concernées.

Cette application continue à bien fonctionner sur les postes non mis à jour (excel 2013 15.0.4815)
je précise que nous sommes en version OEM avec le nouveau système d(installation 'point and clic'

Les symptômes sont les suivants.
on ouvre un classeur du projet et fait une modification
le classeur est sauvegardé et fermé
A la réouverture, on constate une 'erreur automation, défaillance fatale'

la structure du projet VBA est alors la suivante :


on voit que des feuilles supplémentaires inutilisables ont été ajoutées (en bleu) et que la numérotation a changé (par exemple la feuille 1 (msg) est devenue 1011)

selon nos tests ce serait la fonction utilisateur suivante qui poserait problème

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
Function zarbNum(i As Variant, Optional NbChiffres As Byte = 2) As String
Dim NbZéros As Byte
 
        If NbChiffres > Len(CStr(i)) Then
            NbZéros = NbChiffres - Len(CStr(i))
            zarbNum = String(NbZéros, "0") & CStr(i)
        Else
            zarbNum = CStr(i)
        End If
 
End Function

mais nous ne comprenons pas le problème et n'arrivons pas à la reproduire dans un classeur plus simple n'utilisant que cette fonction

Si quelqu'un a une idée sur la nature exacte du problème, je suis preneur.

[casefayere]

bonjour,
déjà qu'il est fortement déconseillé de joindre un fichier au 1er post, tu voudrais qu'on ouvre un fichier risquant d'être corrompu.....

[Phileo]

désolé
je ne pensais pas mal faire

nous n'avons pas observé d'autre désagrément que celui mentionné c'est à dire que le fichier s'altère lui même

j'ai retiré la pièce jointe
si un contributeur la souhaite je la fournirais sur demande

[Marc-L]

Bonjour,

je ne vois pas en quoi cette fonction poserait problème …

Toutefois, à partir d'un poste non mis à jour, modifier ses variables de type Byte en type Integer puis tester le fichier
sur un poste mis à jour en ayant au préalable supprimé le contenu du dossier Temp de la session, sait-on jamais …

Cette fonction pourrait être simplifiée en utilisant la fonction VBA Format.

_________________________________________________________________________________________________________

Je suis Paris, Charlie, Bruxelles, …

[Phileo]

Merci pour les suggestions

nous allons essayer de regarder ça

je ne comprends pas non plus pourquoi cette fonction ferait planter Excel mais il est est quasi certain que c'est lié car le problème disparait si on la désactive. L'explorateur VBA met toujours en surbrillance cette fonction lors des plantages.

je n'ai pas réussi à reproduire le problème dans un autre contexte

le classeur qui utilise cette formule est complexe et la nature du plantage (classeur rendu inutilisable ne facilite pas le débogage)

j'essaye de revenir vers vous avec le résultats des tests le plus rapidement possible