Boucles et manipulation des cellules

Bonsoir ou bonjour à toutes et tous;

J'aimerais avoir une aide sur la création d'une boucle, je suis débutant en vba.

Sub()

Dim presence As Intger

Dim no_ligne As Integer

Do until activecell=""

Sheets("Sources").Range("A1").Select

ActiveCell.Offset.no_linge(0,1).Value=presence

Dossier("Dossier").Sheets("Présence").Activat

Range("A1").Value= Presence

Sheets("Source").Activate

qu'il exécute jusqu'à que la cellule Active du colonne A de la feuil "Source" est vide.

Loop

En fait c'est la gestion de présence: les cellules B contiennent le nbr des jours de présence.

Merci d'avance.

Bonjour,

Sans la feuille qui va bien avec une macro ne veut pas dire grand chose...

Avant d'apprendre à faire des boucles il va d'abord falloir apprendre à joindre un bout de fichier !

A+

Bonjour,

Qui plus est, le .offset porte sur no.linge au lieu de no.ligne

Et il manque un e à la fin d'un activate.

Merci