Trouve la derniere cellule non-vide d'une colonne. [VBA] - VB/VBA/VBS - Programmation
Marsh Posté le 16-06-2003 à 13:10:15
topikalakon de classe internationale
Marsh Posté le 04-06-2006 à 13:22:28
très constructif la réponse de dane et surtout très utile. la réponse à la question serait à mon avis plus interressante. Au fait ça m'intéresserait aussi. Merci
Marsh Posté le 07-06-2006 à 11:46:57
voici une fonction dispo dans tout bon bouquain VBA
Function DERNIERDANSCOLONNE
Dim DerniereCellule As Range
Application.Volatile
With plage.Parent
With .Cells(.Rows.Count, plage.Column)
If Not IsEmpty(.Value) Then
DERNIERDANSCOLONNE = .Value
ElseIf IsEmpty(.End(xlUp)) Then
DERNIERDANSCOLONNE = ""
Else
DERNIERDANSCOLONNE = .End(xlUp).Value
End If
End With
End With
End Function
Marsh Posté le 07-06-2006 à 15:04:24
Voilà un bout de code qui va surement t'aider, si tu as des questions n'hésite pas!
Dim objexcel As Excel.Application
Dim wbExcel As Excel.Workbook
Dim wsExcel As Excel.Worksheet
'sachant qu'il y a 65536 cellules ds la colonne A, la ligne ci-dessous nous trouve la première cellule vide la colonne A:
objexcel.ActiveCell.Range("A65536" ).End(xlUp).Offset(1, 0)
'pour connaitre le numéro de la ligne ou se trouve la dernière cellule pleine:
objexcel.ActiveCell.Range("A1" ).End(xlDown).Row
wbExcel.Close SaveChanges:=True 'Fermeture du classeur Excel
objexcel.Quit
Set wsExcel = Nothing
Set wbExcel = Nothing
Set objexcel = Nothing
Marsh Posté le 10-06-2006 à 18:26:12
Il me semble que sous VBA Excel, il y a un fonction du genre:
"UseCol" (et UseRow pour les lignes) te donnant le numéro de la derniere cellule utilisé.
Pour le reste...MSDN reste ton ami
Marsh Posté le 29-12-2006 à 17:53:37
jpcheck a écrit : déterrage de topikalacon |
L'important n'est pas de le déterrer, mais d'y apporter une réponse.
Marsh Posté le 16-06-2003 à 09:58:14
Comment puis-je faire pour que le programme trouve la ligne8 comme derniere cellule non-vide de la colonne ?
Merci.
---------------
flick r