A voir également:
- Commendbuton suivant
- Chaque paragraphe doit être espacé de 0,42 cm ou 12 pt du paragraphe suivant libre office - Guide
- À l'aide des tableaux ci-dessous, trouvez le mot dont le code ascii est le suivant : 61 64 6d 69 73 73 69 6f 6e - Forum Programmation
- Publipostage enregistrement suivant ne fonctionne pas - Forum Word
- Copiez l'image dans un logiciel d'édition d'images ou un outil en ligne comme js paint ou pixlr e. remplissez les cases en suivant le code couleur. des cases supplémentaires vont se remplir automatiquement. que représente le dessin ? ✓ - Forum Photoshop
- Reproduction d'un dessin - Forum Graphisme
2 réponses
Bonjour,
Déjà... quel code as tu utilisé pour faire ta recherche ?
Ensuite.. si tu veux rechercher TOUTES les valeurs directement... tu peux utiliser un FIND ALL
https://forums.commentcamarche.net/forum/affich-37621992-methode-find-dans-vba-recherche-de-donnees-sous-excel#findall
Déjà... quel code as tu utilisé pour faire ta recherche ?
Ensuite.. si tu veux rechercher TOUTES les valeurs directement... tu peux utiliser un FIND ALL
https://forums.commentcamarche.net/forum/affich-37621992-methode-find-dans-vba-recherche-de-donnees-sous-excel#findall
merci pour votre aide jordane45
j'ai mentionné le code de recherche
(Private Sub CommandButton3_Click()
Dim no_ligne As Integer
no_ligne = ComboBox1.ListIndex + 2
TextBox1.Value = Cells(no_ligne, 1).Value
TextBox2.Value = Cells(no_ligne, 2).Value
TextBox3.Value = Cells(no_ligne, 3).Value
TextBox4.Value = Cells(no_ligne, 4).Value
TextBox5.Value = Cells(no_ligne, 5).Value
TextBox6.Value = Cells(no_ligne, 6).Value
TextBox7.Value = Cells(no_ligne, 7).Value
TextBox8.Value = Cells(no_ligne, 8).Value
End Sub
j'ai mentionné le code de recherche
(Private Sub CommandButton3_Click()
Dim no_ligne As Integer
no_ligne = ComboBox1.ListIndex + 2
TextBox1.Value = Cells(no_ligne, 1).Value
TextBox2.Value = Cells(no_ligne, 2).Value
TextBox3.Value = Cells(no_ligne, 3).Value
TextBox4.Value = Cells(no_ligne, 4).Value
TextBox5.Value = Cells(no_ligne, 5).Value
TextBox6.Value = Cells(no_ligne, 6).Value
TextBox7.Value = Cells(no_ligne, 7).Value
TextBox8.Value = Cells(no_ligne, 8).Value
End Sub
1 - Tu n'as pas utilisé les balises de code pour poster ton code !!!
Pour poster du code sur le forum.. merci d'utiliser la coloration syntaxique (les balises de code).
Explications disponibles ici : https://codes-sources.commentcamarche.net/faq/10686-le-nouveau-codes-sources-comment-ca-marche#balises-code
2 - En quoi le code que tu nous montres effectue une quelconque recherche ??? Pour moi il ne sert qu'à remplir des textBox en fonction d'un numéro de ligne.... mais en aucun cas ça ne fait une recherche !
Pour poster du code sur le forum.. merci d'utiliser la coloration syntaxique (les balises de code).
Explications disponibles ici : https://codes-sources.commentcamarche.net/faq/10686-le-nouveau-codes-sources-comment-ca-marche#balises-code
2 - En quoi le code que tu nous montres effectue une quelconque recherche ??? Pour moi il ne sert qu'à remplir des textBox en fonction d'un numéro de ligne.... mais en aucun cas ça ne fait une recherche !