Domaines
RH
Juridique
Compta
Administratif/Moyens Généraux
Communication
Bureautique
Conseils aux débutants
Word
Excel
PowerPoint
Outlook
Access
Publisher
Windows/système
PhotoImpact
Conception web : les bases
Applications pas à pas
Tests logiciels
Macros VBA
Leçons
Macros Word
Macros Excel
Astuces
Orthographe
Rédaction
Organisation
Produits/services malins
Outils
Ouvrages
Modèles
Macros
Liens
Anglais
Grammaire avec AnglaisFacile
Leçon gratuite avec AnglaisFacile
Carrière
Gestion de carrière
Fiches métier
Témoignages / vécu
 
Evénements métier
Echos de presse, comptes-rendus

Echanger

Forums

© Nadège Guilbert
Le contenu de ce site
est régulièrement déposé auprès de la SGDL
Reproduction interdite
sans le consentement
écrit de l'auteur



Imprimer la page

Macros / VBA > Index

13-Avr-2009

 

 

 


Déterminer la première cellule vide d'un tableau

Quelques fois, vous aurez besoin d'ajouter des éléments dans un fichier dont vous ne connaîtrez pas la dernière ligne.

Voici donc la portion de code à ajouter pour se positionner sur la première ligne vide :

range("a1").activate
while activecell <>""
activecell.Offset (1,0).Activate
wend

  • remplacer les coordonnées de cellule en rouge par l'adresse de la première cellule de votre tableau (entête de votre tableau) ;
  • compléter ensuite avec vos instructions.

Déterminer la colonne de la cellule active

Dans certains cas de figure, vous aurez besoin de récupérer le numéro de la colonne sur laquelle vous vous trouvez, par exemple, pour supprimer la colonne en cours.
Voici l'instruction pour récupérer cette information :

MaColonne=activecell.column

Vous pouvez ensuite utiliser MaColonne dans vos instructions pour faire référence à cette colonne. Par exemple, vous êtes sur la colonne E, 3e ligne et souhaitez aller sur la ligne 5 de la même colonne (donc E5).
L'instruction sera : range(MaColomne & "5").select

Récupérer le numéro de la ligne active

Cette fois, c'est le numéro de la ligne que nous souhaitons récupérer et ce n'est guère plus compliqué :

MaLigne=activecell.row

Vous pouvez ensuite utiliser MaLigne de la même manière que MaColonne : range("B" & MaLigne).select.

Niveau