VBA - limites ligne & colonne
Résolu/Fermé
Tehani_t
Messages postés
240
Date d'inscription
mercredi 14 juillet 2010
Statut
Membre
Dernière intervention
20 décembre 2011
-
20 oct. 2010 à 20:01
Tehani_t Messages postés 240 Date d'inscription mercredi 14 juillet 2010 Statut Membre Dernière intervention 20 décembre 2011 - 22 oct. 2010 à 00:23
Tehani_t Messages postés 240 Date d'inscription mercredi 14 juillet 2010 Statut Membre Dernière intervention 20 décembre 2011 - 22 oct. 2010 à 00:23
A voir également:
- VBA - limites ligne & colonne
- Déplacer une colonne excel - Guide
- Hors ligne instagram - Guide
- Aller à la ligne excel - Guide
- Vente en ligne particulier - Guide
- Colonne word - Guide
7 réponses
ccm81
Messages postés
10851
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
16 avril 2024
2 404
20 oct. 2010 à 21:23
20 oct. 2010 à 21:23
le nombre de lignes d'une feuille est de 65536 et le nombre de colonnes de 256
on peut récupérer ces valeurs (pour la feuille 1) avec
nbli = Worksheets(1).Rows.Count
nbco = Worksheets(1).Columns.Count
on peut denombrer de même le nombre de lignes et de colonnes d'une plage
je ne sais pas si ça répond à la question
on peut récupérer ces valeurs (pour la feuille 1) avec
nbli = Worksheets(1).Rows.Count
nbco = Worksheets(1).Columns.Count
on peut denombrer de même le nombre de lignes et de colonnes d'une plage
je ne sais pas si ça répond à la question
Tehani_t
Messages postés
240
Date d'inscription
mercredi 14 juillet 2010
Statut
Membre
Dernière intervention
20 décembre 2011
21
20 oct. 2010 à 21:40
20 oct. 2010 à 21:40
Merci !!
est ce différent de Sheets("mafeuil").Usedrange.rows.count ?
est ce différent de Sheets("mafeuil").Usedrange.rows.count ?
ccm81
Messages postés
10851
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
16 avril 2024
2 404
20 oct. 2010 à 21:52
20 oct. 2010 à 21:52
oui
UsedRange définit la plage utilisée dans la feuille de calcul
UsedRange définit la plage utilisée dans la feuille de calcul
Tehani_t
Messages postés
240
Date d'inscription
mercredi 14 juillet 2010
Statut
Membre
Dernière intervention
20 décembre 2011
21
20 oct. 2010 à 22:19
20 oct. 2010 à 22:19
ah ok ! merci !!
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Tehani_t
Messages postés
240
Date d'inscription
mercredi 14 juillet 2010
Statut
Membre
Dernière intervention
20 décembre 2011
21
20 oct. 2010 à 22:21
20 oct. 2010 à 22:21
Y a til une autre fonction plus sure que celles citées précédemment. Quand je trace un tableau, la boucle parcours tout le tableau même si les lignes ne sont pas renseignées ??
ccm81
Messages postés
10851
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
16 avril 2024
2 404
21 oct. 2010 à 08:55
21 oct. 2010 à 08:55
- je suppose que ton tableau est une plage de la feuille de calcul
- parcourir une plage (ou un tableau) fait obligatoirement passer par toutes les cellules de la plage, on peut éventuellement en tester le contenu pour déclencher une action
- j'ai besoin de quelques explications supplémentaires pour aller plus loin (comment se présente la feuille, que veux tu faire faire à VB et peut être la partie du code qui pose problème)
- parcourir une plage (ou un tableau) fait obligatoirement passer par toutes les cellules de la plage, on peut éventuellement en tester le contenu pour déclencher une action
- j'ai besoin de quelques explications supplémentaires pour aller plus loin (comment se présente la feuille, que veux tu faire faire à VB et peut être la partie du code qui pose problème)
Tehani_t
Messages postés
240
Date d'inscription
mercredi 14 juillet 2010
Statut
Membre
Dernière intervention
20 décembre 2011
21
22 oct. 2010 à 00:23
22 oct. 2010 à 00:23
tout simplement. j'ai une plage à parcourir A1:D5. Si mon tracé de tableau s'étend jusqu'à la ligne 7, ma boucle (sous VB) ira jusqu'à la fin du tableau.
cousinhub29
Messages postés
881
Date d'inscription
mardi 10 août 2010
Statut
Membre
Dernière intervention
16 avril 2024
333
21 oct. 2010 à 13:06
21 oct. 2010 à 13:06
Bonjour,
Un petit essai...
Bonne journée
Un petit essai...
Sub LesDer()
Dim DerCel As Range
Dim DerCol As Long, DerLig As Long
DerLig = Cells.Find("*", , , , xlByRows, xlPrevious).Row
DerCol = Cells.Find("*", , , , xlByColumns, xlPrevious).Column
Set DerCel = Cells(DerLig, DerCol)
MsgBox "La dernière ligne utilisé est la ligne : " & DerLig
MsgBox "La dernière colonne utilisée est la colonne : " & DerCol
MsgBox DerCel.Address
End Sub
Bonne journée
