interraction userform / feuille excel

interraction userform / feuille excel - VB/VBA/VBS - Programmation

Marsh Posté le 15-05-2005 à 13:31:17    

[email]
Voilà mon problème:
 
je voudrais effectuer ceci:
 
1) saisie dans une imputbox du code désiré
2) recherche dans la colonne A de la feuil1 excel de ce code
3) si trouvé:affichage d'un userform en textbox
- le code  
- la valeur de la colonne B correspondante
- la valeur de la colonne C correspondante
4) modification des éléments du userform et modification de la feuil1 après validation et fermeture du userform.
 
J'arrive à faire des trucs mais mon gros problème est la communication entre le userform et la feuil excel. Plus précisemment, la variable "ligne":
"
"
Sub TextBox1_Change()
Dim ligne
Worksheets("feuil1" ).Cells(ligne, "A" ) = UserForm1.TextBox1
End Sub
 
le userform connait pas Cells(ligne, "A" ) ??????
 
si vous avez des idées ... je débute et je suis coincé  
 
merci  
 
 
   

Reply

Marsh Posté le 15-05-2005 à 13:31:17   

Reply

Marsh Posté le 15-05-2005 à 13:46:18    

Worksheets("feuil1" ).Cells(ligne, 1) = UserForm1.TextBox1
 
Pour cells, les deux paramètres doivent être numériques.


---------------
Si on vous donne une info qui marche, DITES-LE!!!! ------ Si vous trouvez seul, AUSSI, votre solution peut servir à d'autres! ------ Je dois la majorité de mes connaissances à mes erreurs!
Reply

Marsh Posté le 15-05-2005 à 13:46:19    

Worksheets("feuil1" ).Cells("A" & ligne) = TextBox1
 
reste a definir la variable ligne!!!.


Message édité par nounou10 le 15-05-2005 à 13:47:32
Reply

Marsh Posté le 15-05-2005 à 14:08:14    

AlainTech a écrit :

Worksheets("feuil1" ).Cells(ligne, 1) = UserForm1.TextBox1
 
Pour cells, les deux paramètres doivent être numériques.


 
il faut utiliser "range" à la place de cell ???

Reply

Marsh Posté le 15-05-2005 à 14:10:46    

exact.
 
Worksheets("feuil1" ).range("A" & ligne) = TextBox1  

Reply

Marsh Posté le 15-05-2005 à 14:12:26    

nounou10 a écrit :

Worksheets("feuil1" ).Cells("A" & ligne) = TextBox1
 
reste a definir la variable ligne!!!.


 
la variable ligne a été définie publique au niveau général /déclaration
en faisant cela je pensais que la valeur ligne connu au niveau de l'objet feuil1 serait connu également au niveau du userform ???
 
je dois rien avoir compris (il y a du boulot)

Reply

Marsh Posté le 15-05-2005 à 14:20:19    

perso je debute un peut aussi.
et je definie mes variable juste avant de les utilisers.
je n'est jammais eu de soucis.
 
ex:
        v = 0
        Do
        v = v + 1
        Loop Until ActiveSheet.Range("b" & v) = ""
        ActiveSheet.Range("A" & v) = TextBox5.Text
        ActiveSheet.Range("b" & v) = TextBox6.Text
        ActiveSheet.Range("c" & v) = TextBox7.Text
        Sheets("prog" ).Range("a1" ) = TextBox6.Text

Reply

Marsh Posté le 15-05-2005 à 14:25:04    

mais il me semble avoir lu qque part que la variable n'est valide que pour le sub actif

Reply

Marsh Posté le 15-05-2005 à 14:29:39    

calimero48 a écrit :

il faut utiliser "range" à la place de cell ???


Pas du tout!
 
Cells convient parfaitement pour cette utilisation.
Il faut juste mettre 1 à la place de "A".
 
Et ta variable ligne est bien définie à l'endroit où il faut.


---------------
Si on vous donne une info qui marche, DITES-LE!!!! ------ Si vous trouvez seul, AUSSI, votre solution peut servir à d'autres! ------ Je dois la majorité de mes connaissances à mes erreurs!
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed