Aide pour adpater un macros à ma feuille

Résolu/Fermé

Jiben59 Messages postés 120 Date d'inscription mardi 25 septembre 2012 Statut Membre Dernière intervention 2 janvier 2016 - 4 janv. 2013 à 21:57
Jiben59 Messages postés 120 Date d'inscription mardi 25 septembre 2012 Statut Membre Dernière intervention 2 janvier 2016 - 13 janv. 2013 à 12:32

Bonjour,

Je tiens mon compte bancaire depuis un tableur excel sur ordinateur et j'aimerais lors du 5(jour) de chaque mois s'affiche ma ligne de mon emprunt pour éviter d'oublier d'actualiser mon tableur excel.

J'ai crée une tache planifié sur mon ordinateur depuis ce sujet : https://forums.cnetfrance.fr/tutoriels-windows-7-8-et-autres-sytemes/250237-creer-une-tache-planifiee-dans-windows-7-ou-vista

Et G_33, m'avait donné ce macros là :

Private Sub Workbook_Open()
  Dim maDate As Byte
  Dim monMotif As String
  maDate = "5"
  If Day(Date) = maDate Then
  Sheets("Emprunt").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

Par contre je n'arrive pas à l'adapter à ma feuille donc si vous pourriez m'aider si vous plaît.

Voici ma feuille concernée pour mieux comprendre : http://d22.e-loader.net/zHh2pzFD7Z.jpg

Je vous remercie de vos réponse d'avance, bonne année à vous !

Cordialement.

A voir également:

Aide pour adpater un macros à ma feuille
Feuille de pointage excel - Télécharger - Tableur
Feuille a5 - Guide
Supprimer une feuille word - Guide
Feuille de style word - Guide
Macros word - Guide

15 réponses

Réponse 1 / 15

f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 702
5 janv. 2013 à 07:38

Bonjour,

Juste remplacer Feuil1 par Emprunt

Private Sub Workbook_Open()
  Dim maDate As Byte
  Dim monMotif As String
  maDate = "5"
  If Day(Date) = maDate Then
  Sheets("Emprunt").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("Emprunt").Cells(lig, 1).Value = Date Then  ' à adapter  la bonne colonne
            monMotif = Sheets("Emprunt").Cells(lig, 2).Value  ' à adapter  la bonne colonne
            lemontant = Sheets("Emprunt").Cells(lig, 3).Value  ' à adapter  la bonne colonne
             MsgBox "Attention, aujourd 'hui " & " " & Date & " " & monMotif & " " & lemontant, vbCritical
             
             Sheets("Emprunt").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

Bonne suite

Jiben59 Messages postés 120 Date d'inscription mardi 25 septembre 2012 Statut Membre Dernière intervention 2 janvier 2016 1
5 janv. 2013 à 11:23

Je vous remercie pour votre réponse :)

Par contre, quand je veux l'enregistrer, il m'ouvre cette fenêtre (voir la photo), que faire si vous plaît ?

Photo : http://d35.e-loader.net/0HwPDbnaXT.jpg

Je vous remercie de votre aide.
Cordialement.

f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 702
Modifié par f894009 le 6/01/2013 à 09:54

Bonjour,

Au premier enregistrement, c'est normal vous avez ouvert un classeur .XLSX et vous mettez une macro VBA. Il faut cliquez sur Non et dans la boite a dialogue de sauvegarde pour Type de fichier mettre classeur excel prenant en charge les macros
L'extention du fichier sera .XLSM et l'icone du fichier sera differente.

Bonne suite

Jiben59 Messages postés 120 Date d'inscription mardi 25 septembre 2012 Statut Membre Dernière intervention 2 janvier 2016 1
6 janv. 2013 à 12:01

Bonjour,

c'est normal quand je fais afficher les macros, je ne vois pas celui que je viens de mettre ?

Merci de votre aide.
Cordialement.

f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 702
6 janv. 2013 à 18:42

Re,
Si vous n'avez pas enregistre en classeur prenant en charge les macro, oui.

Jiben59 Messages postés 120 Date d'inscription mardi 25 septembre 2012 Statut Membre Dernière intervention 2 janvier 2016 1
6 janv. 2013 à 20:47

Bonsoir, par contre je l'ai bien enregistré en classeur prenant en charge les macros voici la photo qui le montre : http://d26.e-loader.net/OFfDflLoYx.jpg

Mais quand j'ouvre ce dossier et j'affiche les macros, j'ai ceci : http://d4.e-loader.net/nGgOBOjH1F.jpg

Merci de votre réponse.

Réponse 2 / 15

f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 702
8 janv. 2013 à 18:50

Bonjour,

Ouvrir fenetre VBA: Alt +F11
Click sur ThisWorkbook en haut a gauche

ou sur feuille de calcul: clic sur Developpeur, menu Code, Visual Basic et
Click sur ThisWorkbook en haut a gauche

La macro doit etre dans ThisWorkbook sinon ca ne marchera jamais!!!!

Réponse 3 / 15

Jiben59 Messages postés 120 Date d'inscription mardi 25 septembre 2012 Statut Membre Dernière intervention 2 janvier 2016 1
8 janv. 2013 à 20:40

Bonsoir,

il m'affiche ce message là quand je veux l'exécuter : http://d14.e-loader.net/4poliqkKFI.jpg

Mais pourtant les macros sont autorises.. : http://d30.e-loader.net/4JKWGmQ2vc.jpg

Mais petite question, ce macros permet de mettre une ligne pour les 5 de chaque mois mais quelle libeller et quelle somme va t il mettre aussi ?

Encore merci de votre aide.

Réponse 4 / 15

f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 702
9 janv. 2013 à 08:08

Bonjour,

mais quelle libeller et quelle somme va t il mettre aussi ? Rien, vous connaissez un peu le VBA excel???????

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question

Réponse 5 / 15

Jiben59 Messages postés 120 Date d'inscription mardi 25 septembre 2012 Statut Membre Dernière intervention 2 janvier 2016 1
9 janv. 2013 à 17:31

Pour information je ne connais pas le VBA excel :s

Mais il fais quoi alors ce macros là ?

Réponse 6 / 15

f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 702
9 janv. 2013 à 17:48

Re,

Si la cellule testee =5 affichage par boites a message des valeurs des cellules A,B,C de la ligne trouvee

Question: vous voulez faire quoi de votre fichier excel???

Réponse 7 / 15

Jiben59 Messages postés 120 Date d'inscription mardi 25 septembre 2012 Statut Membre Dernière intervention 2 janvier 2016 1
9 janv. 2013 à 18:15

Merci pour votre réponse.

Mon fichier excel permet de tenir mes comptes bancaires et les mettent à jours par mes soins.

Moi je voudrais que quand la cellule A = 5.., j'ai l'exemple de ligne mis sur la photo : http://d22.e-loader.net/TUL5WZm7mY.jpg

Vous m'avez compris ?

Réponse 8 / 15

f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 702
10 janv. 2013 à 09:23

Bonjour,

Vous m'avez compris ? Non, toutes les cellules de la colonne A sont au 5 du mois et qu'est ce que vous voulez faire avec du code VBA?????

Réponse 9 / 15

Jiben59 Messages postés 120 Date d'inscription mardi 25 septembre 2012 Statut Membre Dernière intervention 2 janvier 2016 1
10 janv. 2013 à 18:03

Bonjour.

Je voudrais que ma ligne ce mets tout seul avec le montant qui faut et le libellé aussi ;) Sans que je le fais manuellement.

Bonne soirée, cordialement.

Réponse 10 / 15

f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 702
11 janv. 2013 à 10:36

Bonjour,
avec le montant qui faut et le libellé aussiJe vais les pecher ou ces infos??????

Réponse 11 / 15

Jiben59 Messages postés 120 Date d'inscription mardi 25 septembre 2012 Statut Membre Dernière intervention 2 janvier 2016 1
12 janv. 2013 à 12:19

Bonjour,

Le montant ce trouverai en C et le libellé en B.

Le libellé serait Remboursement de l'emprunt du "Nom du mois".

Avez vous compris ?

Merci de votre aide.
Cordialement et bon week end.

Réponse 12 / 15

f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 702
12 janv. 2013 à 18:04

Bonjour,

Avez vous compris ? Non, Le Montant ????

Un fichier exemple: ouvrez le, clic sur le bouton bleu

A vous d'adapter.

https://www.cjoint.com/c/CAmsaXOQnf5

Réponse 13 / 15

Jiben59 Messages postés 120 Date d'inscription mardi 25 septembre 2012 Statut Membre Dernière intervention 2 janvier 2016 1
12 janv. 2013 à 19:15

Bonjour,

je vous remercie mais tous mes documents sont déjà fait aussi :o
Donc comment le réintégré sur le miens si vous plait ?

Merci de votre aide !
Cordialement.

Réponse 14 / 15

f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 702
13 janv. 2013 à 10:21

Bonjour,
Si je ne peux pas avoir votre fichier et une explication correcte de ce que vous voulez, je ne peux rien pour vous. Trouvez un personne de votre entourage qui pourrait vous aider.

Bye

Réponse 15 / 15

Jiben59 Messages postés 120 Date d'inscription mardi 25 septembre 2012 Statut Membre Dernière intervention 2 janvier 2016 1
13 janv. 2013 à 12:32

Bonjour,

bah je vais essayer mais je pense alors le laisser comme sa car je n'ai pas envie de passer un dossier avec des données personnels.

Comment faire pour supprimer les macros que j'ai mis svp ?

Merci de votre aide !

Cordialement.

Discussions similaires

Feuille de score belote

Reporter valeur sur autre feuille avec critere

feuille excel de gestion belote

grille de points pour belote

Discussions similaires

Newsletters