AIDE AVEC VBA

Résolu
Bonjour,
J'ai posté un message il y a 40 min sur le fonctionnement de VBA.
Est ce qu'il y a quelqu'un qui peut me répondre car c'est urgent.
Merci par avance,

J-baptiste
Configuration: Windows XP

2 réponses

  1. bonjour,

    tu ouvres l'éditeur VB (alt+F11), tu doubles cliques sur thisWorkbook. Ensuite tu fais un copier/coller du code que tu as mis. Tu sauvegardes ton fichier, tu le fermes et ensuite tu le relances.

    La date se mettra automatiquement dans la première cellule de la première feuille Excel de ton classeur après chaque modif, sans que tu fasses autre chose.

    ;o)

    polux
    1. Alt F11 = éditeur
      F1 ou F3 selon contexte = aide ?

      Quelle est la question ?
      1. Bonjour,
        Comment fait-on pour que dans une cellule d'excel s'affiche la date de modification du classeur. J'ai vu qu'il fallait mettre ce programme dans this workbook:
        Dim modif As Boolean

        Private Sub Workbook_BeforeClose(Cancel As Boolean)
        If modif = True Then
        Sheets("Feuil1").Range("A1").Value = "Dernière Révision le " & Format(Date, "dd/mm/yyyy")
        End If
        End Sub

        Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
        modif = True
        End Sub

        Mais comment on fait dans VBA et comment ensuite on fait pour que ça marche dans le classeur.

        Merci par avance

        Configuration: Windows XP
        Firefox 2.0.0.14
      2. AVEZ-VOUS UNE SOLUTION?

        Bonjour,
        Comment fait-on pour que dans une cellule d'excel s'affiche la date de modification du classeur. J'ai vu qu'il fallait mettre ce programme dans this workbook:
        Dim modif As Boolean

        Private Sub Workbook_BeforeClose(Cancel As Boolean)
        If modif = True Then
        Sheets("Feuil1").Range("A1").Value = "Dernière Révision le " & Format(Date, "dd/mm/yyyy")
        End If
        End Sub

        Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
        modif = True
        End Sub

        Mais comment on fait dans VBA et comment ensuite on fait pour que ça marche dans le classeur.

        Merci par avance

        Configuration: Windows XP
        Firefox 2.0.0.14