Excel VBA 2016 Derligne. Retrouver la derniere ligne non vide d'une base de données - YouTube
Address bonne journée @+ #6 une formule que j'avais trouvé sur ce site (merci à l'auteur: peut-être Monique) =MAX(SI(ESTNA(EQUIV(9^9;A:A));"";EQUIV(9^9;A:A));SI(ESTNA(EQUIV("zz";A:A));"";EQUIV("zz";A:A))) a+ #7 Salut Si... VBA, peut-être ainsi? Option Explicit 'dans le module de la feuille, à adapter Private Sub Worksheet_SelectionChange(ByVal Target As Range) On Error Resume Next Application. EnableEvents = False Dim Ou As String, Dli As Long Ou = Selection. SpecialCells(xlCellTypeConstants). Address Dli = Right(Ou, Len(Ou) - InStrRev(Ou, "$")) MsgBox Dli 'pour voir Application. Récupération de la dernière cellule non vide d'une colonne - Macros et VBA Excel. EnableEvents = True End Sub #8 merci à vous 4 pour avoir pris de votre temps pour m'apporter des éléments de réponse. Je précise à l'attention de CHALET53 que je veux faire ça en VB... Sinon pour les autres, j'essaie de comprendre ce que vous m'avez proposé, et c'est pas évident vu mon niveau en VB... Mais je m'accroche. J'avoue quand même que si l'utilisation de Find permet de résoudre mon problème, ça a l'ar plus simple.
Bref, rien qui marche irréprochablement sans être obligé de reprendre derrière. Bon alors, pour ne pas bouffer trop de temps cpu en partant de rien, on va partir de celui qui minimise les risque de louper quelque chose, UsedRange et on élague dabord les dernière lignes quand même vides selon notre critère. Pareil ensuite pour les colonnes quand même vides. Notre critère: le nombre de cellule vallant une chaîne vide est égal au nombre de cellules. Vba trouver la dernière ligne non vide mes placards. CoutIf est le nom natif de la fonction Excel Donc dans une expression formule pour la dernière ligne de ma plage momentanément retenue ma condition serait: (MaLigne;"")=COLONNES(MaLigne) Alors ce n'est pas ma dernière ligne et je décrémente celle ci avant de recommencer avec la précédente jusqu'à éviter de ramer même sur la falaise. J'espère que mon code vous paraît à présent plus clair. Si quelqu'un a mieux je suis preneur. Dernière édition: 25 Mai 2011 #11 Merci de ces précisions! Pour info à force de chercher, je viens de trouver ça qui détecte bien le fait que ma cellule "F10" n'affiche rien alors qu'elle comporte bien une formule conditionnelle du type If(test OK, blabla, "").
Cells(, 1) fonctionne de la même manière que la sélection de la dernière ligne et de la première colonne de la feuille de calcul. Cet enregistrement dans Excel 2010 ressemblera à ceci: A1048576. L'expression Cells (1, ) a le même effet que la sélection par l'utilisateur de la première ligne et de la dernière colonne de la feuille. La combinaison de l'instruction Cells avec la propriété End vous permet d'accéder à la dernière ligne ou colonne utilisée. Cette instruction équivaut à aller à la cellule A1048576 ou à appuyer sur Ctrl + Maj + flèche vers le haut. Ensuite, Excel passe automatiquement à la dernière ligne utilisée dans la colonne A. Cells(, 1)(xlUp) Exécuter cette instruction revient à aller dans une cellule XFDI ou à appuyer sur Ctrl + Maj + flèche gauche. En conséquence, Excel ira automatiquement à la dernière colonne utilisée dans la première ligne. Vba trouver la dernière ligne non vide le. Cells(1, )(xlToLeft) Après avoir accédé à la dernière ligne (ou colonne) utilisée, vous pouvez utiliser la propriété Offset pour descendre ou passer à la ligne (ou colonne) vide suivante.