bouton valider et MODIFIER

Roland_M

XLDnaute Barbatruc

• 2 Juin 2015

• #2

Re : bouton valider et MODIFIER

Bonjour,

l'erreur c'est ta variable ligne !?
tu as ceci: Li, puis L, puis Ligne !?

Dim VarReponse As String, Li As Long
l = Me.ComboBox1.ListIndex
Cells(Ligne, i) = Me.Controls("Textbox" & i)

il faut être cohérent ! essais ceci avec Lig pour tout le monde !

Dim VarReponse As String, Lig As Long
Lig = Me.ComboBox1.ListIndex
Cells(Lig, i) = Me.Controls("Textbox" & i)


et puis il faut revoir tes boucles tu n'as que 8 Textbox et pas 10 !?
tes lignes sur feuille débutent en 2'ligne
ListIndex débute à 0 pour la première ligne
les colonnes sur feuille débutent en C 3'colonne et pas 1 comme tes boucles I (d'ailleurs une seule suffit)

Me.ComboBox1.ListIndex est faux !
qu'est ce que tu fais de Me.ComboBox2.ListIndex le prénom ça n'est pas du tout ça !
il faut faire une recherche du nom ET du prénom !

ton code est complément incorrect, tout est à revoir !? il y a du travail !

 

Dernière édition: 2 Juin 2015

Vote positif 0 Vote négatif

reinruof77

XLDnaute Occasionnel

• 2 Juin 2015

• #3

Re : bouton valider et MODIFIER

boujour roland M

déjà Merci de me répondre aussi rapidement
en fait j'ai repris le code que j'avais sur un autre fichier qui fonctionnait très bien et comme je l'avait dit "(je ne suis pas très doué sur le vba"
j’essaie de comprendre et comme je suis autodidacte c'est pas facile
je vais faire des recherche pour voir comment je peux avancer

Merci de ton aide

 

Vote positif 0 Vote négatif

Roland_M

XLDnaute Barbatruc

• 2 Juin 2015

• #4

Re : bouton valider et MODIFIER

re

voir comme ceci

EDIT: je n'ai rien fais pour "Valider" car je sais pas ce que tu veux faire !?

 

Pièces jointes

• suivi repas AIDE_Rol.xlsm

  34.9 KB · Affichages: 30

Dernière édition: 2 Juin 2015

Vote positif 0 Vote négatif

Papou-net

XLDnaute Barbatruc

• 2 Juin 2015

• #5

Re : bouton valider et MODIFIER

Bonjour reinruof77, Roland_M, le Forum,

Voici une solution appliquée aux boutons Valider/Modifier.

Au lieu de rendre les boutons invisibles, j'ai pensé qu'il valait mieux les désactiver.

Dans la première hypothèse, il suffit de remplacer la propriété .Enabled par .Visible.

Cordialement.

 

Pièces jointes

• Copie de suivi repas AIDE v1.xlsm

  37.3 KB · Affichages: 39

Vote positif 0 Vote négatif

reinruof77

XLDnaute Occasionnel

• 2 Juin 2015

• #6

Re : bouton valider et MODIFIER

Re Roland
en effet cela n'as rien a voir avec ce que j'ai fait c'est la que l'on reconnait les bons des mauvais. le seul problème avec la (fusion )des nom et prénom c'est que je ne peux pas faire d'ajout (en tout cas a ma connaissance) oui je sait je n'en n'est pas beaucoup.
le bouton Valider sert justement a cela si je doit rajouter des personnes dans la liste. ce qui n'empeche pas le super boulot que tu as fait et je t'en remercie beaucoup.

Papou-net
Merci mais la macro ne fonctionne Pas elle bloque sur ligne.

 

Vote positif 0 Vote négatif

Papou-net

XLDnaute Barbatruc

• 2 Juin 2015

• #7

Re : bouton valider et MODIFIER

Papou-net
Merci mais la macro ne fonctionne Pas elle bloque sur ligne.

Cliquez pour agrandir...

Sur quelle ligne bloque-t-elle?

Parce que chez moi, sous 2010, ça fonctionne sans erreur.

Cordialement.

 

Vote positif 0 Vote négatif

reinruof77

XLDnaute Occasionnel

• 2 Juin 2015

• #8

Re : bouton valider et MODIFIER

Code:

Cells(Ligne, i) = Me.Controls("Textbox" & i)

ça bloque ici

 

Pièces jointes

• Capture1.PNG

  27 KB · Affichages: 34
• Capture1.PNG

  27 KB · Affichages: 33
• Capture1.PNG

  27 KB · Affichages: 41

Dernière édition: 2 Juin 2015

Vote positif 0 Vote négatif

Roland_M

XLDnaute Barbatruc

• 2 Juin 2015

• #9

Re : bouton valider et MODIFIER

re

Papou-net, voir explication au post #2 ! Ligne n'existe pas donc = 0

l'erreur c'est ta variable ligne !?
tu as ceci: Li, puis L, puis Ligne !?

Dim VarReponse As String, Li As Long
l = Me.ComboBox1.ListIndex
Cells(Ligne, i) = Me.Controls("Textbox" & i)

il faut être cohérent ! essais ceci avec Lig pour tout le monde !

Dim VarReponse As String, Lig As Long
Lig = Me.ComboBox1.ListIndex
Cells(Lig, i) = Me.Controls("Textbox" & i)


et puis il faut revoir tes boucles tu n'as que 8 Textbox et pas 10 !?
tes lignes sur feuille débutent en 2'ligne
ListIndex débute à 0 pour la première ligne
les colonnes sur feuille débutent en C 3'colonne et pas 1 comme tes boucles I (d'ailleurs une seule suffit)

Me.ComboBox1.ListIndex est faux !
qu'est ce que tu fais de Me.ComboBox2.ListIndex le prénom ça n'est pas du tout ça !
il faut faire une recherche du nom ET du prénom !

Cliquez pour agrandir...

j'ai solutionné ça dans ma proposition !

 

Vote positif 0 Vote négatif

reinruof77

XLDnaute Occasionnel

• 2 Juin 2015

• #10

Re : bouton valider et MODIFIER

re Roland
avec ta méthode je suis bloquer pour ajouter des nom et prénom sur les feuilles je ne sait pas comment faire .
a tu une solution ?

 

Vote positif 0 Vote négatif

Roland_M

XLDnaute Barbatruc

• 2 Juin 2015

• #11

Re : bouton valider et MODIFIER

re

bien entendu que des solutions il y en a ! le problème c'est le temps !

mon exemple fonctionne très bien !
mais c'est vrai qu'avec les rajouts il faut séparer nom et prénom
on pourrait envisager de saisir dans la liste comme je l'ai fais
et de séparer le nom et le prénom par un ( ; )
tata;jean

si j'ai le temps je peux faire un essai mais je ne te promet rien !!

 

Dernière édition: 2 Juin 2015

Vote positif 0 Vote négatif

reinruof77

XLDnaute Occasionnel

• 2 Juin 2015

• #12

Re : bouton valider et MODIFIER

super Merci a toi de prendre de ton temps pour m'aider



je vais regarder de mon coté aussi
a bientôt j’espère

 

Vote positif 0 Vote négatif

reinruof77

XLDnaute Occasionnel

• 2 Juin 2015

• #13

Re : bouton valider et MODIFIER

super Merci a toi de prendre de ton temps pour m'aider



je vais regarder de mon coté aussi
a bientôt j’espère

 

Vote positif 0 Vote négatif

Roland_M

XLDnaute Barbatruc

• 2 Juin 2015

• #14

Re : bouton valider et MODIFIER

re

voir ce premier jet si ça conviendrait ?

je devrais encore vérifier car j'ai fais vite je dois m'absenter !


EDIT: VOILA AVEC LA MODIF SAISIE !

 

Pièces jointes

• suivi repas AIDE_Rol_2.xlsm

  44.3 KB · Affichages: 32

Dernière édition: 2 Juin 2015

Vote positif 0 Vote négatif

reinruof77

XLDnaute Occasionnel

• 2 Juin 2015

• #15

Re : bouton valider et MODIFIER

J ai un RDV je regarde ca après en tout cas je te remercie déjà beaucoup.

 

Vote positif 0 Vote négatif