Page 1 sur 1

[VBA] Afficher le journal des actions des utilisateurs

Posté : sam. 18 févr. 2017 12:44
par Dakin Quelia
» Afficher le journal des actions des utilisateurs

Ce petit code vous permet d'afficher les actions des utilisateurs qui sont enregistrées dans la feuille Excel.

Code : Tout sélectionner

' Afficher le journal des actions
Sub AfficherJournalActions()
	Dim ws As Worksheet

    ' Initialisation les variables
    Set ws = ThisWorkbook.Sheets("Log")
    Set rg = ws.Range("A2:B65000")
    
    ' On affiche les données de l'onglet "Log"
    With Historique
        .ColumnCount = 2
        .ColumnHeads = True
        .ColumnWidths = "60;40"
        .RowSource = rg.Address
        .Locked = True
    End With
End Sub
Pour l'utiliser, rien de très compliqué :

Code : Tout sélectionner

' Afficher le journal des actions
AfficherJournalActions()
Vous pouvez l'utiliser, par exemple, dans une fenêtre.