ouvrir un fichier .log depuis un usf

Salut all,

Alors Couphil j'ai fait cette macro pour afficher un "what's new" à l'ouverture d'une macro complementaire quand il y a un changement de version par rapport à la version sur le serveur

je te mets le le tout et tu feras le tri de ce qui t'interesse.

--- CODE ---
Private Sub Workbook_Open()
Call CreateMenu
Dim FichierVer, NouvVer, VersionActu As String
Dim Val As Variant
FichierVer = "c:\Cache.ini" '<--- LA TU METS TON FICHIER LOG + CHEMIN
On Error Resume Next

Open FichierVer For Input As #1
Line Input #1, NouvVer
Close #1

VersionActu = "V2.16"

If VersionActu <> NouvVer Then '<----- ICI CA VA T'INTERESSER
Whatsnew.Caption = "What's New SecoTools : " & NouvVer
Whatsnew.TextNews.Text = ""
Open FichierVer For Input As #1
Val = FileLen(FichierVer) '<--- VA CHARGER TON FICHIER LOG
Cible = Input(Val, 1)
Close #1
Whatsnew.TextNews.Text = Cible '<- L'affiche
Whatsnew.Show
End If

Voila

++

Creepy

salut creepy et tout le monde

Merci pour ta reponse.

Ca fait quelques jours que je cherche sur plusieurs moteurs et sites, sur lesquels je n'ai toujours rien trouver, et toi tu me propose quelque chose de concret, qui va certainement me faire avancer..

Je vais te me triturer tout ca pour en faire quelque chose de personnalisé, mais ca me fait au moins un point de depart !

Merci encore et bonne continuation

Et je le repete encore : SUPER SITE ET SUPER ENTRAIDE.