UserForm et cases à cocher dans cellule

[Toubabou]

Bonjour à tous,
Dans mon fichier j’ai un UserForm qui s’ouvre à la combinaison des touches « CTRL » + « W ».
Ensuite un MsgBox me demandant de renseigner le champ…., ce qui permet d’ouvrir l’UserForm en entier.
Mes questions sont les suivantes :
- Je voudrais qu’à l’ouverture de mon formulaire si une ou plusieurs « case à coché », sont sélectionnées  que celle-ci apparaissent cocher dans le formulaire.
- Je voudrais également ajouter un bouton dans mon formulaire afin de pouvoir ajouter une personne dans une nouvelle ligne, ainsi que les cases à cocher correspondantes.
Pourriez-vous m’aider ?

Mon fichier :
(c) CJoint.com, 2012

Amicalement,

Jean-Marie

 

[Yaloo]

Re : UserForm et cases à cocher dans cellule

Ces 2 personnes auront-elles besoin de changer leur mot de passe régulièrement ?
Le mot de passe sera le même ?
Y-aura-t-il d'autres personnes ultérieurement ?

A te relire

 

[Toubabou]

Re : UserForm et cases à cocher dans cellule

- Effectivement, par sécurité il peut être bon de changer régulièrement de MP
- Il pourrait éventuellement y avoir d'autres personnes autorisé

Amicaalement,

Jean Marie

 

[Yaloo]

Re : UserForm et cases à cocher dans cellule

J'avais oublié, y-a-t-il des niveaux d'accès ou toutes les personnes ont les mêmes possibilités ?
Faut-il un mot de passe par personne ?

 

[Toubabou]

Re : UserForm et cases à cocher dans cellule

Aie aucune idee fait comme bon il te semble. Des niveaux genre administrateur cest pas mal.
Un mot de passe par personne super pour le Fun

 

[Toubabou]

Re : UserForm et cases à cocher dans cellule

Aie aucune idee fait comme bon il te semble. Des niveaux genre administrateur cest pas mal.
Un mot de passe par personne super pour le Fun.
Par contre ne fait pas trop compliqué que je puisse transposer on viens de finir la BD cette apres midi.

 

[Yaloo]

Re : UserForm et cases à cocher dans cellule

Sinon, plutôt que de mettre un mot de passe à la validation, ne serait-il pas plus judicieux de mettre le mot de passe avant l'ouverture de l'UserForm ?

 

[Toubabou]

Re : UserForm et cases à cocher dans cellule

Effectivement, cela éviterai de devoir saisir le MP apres chaque modification ou ajout

 

[Yaloo]

Re : UserForm et cases à cocher dans cellule

Bon, vu l'heure, surement demain.

 

[Toubabou]

Re : UserForm et cases à cocher dans cellule

C'est juste, alors bonne nuit

Amicaalement,
Jean Marie

 

[Yaloo]

Re : UserForm et cases à cocher dans cellule

Bonjour Jean-Marie,

Vois le fichier ci-joint, j'ai rajouté un onglet PARAM et un UserForm. L'onglet ainsi que l'UserForm peuvent être copiés directement dans ton classeur. Clic-droit sur l'onglet puis Déplacer ou copier ... Pour l'UserForm, lorsque tes 2 fichiers sont ouverts dans la même instance, tu fais glisser l'UserForm dans ton fichier. Comme ça tu n'as rien à reproduire, tout est déjà fait.
Pour le moment, j'ai mis la même chose pour tous les types d'utilisateur.

A+

Martial

 

[Toubabou]

Re : UserForm et cases à cocher dans cellule

Bonjour Yaloo,

J'espère que tu n'as pas passé une nuit blanche pour moi. Super je viens d'essayer ton fichier. Ouah quel travail!!!!!
Comment te remercier?

Amicalement,

Jean-Marie

 

[Toubabou]

Re : UserForm et cases à cocher dans cellule

Bonsoir Yaloo,

Juste un petit soucis:
Sur mon PC avec Windows 8.1, Excel 2010 aucuns soucis
Sur un PC avec Windows 7, Excel 2007 une fenêtre d'erreur s'affiche:
"Erreur de compilation dans le module caché: Fonction"
Pourrais - tu me dire ou j'ai encore fait une bêtise?

Amicalement,
Jean-Marie

 

[Yaloo]

Re : UserForm et cases à cocher dans cellule

Pourrais - tu me dire ou j'ai encore fait une bêtise?

Comme je ne suis pas madame Irma ça va être difficile si tu ne me donnes pas plus de renseignement
A quelle ligne as-tu cette erreur de compilation ?
As-tu modifié les macros en cachant des feuilles ?

A te relire

Martial

 

[Toubabou]

Re : UserForm et cases à cocher dans cellule

Excuses moitu es tellement fort......
Le message arrive dés que je clique sur le bouton "Formulaire" dans l'onglet "Lutin".
Alors dans un premier temps, comme je n'arrivai pas rendre la feuille "Param" invisible avec le code je l'ai protégée par "Proteger la feuill", idem pour le classeur, et idem pour le projet VBA.
J'ai fait un essai en enlevant toutes les protections et toujours pareil. si je force il me mets "Erreur (je ne sais plus quoi ) et me propose un débogage en ouvrant le module "Fonction" et là tout est ecrit en rouge:
"Declare PtrSafe Function GetWindowLongA Lib "user32" (ByVal hWnd As Long, ByVal nIndex As Long) As Long
Declare PtrSafe Function SetWindowLongA Lib "user32" (ByVal hWnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Declare PtrSafe Function FindWindowA Lib "user32" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Declare PtrSafe Function DrawMenuBar Lib "user32" (ByVal hWnd As Long) As Long".

Voilà c'est tout ce que je peux te dire.

Mais t'affoles pas si ce n'est pas aujourd'hui ce sera demain sinon plus...
Merci tout de même.

Amicalement,
Jean-Marie

 

[Yaloo]

Re : UserForm et cases à cocher dans cellule

Pas de soucis, fais un essai en enlevant PtrSafe sur les 4 lignes.
Comme je suis en Office 64bits il m'oblige à mettre PtrSafe, je sais que ça fonctionne quand même avec 2010 et 2013 en 32 bits, mais je ne sais pas si ça ne plante pas la version 2007.

A+