remplissage automatique de textbox

pierrejean

XLDnaute Barbatruc

• 19 Octobre 2006

• #2

Re : remplissage automatique de textbox

bonsoir yul

voila voila

 

Pièces jointes

• yul.xls

  45 KB · Affichages: 168

Vote positif 0 Vote négatif

Y

Yul

Guest

• 20 Octobre 2006

• #3

Re : remplissage automatique de textbox

Un super merci Pierre-Jean !

En fait, je crois que je cherchais à faire trop compliqué !

En revanche, j'ai tenté (mais hélas échoué...) à vider les textboxs si le choix du combobox est vide.
Aurais-tu une piste ?

Encore merci !

a+

Yul

 

Vote positif 0 Vote négatif

E

Evelynetfrancois

XLDnaute Impliqué

• 20 Octobre 2006

• #4

Re : remplissage automatique de textbox

bonjour
comme Pierrejean n'est pas present a cette heure , je me permets de te donner ma solution , qui n'est peut etre pas la plus simple , mais qui fonctionne

apres TextBox4 = Range("E" & Choix_Collectivité.ListIndex + 2)
tu notes
if Choix_Collectivité = "" then
TextBox2= ""
TextBox3= ""
TextBox4= ""
end if

E et F

 

Vote positif 0 Vote négatif

Y

Yul

Guest

• 20 Octobre 2006

• #5

Re : remplissage automatique de textbox

Merci Evelynetfrancois !

Cette solution fonctionne très bien.

Je mets le fichier final en PJ, si ca peut servir à d'autres.

Encore merci.

a+

YUL

 

Pièces jointes

• yul fin.xls

  46 KB · Affichages: 78

Vote positif 0 Vote négatif

porcinet82

XLDnaute Barbatruc

• 20 Octobre 2006

• #6

Re : remplissage automatique de textbox

Bonjour le fil,

Sans avoir regardé le fichier (pas d'excel sur le pc duquel je répond) et juste histoire de donner une autre syntaxe pour vider les textbox (le code proposé par Evelynetfrancois fonctionnant parfaitement) par le biais d'une petite boucle :

apres TextBox4 = Range("E" & Choix_Collectivité.ListIndex + 2)
tu notes

Code:

If Choix_Collectivité = "" Then
   For i=2 to 4
       Controls("TextBox" & i).value=""
   Next i
End If

@+

 

Vote positif 0 Vote négatif