poids d'un classeur dans une cellule ?

[Evelynetfrancois]

bonjour le forum
Ma question est dans le titre ...
Est il possible de renvoyer le poids du classeur dans une cellule (aprés chaque enregistrement)
Merci pour toutes vos sujétions
""je ne suis pas du tout dans l'urgence""
bon w end à tous
EetF

 

[pascal21]

Re : poids d'un classeur dans une cellule ?

bonjour
Ce lien n'existe plus la même question avec une solution en VBA

sub Taille()
 Dim Fichier As String
 Fichier = "C:\excel\à voir.xls"
 With CreateObject("Scripting.FileSystemObject")
  MsgBox .GetFile(Fichier).Size / 1024 & " Ko."
 End With
 end sub

pas essayé
bon weekend

 

[CBernardT]

Re : poids d'un classeur dans une cellule ?

Bonjour Evelynetfrancois, pascal21,

Le poids du fichier s'inscrit dans la cellule A1 à chaque enregistrement du classeur.

La macro évènementielle est placée dans le module Thisworkbook.

 

[Evelynetfrancois]

Re : poids d'un classeur dans une cellule ?

Merci Pascal21 CBernardT pour vos sujétions............rapides
la proposition de Bernard me convient parfaitement
je vous remercie beaucoup
bonne journée
au plaisir de vous lire
EetF