Domaines
RH
Juridique
Compta
Administratif/Moyens Généraux
Communication
Bureautique
Conseils aux débutants
Word
Excel
PowerPoint
Outlook
Access
Publisher

PagePlus (PAO)

Windows/système
PhotoImpact
Conception web : les bases
Applications pas à pas
Tests logiciels
Macros VBA
Leçons
Macros Word
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
Offres d'emploi

Evénements métier
Echos de presse, comptes-rendus

Echanger

Forums
Chater en direct

© 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

14-Oct-2006

 

 

Présentation de l'application
Le classeur de base
Dessiner la UserForm
Le bouton Annuler
Initialisation de la UserForm
Le bouton Valider : les boucles Do Until... Loop.

Le bouton Valider : les boucles While... wend.
Le bouton Valider : insérer les informations dans les cellules

Solution
Le bouton Valider : actualisation du compteur
Déclencher la macro
Synthèse des notions étudiées

Les boucles

Le bouton Valider : les boucles - While... wend

Dans la première partie des boucles, nous avons étudié l'instruction Do Until... Loop (faire jusqu'à ce que... recommencer).

Nous serions parvenu à un résultat similaire avec la syntaxe Tant que... Fin de tant que (While... wend).

While IsEmpty(ActiveCell)=false
    ActiveCell.Offset(1, 0).Activate
Wend

qui pourrait se traduire par
Tant que la celluleactive n'est pas vide (paramètre false)
   Descend d'une ligne (mais reste dans la même colonne)
Fin de la condition

Choisissez l'un ou l'autre de ces deux syntaxes en fonction de vos préférences. Pour ma part, j'opte souvent pour cette seconde formulation, plus proche du langage naturel.

Voyons à présent comment insérer les informations dans les cellules de notre tableau.

Insérer les informations dans les cellules

 

Niveau

Pré-requis :

  • Leçons 1 à 6



ActiveCell :
cellule sur laquelle est positionnée le curseur

IsEmpty(nomdecellule) :
teste si une cellule est vide

IsEmpty(nomdecellule) renvoie :
True = vide
False = non vide

Do until condition
action
Loop

While condition
action
Wend