Recuperer valeur d'une variable

Bonjour,

je souhaite récupérer la valeur d'une variable d'un autre bouton

Public lig As Integer

Private Sub CommandButton1_Click()
     Static lig As Integer
    If lig = 15 Then lig = 1 Else lig = lig + 1
    Sheets("bdd").Select

et utiliser cette variable dans le code suivant

Private Sub CommandButton3_Click()

dim lig

Range("l" & lig).Value = TextBox3.Value
Range("m" & lig).Value = TextBox4.Value
Range("n" & lig).Value = TextBox5.Value

le soucis c'est que dans mon premier code c'est le boutton qui fait bouger le compteur

et là je sèche

merci par avance si vous pouvez m'aider

cdt

Bonjour,

votre soucis est un problème de "porté" des variables

avec ceci :

Public lig As Integer

vous commencer bien, la variable lig sera accessible dans tout le projet.

ensuite cela se gâte avec ceci :

Private Sub CommandButton3_Click()
dim lig

En effet, une variable définie dans un Sub n'a de porté que dans cette Sub...

en claire vous venez de créer une nouvelle variable lig différente de l'autre et qui du coup a pour valeur "vide" car aucune valeur ne lui est attribuée...

Pour récupérée la valeur de la variable public lig il suffit donc de supprimer votre définition de variable dans la sub.

@ bientôt

LouReeD

Merci ca marche parfaitement bien !

de rien

@ bientôt

LouReeD