Comment comparer la longueur des colonnes
#1
Aspirant XLPages

Inscription: 05/10/2008

Messages: 24

Système d'exploitation:
PC
Version Excel utilisée:
2007
Posté le : 08-10-2009 14h36
Bonjour à tous,
j'ai 4 colonnes de longueur differentes qui change tous les jours et je voudrais en vba identifier la plus longue ou trouver la cellule  la plus basse de la feuille
j'ai essayé ça

derCell = Sheets("Caisses").UsedRange.SpecialCells(xlLastCell).Row
Sheets("Caisses").Range("E3:K" & derCell).Select

mais ça me selectionne j'usqu'en bas de la feuille alors si quelqu'un peut m'aider ??

Pièce jointe:
zip Caisses.zip   [ Taille: 23.62 Ko - Téléchargements: 482 ]
Hors Ligne
Rapport   Haut 

Re: Comment comparer la longueur des colonnes
#2
Accro XLPages

Inscription: 09/01/2008
De Montréal, Québec

Messages: 463

Système d'exploitation:
PC
Version Excel utilisée:
97 à 2016
Posté le : 08-10-2009 15h47
Bonjour spookyz,

J'ai modifié le code du module1.

Tu aurais intérêt à poser la directive Option Explicit à tous les modules.
C'est une erreur de ne pas le faire mais la majorité sinon la totalité des débutants ne le savent pas.

Microsoft :
«Utilisez l'instruction Option Explicit pour éviter toute faute de frappe lors de la saisie du nom d'une variable existante ou pour écarter tout risque de confusion dans un code où la portée de la variable n'apparaît pas clairement. Si vous n'utilisez pas l'instruction Option Explicit, toutes les variables non déclarées prennent le type Variant.»

Or les variables de type Variant sont notoirement lourdes. Donc déclarer les variables avec le bon type allège le code.

J'ai commenté le code dans la procédure cree_la_plage().

Guy
Pièce jointe:
xlsm Caisses_Mod.xlsm   [ Taille: 23.72 Ko - Téléchargements: 471 ]

Hors Ligne
Rapport   Haut 

Re: Comment comparer la longueur des colonnes
#3
Aspirant XLPages

Inscription: 05/10/2008

Messages: 24

Système d'exploitation:
PC
Version Excel utilisée:
2007
Posté le : 08-10-2009 16h04
C'est super merci Guy je prend aussi bonne note de tes conseils de declaration de variable
autre chose je viend de m'apercevoir qu'une cellule tout en bas de la feuille etait rempli dans le fichier que j'ai poster
et c'est pourquoi ça me prenais toute la feuille ce code fonctionne aussi tres bien


derCell = Sheets("Caisses").UsedRange.SpecialCells(xlLastCell).Row
Sheets("Caisses").Range("E3:K" & derCell).Select
désolé pour ce post inutile mais un grand merci pour ton code et ton aide
Hors Ligne
Rapport   Haut 


Vous pouvez voir les sujets.
Vous ne pouvez pas débuter de nouveaux sujets.
Vous ne pouvez pas répondre aux contributions.
Vous ne pouvez pas éditer vos contributions.
Vous ne pouvez pas effacez vos contributions.
Vous ne pouvez pas ajouter de nouveaux sondages.
Vous ne pouvez pas voter en sondage.
Vous ne pouvez pas attacher des fichiers à vos contributions.
Vous ne pouvez pas poster sans approbation.

[Recherche avancée]


Qui consulte actuellement ce sujet ?   1 Utilisateur(s) anonymes