Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

cliquer sur cellule pour ouvrir un userform ???

  • Initiateur de la discussion Initiateur de la discussion yoyo77
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

yoyo77

XLDnaute Occasionnel
🙂 Bonjour le Forum 😉,

Pouvez vous m'aider SVP j'essay de faire un userform2 pour qu'en cliquant sur une cellule il s'ouvre pour pouvoir la modifier ainsi que d'autres donc tous sur la même ligne.

Pas evident je suis debutant j'ai en F11 preparer le terrain le userform1 fonctionne parfaitement grace au forum et aux personnes qui ont eu la gentillesse de m'aider 😉

je mets en pièce jointe le fichier

Merci à tous 😱

yoyo 😀
 

Pièces jointes

Re : cliquer sur cellule pour ouvrir un userform ???

Bonjour xhudi69🙂,

"Trop Fort" xhudi69, encore une fois tu est la pour m'aider à resoudre mon problème 🙂 et j'en suis bien heureux 😀

J'ai testé ta Modif et donc l'ouverture fonctonne bien mais il se produit une erreur (For sans Next) quand je valide 😕

Aprés je ne suis pas sur que les bouts de macro que j'ai affecté à l'userform2 correspondent bien 🙁

Pour l'erreur il manque un End If ou quelque chose comme ca ?

Merci 🙂 beaucoup 😎

yoyo
 
Re : cliquer sur cellule pour ouvrir un userform ???

Re:

Ok Merci beaucoup c'est presque ca mais en faite quand je double clique sur en cours (ex : M5) j'aimerais modifier donc "M5" en "Clôturé" inscrire la "date de clôture" en "N5" et un "commentaire" en "O5"

Et que ce principe de fonctionnement soit valable pour toute la colonne "M"

En faite c'est un suivi des anomalies donc les lignes renseignent les anomalies "en cours" et j'aimerais si l'anomalie est resolue modifier une ligne souhaitée (Colonne M,N,O) pour indiquer clôturé etc...

Dans cette version les clôturés se rajoute à la suite 🙂

est-ce que je suis claire car c'est pas évident à expliquer ?

Merci 🙂
 
Re : cliquer sur cellule pour ouvrir un userform ???

re :

😀 j'ai essayé de la dire en #1 et dans la bulle de mon fichier mais comme je t'ai dit pas facile à expliquer 😱

Merci 😎
 
Re : cliquer sur cellule pour ouvrir un userform ???

re;

😀 xhudi69, c'est tout à fait ca !!! c'est bon c'est la dernière cette fois 😀 (quoi que🙄)

Je m'incline 😉 j'avais un doute pour la faisabilité et tu as réussi ! J’ai été jeté un coup d’œil en F11 pour comprendre et j’ai vu la différence avec ce que j’avais collé !🙂
Je suis impressionné par Excel je ne savais pas qu’on pouvait faire tant de chose 😀
Merci pour ton aide 😎😎😎
Passe un excellent week-end 😀
Yoyo
 
Dernière édition:
Re : cliquer sur cellule pour ouvrir un userform ???

Bonsoir xhudi69 🙂, le Forum🙂,

oups Je me suis trompé de poste mais bon c'est pas trop grave ca reste dans le même cadre 😛

J'ai du mal avec mon autre projet que je pensais terminé 🙁,

je suis quand même fière car j'ai reussi à faire un userform2 grace toi xhudi69 😀 mais

la je bloque 😕 je n'arrive pas à trouver comment faire en Feuille "Mars" un compteur ,

j'ai mis le fichier en pièce jointe car pour expliquer ca c'est pas evident en faite la version précedente renseignait

les agents et les manoeuvres et maintenant j'ai rejouté le genre : pratique / théorique et révision.

j'ai essayé ca mais ca ne marche pas :

If .Cells(i, 1).Value = ComboBox1.Value Then
If ComboBox7.Value = "Pratique" Then
If .Cells(i, col1).Value = "" Then
.Cells(i, col1).Value = 1
Else
.Cells(i, col1).Value = .Cells(i, col1).Value + 1
End If
End If
End If
If .Cells(i, 1).Value = ComboBox3.Value Then
If ComboBox7.Value = "Pratique" Then
If .Cells(i, col1).Value = "" Then
.Cells(i, col1).Value = 1
Else
.Cells(i, col1).Value = .Cells(i, col1).Value + 1
End If
End If
End If
If .Cells(i, 1).Value = ComboBox4.Value Then
If ComboBox7.Value = "Pratique" Then
If .Cells(i, col1).Value = "" Then
.Cells(i, col1).Value = 1
Else
.Cells(i, col1).Value = .Cells(i, col1).Value + 1
End If
End If
End I

et idem avec théorique et révision mais cela ne fonctionne pas 🙁

SVP pouvez vous m'aider 😕😉

Bonne fin de soirée à tous 🙂

yoyo77
 

Pièces jointes

Dernière édition:
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

A
Réponses
9
Affichages
806
allarmen
A
J
Réponses
5
Affichages
1 K
J
K
Réponses
3
Affichages
5 K
Kay0ux
K
M
Réponses
3
Affichages
1 K
M
D
Réponses
2
Affichages
2 K
dudu133
D
G
Réponses
3
Affichages
3 K
gadget
G
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…