Passage à la ligne

Bonjour,

Au lieu de mettre dans mon code : Range("B9").Value = test
Qui me permet d'ajouter mes valeur dans mon tableau,

J'aimerais automatiquement ajouter à chaque exécution la cellule du dessous afin d'incrémenter dans mon tableau sans avoir à changer la cellule moi-même.

Quelle ligne de code dois-je utiliser ?

Juline.

Bonjour

Un exemple du fichier serait bien utile pour apporter une solution

Crdlt

Voici mon fichier avec mes codes

11vba.xlsx (8.36 Ko)

Je dois m'absenter je vois cela dés ce soir

Crdlt

salut,

pas de code dans ton fichier ...

Peut être que celui là fonctionne mieux ?

18vba.xlsm (14.77 Ko)

Bonsoir.

Si cela peut vous aider.

Bonne réception.

Cordialement.

12cuve.xlsm (212.13 Ko)

Bonjour,

Au lieu de mettre dans mon code : Range("B9").Value = test

https://www.excel-pratique.com/fr/astuces_vba/derniere-ligne

Voici le lien qui t'explique comment trouver la derniere ligne rempli.

Tu pourras donc définir la derniere ligne utilisé et ajouter +1:

Sub Cuve()
 derniereLigne = Cells(Rows.Count, 1).End(xlUp).Row + 1
'...
    Range("B" & derniereLigne).Value = test
'...

Pour remplacer rapidement (Ctrl + F)

image

A+

Bonjour

Regarde si cela te convient avec un formulaire

11test-simple.xlsm (29.60 Ko)
Rechercher des sujets similaires à "passage ligne"