Mettre une ligne sous excel automatiquement

Résolu
Jiben59 Messages postés 120 Date d'inscription   Statut Membre Dernière intervention   -  
Jiben59 Messages postés 120 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

Je souhaiterai que chaque jour le "5" de chaque mois s'affiche ma ligne de mon emprunt mais ceci dès que j'ouvre le fichier Excel 2007.

Je veux faire ce là pour éviter d'oublier de l'actualiser dans mon compte.

Je vous remercie de vos réponse d'avance,

Cordialement.


<img src="http://d29.e-loader.net/X3qEIPRUEN.jpg" alt="E-Loader.net"/>


A voir également:

1 réponse

Réponse 1 / 1
G_33
 
Bonjour
Il te suffit de placer une macro qui cherche la date dans
This Workbook

Private Sub Workbook_Open()

Ton code

End sub

Cordialement
-1
Jiben59 Messages postés 120 Date d'inscription   Statut Membre Dernière intervention   1
 
Bonjour,

merci de votre réponse mais par contre je n'ai jamais utilisé un macro donc pourriez vous m'aidez si vous plaît ?

Je vous remercie de m'avoir répondu,
cordialement.
0
G_33
 
Au lieu d'une image postez un fichier que je puisse adapter ça.
Par contre s'il y a des données confidentielles vous les remplacez par d'autres caractères
0
G_33
 
Il me vient une idée beaucoup plus simple
Créer une tache planifiée sur votre ordinateur
allez voir ce lien
http://forums.cnetfrance.fr/topic/157584-creer-une-tache-planifiee-dans-windows-7-ou-vista/
0
Jiben59 Messages postés 120 Date d'inscription   Statut Membre Dernière intervention   1
 
Comment je peux vous envoyer le fichier simplement à vous ?

Car pour information j'ai mon tableau amortissement d'emprunt dans une autre feuille du même document avec la somme que je paie chaque mois.

Merci pour vos réponse, cordialement.
0
G_33
 
Je ne sais pas comment recevoir ce fichier et rien que moi.
A part avec mon mail perso que je n'ai pas envie de donner sur ce forum.

Avez vous essayé une tache planifié comme je vous le suggérais plus haut ?
Une tache planifié tous les 5 du mois et vous placer le code ci dessous
dans visual basic - This Worbook 
Private Sub Workbook_Open()
  Dim maDate As Byte
  Dim monMotif As String
  maDate = "5"
  If Day(Date) = maDate Then
  Sheets("Feuil1").Activate      '' à adapter avec le non de votre feuille et la bonne colonne
  For lig = 2 To Range("a65536").End(xlUp).Row  ' à adapter  la bonne colonne
  
        If Sheets("Feuil1").Cells(lig, 1).Value = Date Then  ' à adapter  la bonne colonne
            monMotif = Sheets("Feuil1").Cells(lig, 2).Value  ' à adapter  la bonne colonne
            lemontant = Sheets("Feuil1").Cells(lig, 3).Value  ' à adapter  la bonne colonne
             MsgBox "Attention, aujourd 'hui " & " " & Date & " " & monMotif & " " & lemontant, vbCritical
             
             Sheets("Feuil1").Cells(lig, 1).Activate  '' à adapter avec le non de votre feuille et la bonne colonne

             Exit For
        End If
  Next lig
  End If
End Sub


Il s'excutera grace à la tache planifié tous les 5 du mois et automatiquement vous aurez un message d'avertissement.
0

Discussions similaires

Que veut dire "correspondant occupé" lors d'un appel ?
veroaaa -
Pat -

10 réponses