VISUAL BASIC pour EXCEL

Liko -  
Kobaya Messages postés 282 Date d'inscription   Statut Membre Dernière intervention   -
bonjour a toutes et a tous
je cherche une fonction qui me permet de trouver la premiere colonne vide dans une feuille excel

merci de votre aide et bon week end

1 réponse

  1.
    Kobaya Messages postés 282 Date d'inscription   Statut Membre Dernière intervention   214
     
    salut,

    voici une procédure qui renvoie la première colonne ne contenant aucunes données :

    Sub PremierColonneeVide()
    Dim intCol As Integer

    For intCol = 1 To 256
    If Application.WorksheetFunction.CountA(ActiveSheet.Columns(intCol)) = 0 Then
    MsgBox "Première colonne vide = " & intCol, vbExclamation, "Recherche de la première colonne vide"
    Exit For
    End If
    Next
    End Sub

    0