OVH Cloud OVH Cloud

Info à l'ouverture d'un Fichier

6 réponses
Avatar
phil.aline.naudin
Bonsoir,

Existe _t_il un moyen, j'imagine par VBA, qui va me permettre sur un "ptit"
formulaire de rappeler :

La date de la dernière Mise à Jour des données
l'information de la cellule A
L'information de la cellule B

Le Formulaire doit s'ouvrir à l'ouverture du fichier et si besoin en le
rappelant depuis un Bouton qui se trouvera sur la feuille concernée.

Le "ptit" formulaire sera fermé depuis un bouton situé sur le "ptit
formulaire"

Merci pour votre aide car je débute vraiment dans VBA !!!

6 réponses

Avatar
Daniel
Bonsoir.
Pour la date de dernière mise à jour :
DateDerniereModif = FileDateTime("e:tempexemple.xls")
Pour la cellule A1 :
Var1=[A1]
Je n'ai pas compris si tu voulais davantage d'aide au niveau des
formulaires. N'hésite pas à relancer.
Cordialement.
Daniel
"phil.aline.naudin" a écrit dans le message
de news: 442ef021$0$6647$
Bonsoir,

Existe _t_il un moyen, j'imagine par VBA, qui va me permettre sur un
"ptit" formulaire de rappeler :

La date de la dernière Mise à Jour des données
l'information de la cellule A
L'information de la cellule B

Le Formulaire doit s'ouvrir à l'ouverture du fichier et si besoin en le
rappelant depuis un Bouton qui se trouvera sur la feuille concernée.

Le "ptit" formulaire sera fermé depuis un bouton situé sur le "ptit
formulaire"

Merci pour votre aide car je débute vraiment dans VBA !!!



Avatar
phil.aline.naudin
Bonsoir,
Merci pour tes réponses.
Pour être plus précis, j'ai écris Formulaire mais en fait l'idée serait sur
un Message Box. Il faudrait que le Message me donne les 3 valeurs soit :
La date de la dernière Modification, La valeur A et la valeur B.
Comme tout Message box je pourrais l'annuler en validant par la touche "OK"

La cerise sur le gâteau serait de pouvoir relancer cette Message Box depuis
un bouton qui se trouverait sur la feuille en question.

Encore merci.

Je débute en VBA et je avouerais que j'ai encore du mal à comprendre les
collections, les classes , et autres subtilités d'Excel mis bon je ne
désespère pas ...


"Daniel" a écrit dans le message de news:
%
Bonsoir.
Pour la date de dernière mise à jour :
DateDerniereModif = FileDateTime("e:tempexemple.xls")
Pour la cellule A1 :
Var1=[A1]
Je n'ai pas compris si tu voulais davantage d'aide au niveau des
formulaires. N'hésite pas à relancer.
Cordialement.
Daniel
"phil.aline.naudin" a écrit dans le message
de news: 442ef021$0$6647$
Bonsoir,

Existe _t_il un moyen, j'imagine par VBA, qui va me permettre sur un
"ptit" formulaire de rappeler :

La date de la dernière Mise à Jour des données
l'information de la cellule A
L'information de la cellule B

Le Formulaire doit s'ouvrir à l'ouverture du fichier et si besoin en le
rappelant depuis un Bouton qui se trouvera sur la feuille concernée.

Le "ptit" formulaire sera fermé depuis un bouton situé sur le "ptit
formulaire"

Merci pour votre aide car je débute vraiment dans VBA !!!







Avatar
Daniel
Mets cette macro dans le code de "Thisworkbook" (clic droit sur l'icône
Excel à côté du menu "Fichier") et clic gauche sur "visualiser le code"
Utililse le même code dans la macro de bouton :

Private Sub Workbook_Open()
MsgBox "Date de dernière modification : " & Format(FileDateTime(Path &
"" _
& ThisWorkbook.Name), "dd/mm/yyyy") & Chr(13) & "A1 : " & [Feuil1!A1] _
& Chr(13) & "B1 : " & [Feuil1!B1]
End Sub

Daniel
"phil.aline.naudin" a écrit dans le message
de news: 44303fa4$0$20147$
Bonsoir,
Merci pour tes réponses.
Pour être plus précis, j'ai écris Formulaire mais en fait l'idée serait
sur un Message Box. Il faudrait que le Message me donne les 3 valeurs soit
:
La date de la dernière Modification, La valeur A et la valeur B.
Comme tout Message box je pourrais l'annuler en validant par la touche
"OK"

La cerise sur le gâteau serait de pouvoir relancer cette Message Box
depuis un bouton qui se trouverait sur la feuille en question.

Encore merci.

Je débute en VBA et je avouerais que j'ai encore du mal à comprendre les
collections, les classes , et autres subtilités d'Excel mis bon je ne
désespère pas ...


"Daniel" a écrit dans le message de news:
%
Bonsoir.
Pour la date de dernière mise à jour :
DateDerniereModif = FileDateTime("e:tempexemple.xls")
Pour la cellule A1 :
Var1=[A1]
Je n'ai pas compris si tu voulais davantage d'aide au niveau des
formulaires. N'hésite pas à relancer.
Cordialement.
Daniel
"phil.aline.naudin" a écrit dans le
message de news: 442ef021$0$6647$
Bonsoir,

Existe _t_il un moyen, j'imagine par VBA, qui va me permettre sur un
"ptit" formulaire de rappeler :

La date de la dernière Mise à Jour des données
l'information de la cellule A
L'information de la cellule B

Le Formulaire doit s'ouvrir à l'ouverture du fichier et si besoin en le
rappelant depuis un Bouton qui se trouvera sur la feuille concernée.

Le "ptit" formulaire sera fermé depuis un bouton situé sur le "ptit
formulaire"

Merci pour votre aide car je débute vraiment dans VBA !!!











Avatar
phil.aline.naudin
Salut,
Je suis en train de tester ton code ...

Pour le moment j'ai des messages de Bug de partout mais bon je ne désespère
pas !

"Erreur Exécution 13, Incompatibilité de type !"


Si tu as une idée je suis preneur

Merci

"Daniel" a écrit dans le message de news:

Mets cette macro dans le code de "Thisworkbook" (clic droit sur l'icône
Excel à côté du menu "Fichier") et clic gauche sur "visualiser le code"
Utililse le même code dans la macro de bouton :

Private Sub Workbook_Open()
MsgBox "Date de dernière modification : " & Format(FileDateTime(Path &
"" _
& ThisWorkbook.Name), "dd/mm/yyyy") & Chr(13) & "A1 : " & [Feuil1!A1] _
& Chr(13) & "B1 : " & [Feuil1!B1]
End Sub

Daniel
"phil.aline.naudin" a écrit dans le message
de news: 44303fa4$0$20147$
Bonsoir,
Merci pour tes réponses.
Pour être plus précis, j'ai écris Formulaire mais en fait l'idée serait
sur un Message Box. Il faudrait que le Message me donne les 3 valeurs
soit :
La date de la dernière Modification, La valeur A et la valeur B.
Comme tout Message box je pourrais l'annuler en validant par la touche
"OK"

La cerise sur le gâteau serait de pouvoir relancer cette Message Box
depuis un bouton qui se trouverait sur la feuille en question.

Encore merci.

Je débute en VBA et je avouerais que j'ai encore du mal à comprendre les
collections, les classes , et autres subtilités d'Excel mis bon je ne
désespère pas ...


"Daniel" a écrit dans le message de news:
%
Bonsoir.
Pour la date de dernière mise à jour :
DateDerniereModif = FileDateTime("e:tempexemple.xls")
Pour la cellule A1 :
Var1=[A1]
Je n'ai pas compris si tu voulais davantage d'aide au niveau des
formulaires. N'hésite pas à relancer.
Cordialement.
Daniel
"phil.aline.naudin" a écrit dans le
message de news: 442ef021$0$6647$
Bonsoir,

Existe _t_il un moyen, j'imagine par VBA, qui va me permettre sur un
"ptit" formulaire de rappeler :

La date de la dernière Mise à Jour des données
l'information de la cellule A
L'information de la cellule B

Le Formulaire doit s'ouvrir à l'ouverture du fichier et si besoin en le
rappelant depuis un Bouton qui se trouvera sur la feuille concernée.

Le "ptit" formulaire sera fermé depuis un bouton situé sur le "ptit
formulaire"

Merci pour votre aide car je débute vraiment dans VBA !!!















Avatar
Daniel
Regarde là (j'ai fait une petite modif) :
http://cjoint.com/?eeiDE88iLS
Cordialement.
Daniel
"phil.aline.naudin" a écrit dans le message
de news: 44319b2e$0$29407$
Salut,
Je suis en train de tester ton code ...

Pour le moment j'ai des messages de Bug de partout mais bon je ne
désespère
pas !

"Erreur Exécution 13, Incompatibilité de type !"


Si tu as une idée je suis preneur

Merci

"Daniel" a écrit dans le message de news:

Mets cette macro dans le code de "Thisworkbook" (clic droit sur l'icône
Excel à côté du menu "Fichier") et clic gauche sur "visualiser le code"
Utililse le même code dans la macro de bouton :

Private Sub Workbook_Open()
MsgBox "Date de dernière modification : " & Format(FileDateTime(Path &
"" _
& ThisWorkbook.Name), "dd/mm/yyyy") & Chr(13) & "A1 : " & [Feuil1!A1]
_
& Chr(13) & "B1 : " & [Feuil1!B1]
End Sub

Daniel
"phil.aline.naudin" a écrit dans le
message de news: 44303fa4$0$20147$
Bonsoir,
Merci pour tes réponses.
Pour être plus précis, j'ai écris Formulaire mais en fait l'idée serait
sur un Message Box. Il faudrait que le Message me donne les 3 valeurs
soit :
La date de la dernière Modification, La valeur A et la valeur B.
Comme tout Message box je pourrais l'annuler en validant par la touche
"OK"

La cerise sur le gâteau serait de pouvoir relancer cette Message Box
depuis un bouton qui se trouverait sur la feuille en question.

Encore merci.

Je débute en VBA et je avouerais que j'ai encore du mal à comprendre les
collections, les classes , et autres subtilités d'Excel mis bon je ne
désespère pas ...


"Daniel" a écrit dans le message de news:
%
Bonsoir.
Pour la date de dernière mise à jour :
DateDerniereModif = FileDateTime("e:tempexemple.xls")
Pour la cellule A1 :
Var1=[A1]
Je n'ai pas compris si tu voulais davantage d'aide au niveau des
formulaires. N'hésite pas à relancer.
Cordialement.
Daniel
"phil.aline.naudin" a écrit dans le
message de news: 442ef021$0$6647$
Bonsoir,

Existe _t_il un moyen, j'imagine par VBA, qui va me permettre sur un
"ptit" formulaire de rappeler :

La date de la dernière Mise à Jour des données
l'information de la cellule A
L'information de la cellule B

Le Formulaire doit s'ouvrir à l'ouverture du fichier et si besoin en
le rappelant depuis un Bouton qui se trouvera sur la feuille
concernée.

Le "ptit" formulaire sera fermé depuis un bouton situé sur le "ptit
formulaire"

Merci pour votre aide car je débute vraiment dans VBA !!!



















Avatar
phil.aline.naudin
Merci pour ton dévouement excellien.
Bon si un jour tu as besoin d'un conseil pour régler ton dérailleur je suis
à ton service

Sportivement


"Daniel" a écrit dans le message de news:

Regarde là (j'ai fait une petite modif) :
http://cjoint.com/?eeiDE88iLS
Cordialement.
Daniel
"phil.aline.naudin" a écrit dans le message
de news: 44319b2e$0$29407$
Salut,
Je suis en train de tester ton code ...

Pour le moment j'ai des messages de Bug de partout mais bon je ne
désespère
pas !

"Erreur Exécution 13, Incompatibilité de type !"


Si tu as une idée je suis preneur

Merci

"Daniel" a écrit dans le message de news:

Mets cette macro dans le code de "Thisworkbook" (clic droit sur l'icône
Excel à côté du menu "Fichier") et clic gauche sur "visualiser le code"
Utililse le même code dans la macro de bouton :

Private Sub Workbook_Open()
MsgBox "Date de dernière modification : " & Format(FileDateTime(Path
& "" _
& ThisWorkbook.Name), "dd/mm/yyyy") & Chr(13) & "A1 : " & [Feuil1!A1]
_
& Chr(13) & "B1 : " & [Feuil1!B1]
End Sub

Daniel
"phil.aline.naudin" a écrit dans le
message de news: 44303fa4$0$20147$
Bonsoir,
Merci pour tes réponses.
Pour être plus précis, j'ai écris Formulaire mais en fait l'idée serait
sur un Message Box. Il faudrait que le Message me donne les 3 valeurs
soit :
La date de la dernière Modification, La valeur A et la valeur B.
Comme tout Message box je pourrais l'annuler en validant par la touche
"OK"

La cerise sur le gâteau serait de pouvoir relancer cette Message Box
depuis un bouton qui se trouverait sur la feuille en question.

Encore merci.

Je débute en VBA et je avouerais que j'ai encore du mal à comprendre
les collections, les classes , et autres subtilités d'Excel mis bon je
ne désespère pas ...


"Daniel" a écrit dans le message de news:
%
Bonsoir.
Pour la date de dernière mise à jour :
DateDerniereModif = FileDateTime("e:tempexemple.xls")
Pour la cellule A1 :
Var1=[A1]
Je n'ai pas compris si tu voulais davantage d'aide au niveau des
formulaires. N'hésite pas à relancer.
Cordialement.
Daniel
"phil.aline.naudin" a écrit dans le
message de news: 442ef021$0$6647$
Bonsoir,

Existe _t_il un moyen, j'imagine par VBA, qui va me permettre sur un
"ptit" formulaire de rappeler :

La date de la dernière Mise à Jour des données
l'information de la cellule A
L'information de la cellule B

Le Formulaire doit s'ouvrir à l'ouverture du fichier et si besoin en
le rappelant depuis un Bouton qui se trouvera sur la feuille
concernée.

Le "ptit" formulaire sera fermé depuis un bouton situé sur le "ptit
formulaire"

Merci pour votre aide car je débute vraiment dans VBA !!!