Discussion :

[manupepito]

Bonsoir à tous,
je suis débutant et j'ai besoin de lire et ou ecrire le textbox3 par rapport
à une cellule se trouvant de la colonne C, i
merci

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
Private Sub VALIDER_Click()
 
Dim i As Integer
Dim NbreEleve As Integer, NoteEleve As Integer
Dim Cel As Range
Dim ESSAI As Range
 
Set Cel = Range("A1")
Set ESSAI = Range("C1")
NbreEleve = Cel.End(xlDown).Row - 1
 
    For i = 1 To NbreEleve
        If Cel.Offset(i) = Range("C1") Then
        NoteEleve = Cel.Offset(i, 1)
        TextBox3.Value = ESSAI.Offset(i)
 
    Exit For
 
End If
 
Next i
Range("C1") = TextBox1.Value
Label3 = NoteEleve
Range("H1") = NoteEleve
Label1 = Range("C1")
 
End Sub

[manupepito]

Quelqu'un peut m'aider si ma ligne est

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

TextBox3.Value = ESSAI.Offset(i)

je lis la valeur de la cellule est impossible de modifier et si j'ecris

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ESSAI.Offset(i) = TextBox3.Value

je peux modifier la valeur mais je ne la lis plus
merci de m'aideer

ps j'utilise excel2000

[ouskel'n'or]

Bonjour manupepito,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Set Essai = Range("C1")
TextBox1 = Essai.Value

Fonctionne parfaitement chez moi.
Maintenant tu ne dis rien sur l'emplacement de ton textbox : Est-il dans un userform ou sur la feuille de calculs ?
Pour les labels, tu dois utiliser la propriété "Caption"

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Label1.caption = "coucou c'est moi !"
'ou
Label1.caption = "coucou c'est pas moi !"

Cette syntaxe fonctionne aussi
Bonne journée

[manupepito]

Bonjour ouskel'n'or,
merci de m'aider
mon textbox se trouve dans un userform
je vais t'expliquer mon application pour plus de clareté
j'ai une feuille excel où se trouve dans la colonne A des dates jj/mm/yyyy
dans la colonne B je fais la lecture d'un chiffre et dans la colonne C
je fais la lecture d'un chiffre qui peut être modifié par mon fameux textbox3
quand j'ouvre mon userform à partir d'un bouton, mon userform s'ouvre
avec un calendrier, je click sur une date,puis valide et mes textbox
sont renseignés en fonction de la date du calendrier ; ça ca marche
par contre dans le textbox3 je voudrais lire la valeur et si il y en a une
je voudrais la modifer et l'enregistrer avec un click sur valide

d' avance merci

manupépito

[manupepito]

HELP!!!!
APRES PLUSIEURS RECHERCHE SUR LES FORUM
JE NE TROUVE PAS LA SOLUTION
J'AI EXCEL2000
TextBox3.caption ne marche pas ca me donne un message erreur
j'ai un USF avec mon TextBox3 qui lit une valeur de cellule dans une feuille
excel
je voudrai pouvoir changer la valeur de la cellule et la valider avec
mon bouton valider
MERCI DE M'AIDER

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
Private Sub VALIDER_Click()
 
Dim i As Integer
Dim NbreEleve As Integer, NoteEleve As Integer
Dim Cel As Range
Dim ESSAI As Range
 
Set Cel = Range("A1")
Set ESSAI = Range("C1")
NbreEleve = Cel.End(xlDown).Row - 1
 
    For i = 1 To NbreEleve
        If Cel.Offset(i) = Range("C1") Then
        NoteEleve = Cel.Offset(i, 1)
        TextBox3.Value = ESSAI.Offset(i)  ??????????????????????????????
 
    Exit For
 
End If
 
Next i
Range("C1") = TextBox1.Value
Label3 = NoteEleve
Range("H1") = NoteEleve
Label1 = Range("C1")
 
End Sub

[laetitia]

bonjour manupepito ouskel'n'or le forum un exemple simple a adapter

salutations