comment trouver la premiere colonne libre sur une ligne donnee

Question

Je suis un peu novice avec la codification en VB. J'utilise Excel 2003

J'ai une liste d'employés qui est identifiée par une No. ID unique. (feuille intitulée registre employé)

Je désire garder l'historique de diverses informations (salaire, statut, etc.) lors d'une mise à jour.

J'ai 64 colonnes de libres dans ce même classeur.

Avec une macro, je désirerais trouver la bonne ligne (en utilisant le No. ID) et trouver sur celle ligne la première colonne libre pour inscrire la date de la commande, la colonne suivante pour inscrire l'ancienne valeur.

Est-ce possible d'exécuter une telle commande ?

Merci à tous ceux qui peuvent m'éclairer

Nitrof

Answer 1

Bonjour.

Vous pouvez utiliser la fonction "IsEmpty".

Vous pouvez vous inspirer de l'exemple suivant, où on balaye les cellules d'une plage, repère les cellules vides, puis les verrouille :

' Balayer les Cellules de <st1:personname ProductID="La Plage" w:st="on">la Plage</st1:personname> sélectionnée, verrouiller les Cellules vides,
' et déverrouiller les autres.
       For I = Imin To Imax
               For J = Jmin To Jmax
                      Set cellule = Cells(I, J)
                      If IsEmpty(cellule) = False Then
                              cellule.Locked = False
                      Else
                              cellule.Locked = True
                      End If
               Next J
       Next I

(la variable "cellule" doit ici avoir été déclarée via : Dim cellule As Object).

J'espère vous avoir aidé.

André