Problème simple VBA

Résolu

dev -

Bonjour,

Bonjour, je débute en VBA, j'aimerais faire une chose simple,

J'ai un userform dans lequel j'ai une texbox1, une texbox2 et un command bouton1.Je rentre une valeur dans un textbox1, et je clique sur un command Bouton1. La valeur de la textbox1 est cherchée dans la colonne A de la feuille 1 de mon classeur. Et lorsque cette valeur est trouvée, par exemple en A28, alors la valeur en D28 s'affiche dans un texbox2

Afficher la suite

A voir également

Problème simple VBA
14 simple - Guide
Simple comic - Télécharger - Vie quotidienne
Télécharger calculatrice simple gratuit - Télécharger - Calcul & Conversion
Iphone 13 simple prix - Guide
Montage video simple windows - Guide

1 réponse

Réponse 1 / 1
michel_m Contributeur
Bonjour,
a essayer (non testé)
```
With Sheets("feuil1")  
    If Application.CountIf(.Columns(1), textbox1) > 0 Then  
        ligne = .Columns(1).Find(textbox1, .Cells(.Rows.Count, 1), xlValues).Row  
        textbox2 = .Cells(ligne, 4)  
    Else  
    MsgBox textbox1 & "inconnu"  
    End If  
End With
```
Michel
1
1. program
  
  Bonjour,
  
  Merci pour la réponse, j'ai un nouveau problème...
  
  J'aimerais pouvoir enregistrer les valeurs que je rentre dans les textbox a la place des anciennes. Ceci en appuyer sur un commmandbouton2.
  
  Est-ce possible ?
  
  Merci bcp
  
  0
2. pijaku Modérateur
  
  Salut,
  Excusez l'incruste, je crois que michel_m est à l'apéro ;-)
  C'est tout à fait faisable. de la même manière que l'on remplit un textbox avec l'instruction : textbox2 = .Cells(ligne, 4) on peux remplir une cellule à partir du textbox : .Cells(ligne, 4) = textbox2
  
  0
3. program
  
  nikel, merci
  
  Juste une derniere question, quand j'ouvre la userform, j'aimerais que les textbox soient vides, pr le moment ya les dernieres valeurs rentrées.
  Merci
  
  0
4. pijaku Modérateur
  
  Private Sub UserForm_Initialize() textbox1 = "" textbox2 = "" End Sub
  
  Et avec ça se sera?
  
  0
5. program
  
  tres bien merci!!
  
  0

Problème simple VBA

1 réponse

Discussions similaires

Newsletters