Bonjour,
Je cherche un moyen de masquer les zéros (DisplayZeros) sans être obligée d'activer la feuille en question.
En effet, le fichier Excel concerné est piloté depuis Access qui l'alimente.
Excel n'est donc pas visible quand le code s'exécute.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 Set xlApp = CreateObject("Excel.Application") If fso.FileExists(strFichXL) Then Set xlBook = xlApp.Workbooks.Open(strFichXL) Else Set xlBook = xlApp.Workbooks.Add xlBook.SaveAs strFichXL, xlExcel8 End If Set xlSheet = xlBook.Worksheets(1)
DisplayZeros est également une propriété de WorksheetView mais je n'ai pas réussi à manipuler cet objet.
Une idée ?
Merci d'avance
LilyX
Partager