CODE VBA EXCEL

Karimp54_2122 Messages postés 1 Date d'inscription   Statut Membre Dernière intervention   -  
 franc38 -
Bonjour à tous,
Je rencontre un problème avec mon programme.
Ainsi, je viens vers vous pour solliciter votre aide pour résoudre ce problème. Je précise que je suis un débutant dans la programmation VBA.

En effet, je veux numéroter automatiquement ma BDD dans la colonne "L2" en fonction du contenu de la colonne "A".
J'ai donc coder de la façon suivante : 

 Sub num()
Dim nva As Integer
Dim ligne As Integer
nva = Range("A1") + 1
ligne = 1 'Initialisation de la ligne "A3"
Do Until ligne = nva
Range("L" & ligne) = ligne 'Inscrire dans la colonne "L"
ligne = ligne + 1 'Incrémentation de la ligne de 1 à chaque tour de la boucle
Loop

End Sub


Le programme fonctionne, mais le problème est que je souhaiterais que la numérotation commence de "L2"; ce qui ne marche pas.

Merci d'avance pour aide !

Mes salutations cordiales !
A voir également:

2 réponses

Réponse 1 / 2
franc38
 
Merci Monsieur !
Cela marche à merveille.
Je ne sais quoi vous dire. Dieu merci qu'il existe des personnes charitables prêtes à aider leurs semblables sans rien à attendre de retour. Puisse Dieu vous récompenser pour vos bonnes actions.
1
Réponse 2 / 2
franc38 Messages postés 197 Date d'inscription   Statut Membre Dernière intervention   38
 
Bonjour,
Ne sachant pas la valeur de nva? 
Sub num()
Dim nva As Integer
Dim ligne As Integer
nva = Range("A1") + 1
ligne = 2 'Initialisation de la ligne "A3"
Do Until ligne = nva
Range("L" & ligne) = ligne-1 'Inscrire dans la colonne "L"
ligne = ligne + 1 'Incrémentation de la ligne de 1 à chaque tour de la boucle
Loop

End Sub

A+ François
0