VISUAL BASIC pour EXCEL

Liko -  
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
    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