remplissage de TextBOx1 si TextBOX2 non vide

[Ilino]

Bonjour Forum
J’ai un tableau dans une feuille nommée « FSEx 2014 » et une colonne 15 ( colonne O)
Et un USF de saisie et un TextBox7
Mon souci est comment faire afficher les résultats de la colonne O( commence de O2) dans TextBox10 si le TextBox7 est remplié ?
grazie
Edit : ce fil annule le file suivant :https://www.excel-downloads.com/threads/changer-combobox-par-textbox-dans-un-usf.224294/

 

[Ilino]

Re : remplissage de TextBOx si TextBOX non vide

Forum Bonjour
je vous sollicite, merci
GRAZIE

 

[Ilino]

Re : remplissage de TextBOx si TextBOX non vide

Bonsoir forum
est ce que mon souci est claire
grazie

 

[laetitia90]

Re : remplissage de TextBOx si TextBOX non vide

bonsoir ilino

perso... rien compris ??? mais un fichier exemple plus simple

 

[Ilino]

Re : remplissage de TextBOx si TextBOX non vide

Re
oky je suis entrain de preparer un fichier exemple;
merci d'avoir répondu
grazie grazie

 

[Ilino]

Re : remplissage de TextBOx si TextBOX non vide

Bonsoir forum, laetitia
ci joint le fichier exemple
mon souci :

Je souhaite quans je saisi une date dans TextBox7 (colonne M) dans le USF UserForm4_FSEx_MAJ Il s’affiche automatiquement la valeur de la cellule O ( de la feuille FSEx 2014)dans le TextBox10 « durée de traitement est de ;;;; » selon la ligne

GRAZIE

 

[Ilino]

Re : remplissage de TextBOx si TextBOX non vide

Bonjour Forum
qlq un peut m'aider?
grazie

 

[laetitia90]

Re : remplissage de TextBOx si TextBOX non vide

bonjour Ilino

comme je comprends

Private Sub TextBox7_Change()
  TextBox10 = Feuil1.Cells(ComboBox1.ListIndex + 2, 15)
 'ou
 ' TextBox10 = "durée de traitement est de    " & Feuil1.Cells(ComboBox1.ListIndex + 2, 15)
End Sub

a quel moment tu met quelque chose dans la colonne O ???? manuellement ???

autrement bien"brouillon tout cela" un seul user pourrait être suffisant

 

[Ilino]

Re : remplissage de TextBOx si TextBOX non vide

ciao laetitia
merci pour la réponse, concernant ta question, la colonne O c'est une formule qui calcul la durée et Le code fonctionne, il m'affiche bien la valeur de la cellule O dans mon textbox. Le problème est qu'une fois l'opération effectuée, le code m’écrase la formule de la cellule O dans le tableau de la feuille "FSEx 2014" ????
je souhaite afficher le résultat de la colonne O dans le TextBox10
grazie
Edit le fichier du post6 est mis a jour parla formule dans la colonne O

 

[Ilino]

Re : remplissage de TextBOx si TextBOX non vide

Forum bonjour
est ce que mon souci est clair, je souhaite votre Aide
grazie

 

[camarchepas]

Re : remplissage de TextBOx si TextBOX non vide

Bonjour Ilino ,

Peut être adapter la dimension du tableau , avec un redim peut être pour ne copier que les colonnes de 1 à 14 ?

 

[Ilino]

Re : remplissage de TextBOx si TextBOX non vide

Ciao NONO
a quel niveau j'adapte la dim du tableau

Private Sub UserForm_Initialize()
Dim Plage As Range
  With Worksheets("FSEx 2014")
    Set Site1 = .Range("A2")
    Set Plage = .Range(Site1, .Range("A65536").End(xlUp))
    Set Tableau = Plage.Resize(, 25) '<---------------------- j'adapte le tableau ???
  End With
  ComboBox1.List = Plage.Value
If TextBox7.Value <> "" Then
TextBox10.Value = Feuil1.Cells(ComboBox1.ListIndex + 2, 15)
End If
End Sub

A+

 

[camarchepas]

Re : remplissage de TextBOx si TextBOX non vide

Set Tableau = Plage.Resize(, 25) '<---------------------- j'adapter le tableau ???

à modifier en

Set Tableau = Plage.Resize(, 14)

 

[Ilino]

Re : remplissage de TextBOx si TextBOX non vide

RE
ça n'a pas marché , le TextBox a écrasé la formule
A+

 

[camarchepas]

Re : remplissage de TextBOx si TextBOX non vide

Trés curieux ,

ici ça fonctionne trés bien .

pas d'écrasement de formule en colonne O