MFC dans cellule

[MacMac]

bonjour le forum

j'ai une petite question pour mon application

voila dans cellule F22 jais mit une mise en forme conditionnel couleur suivant le texte saisie ma question suivant je voudrait effacer les cellules g22 a v 22
si je rentre du texte dans la cellule F22

comment procedez sachant que je rentre les saisis par userform et est il possible autogenerer le userform sans le fermer

merci de votre aide et en esperant que je suis assez explisite vus ma noviciter

Merci MacMac @+

 

[Dan]

Re : MFC dans cellule

Bonjour,

Essaie avec ce code :

If Not IsNumeric(Range("F22")) = False Then End
Range("G22:V22").ClearContents

Si tu travailles avec une USF, il te faudra le placer dans le code USF mais il ne s'exécutera que lorsque tu confirmeras les données mises dans l'USF.

Amicalement
Dan

 

[MacMac]

Re : MFC dans cellule

bonjour , Dan

je vient de mettre le code dans usf mets sa me plante impossible de rouvrir le usf erreur de compilation f22 est colorer soit je le place mal ou il me manque un truc peut tu m'eclairer Merci a toi



MacMac

 

[Dan]

Re : MFC dans cellule

re,

Pas facile sans voir l'appli.
Mais essaie en modifiant le code comme suit

If IsNumeric(Range("F22")) = False Then Range("G22:V22").ClearContents

A te lire
Dan

 

[MacMac]

Re : MFC dans cellule

Re Dan

voila je viens de essayer mais impossible a faire fonctionner

concernant le fichier impossible de le mettre en ligne vus sa grosseur desoler

mais j'aurais une suggestions concernant se systeme voila je remplis mon tableau via un usf dans laquelle il y a des combo et je possede un bouton qui me vide tous les combo avec se model de code

Private Sub CommandButton28_Click()
Dim Confirm As Integer
Confirm = MsgBox("Attention Vous allez videz les cellule de Mr Devassine Joel ", _
vbQuestion + vbYesNo, "Message d'alerte")
If Confirm = vbNo Then
MsgBox ("Vous avez refusez de videz les cellules dont vous etes rediriger au formulaire de saisie !!! ")
Exit Sub
End If
ComboBox6.Text = Clear
ComboBox7.Text = Clear
ComboBox8.Text = Clear
ComboBox9.Text = Clear
ComboBox82.Text = Clear
ComboBox83.Text = Clear
ComboBox84.Text = Clear
ComboBox85.Text = Clear
ComboBox86.Text = Clear
ComboBox87.Text = Clear


End Sub

cela me vide les cellule en sachant que se n'est q'un exp est non la totaliter

question

peut remplir une combo quelqu'onc et que le reste des combo se fait clear cela arrangerai au mieux mon truc si oui comment procedez
merci

MacMac

 

[Dan]

Re : MFC dans cellule

Re,

Pas facile de te conseiller là.
Une idée serait de te faire confirmer que tu veux vider chaque Combo par un message. Si confirmation on vide sinon on laisse.
Une autre idée, serait d'avoir une case à cocher à coté de la Combo qui, si cochée, autoriserait que la Combo soit vidée.
Un peu compliqué cela et surtout l'appli peut devenir "usine à gaz".


A bientôt
Dan