Signaler

Macro case à cocher désactivée = ligne non visible [Résolu]

Posez votre question myleneher 22Messages postés lundi 19 juin 2017Date d'inscription 21 juin 2017 Dernière intervention - Dernière réponse le 21 juin 2017 à 14:59 par f894009

bonjour,
je suis en train de créer un tableau (qui sera dupliqué sur plusieurs feuilles quand il sera finalisé) où je dois insérer des cases à cocher.
colonne A : nom des documents
colonne B : case à cocher en format ActiveX sur toutes les lignes et déjà liées à chaque cellule
sur lignes 6 à 109
j'ai inséré un bouton "finaliser"
quel est le script pour que lorsque je clique sur le bouton "finaliser" seules les lignes où la case à cocher est cochée apparaissent ?
merci pour votre aide

Afficher la suite

Utile

f894009 11975Messages postés dimanche 25 novembre 2007Date d'inscription 12 août 2017 Dernière intervention 19 juin 2017 à 17:06

Bonjour,
Vous connaissez le VBA Excel ?

Afficher les 21 commentaires

myleneher 22Messages postés lundi 19 juin 2017Date d'inscription 21 juin 2017 Dernière intervention - 19 juin 2017 à 17:14

non je ne connais pas

Répondre

f894009 11975Messages postés dimanche 25 novembre 2007Date d'inscription 12 août 2017 Dernière intervention - 19 juin 2017 à 17:21

Re,

Qui va se servir de ce fichier, vous ou d'autres personnes
Pouvez-vous mettre a dispo ce fichier sans donnees confidentielles
site de partage
https://mon-partage.fr/

Répondre

myleneher 22Messages postés lundi 19 juin 2017Date d'inscription 21 juin 2017 Dernière intervention - 19 juin 2017 à 17:16

pour info ce fichier est destiné à des personnes manipulant très peu Excel donc je veux quelque chose de simple en utilisation c'est à dire le moins de manipulation possible pour eux

Répondre

myleneher 22Messages postés lundi 19 juin 2017Date d'inscription 21 juin 2017 Dernière intervention - 19 juin 2017 à 17:28

internet sécurisé je ne peux pas envoyé le document sur le lien indiqué je demande l'autorisation et vous envoie ça au plus vite demain... merci

Répondre

f894009 11975Messages postés dimanche 25 novembre 2007Date d'inscription 12 août 2017 Dernière intervention - 19 juin 2017 à 17:31

Re,

Questions supplementaires:
Comment vous faites "reapparaitre" les lignes masquees??
Comment la copie se fait: manuellement, code VBA ????

c'est à dire le moins de manipulation possible pour eux
MAis encore ??

Répondre

myleneher 22Messages postés lundi 19 juin 2017Date d'inscription 21 juin 2017 Dernière intervention - 19 juin 2017 à 18:16

Il faudrait que j'ai créé également un bouton macro pour réinitialiser
Pour les manipulations il faudrait que les utilisateurs ai juste à cocher les lignes souhaitées et cliquer sur le bouton "finaliser" pour que seules les lignes cochées restent à l'affichage

Répondre

myleneher 22Messages postés lundi 19 juin 2017Date d'inscription 21 juin 2017 Dernière intervention - 19 juin 2017 à 18:17

Je ne sais pas ce qu'est un "code VBA" dont vous parlez

Répondre

f894009 11975Messages postés dimanche 25 novembre 2007Date d'inscription 12 août 2017 Dernière intervention - 19 juin 2017 à 18:52

Re
Code VBA: c'est le language de programmation pour eXCEL (entre autre). Il en faudra un peu pour ce que vous voulez faire

Répondre

myleneher 22Messages postés lundi 19 juin 2017Date d'inscription 21 juin 2017 Dernière intervention - 19 juin 2017 à 18:55

En fait j'ai déjà regarder sur ce site et integrer les codes que je pensais correspondre... alors oui j ai déjà utilisée des codes VBA mais juste des copier coller je ne sais pas écrire les codes...

Répondre

f894009 11975Messages postés dimanche 25 novembre 2007Date d'inscription 12 août 2017 Dernière intervention - 19 juin 2017 à 19:00

Re
Ok, vous comprenez les codes que récupérez?
Vous n'avez pas répondu à la question copie du tableau finalisé......!

Répondre

myleneher 22Messages postés lundi 19 juin 2017Date d'inscription 21 juin 2017 Dernière intervention - 19 juin 2017 à 19:04

Je ne comprends pas tout malheuseusement mais j'essaie de les personnaliser à mon tableau mais ça ne fait pas ce que je veux...

Répondre

f894009 11975Messages postés dimanche 25 novembre 2007Date d'inscription 12 août 2017 Dernière intervention - 19 juin 2017 à 19:16

Re
Ok, à demain avec votre fichier

Répondre

myleneher 22Messages postés lundi 19 juin 2017Date d'inscription 21 juin 2017 Dernière intervention - 19 juin 2017 à 19:18

Super merci en tout cas pour le temps que vous prenez pour vous pencher sur mon problème !

Répondre

myleneher 22Messages postés lundi 19 juin 2017Date d'inscription 21 juin 2017 Dernière intervention - 20 juin 2017 à 11:11

Bonjour à vous voici le lien du fichier
https://mon-partage.fr/f/zGazxzKJ/
Je l'ai modifié ce matin

Répondre

myleneher 22Messages postés lundi 19 juin 2017Date d'inscription 21 juin 2017 Dernière intervention - 20 juin 2017 à 11:14

Qu'en pensez vous ? Est ce le plus simple en manipulation qu'il est possible de faire ? Je suis juste un peu déçue sur le résultat "finaliser" des cases à cocher vierges se mettent par dessus et en bas du tableau...

Répondre

f894009 11975Messages postés dimanche 25 novembre 2007Date d'inscription 12 août 2017 Dernière intervention - 20 juin 2017 à 12:07

Bonjour,

Je suis juste un peu déçue sur le résultat "finaliser" des cases à cocher vierges se mettent par dessus et en bas du tableau...
J'ai une possibilite sans case a cocher avec VBA pour ce qui remplace case a cocher et un simple filtre ou filtre avec VBA comme vous

Répondre

myleneher 22Messages postés lundi 19 juin 2017Date d'inscription 21 juin 2017 Dernière intervention - 20 juin 2017 à 12:11

Si pas de case à cocher comment sélectionneront ils les documents voulus ?
Pour rappel il fait le moins de manipulation possible certain ne savent pas ce qu'est un filtre. ...

Répondre

myleneher 22Messages postés lundi 19 juin 2017Date d'inscription 21 juin 2017 Dernière intervention - 20 juin 2017 à 12:23

Autre question avec quel VBA code je peux programmer que la hauteur des lignes évolue en fonction du texte en cours de saisie ? J'ai trouver un code pour les colonnes mais quand je le modifié avec "lines" ça ne marche pas...

Répondre

f894009 11975Messages postés dimanche 25 novembre 2007Date d'inscription 12 août 2017 Dernière intervention - 20 juin 2017 à 13:45

Re,
Avant de destroyer votre fichier, un exemple de ce que je vous propose pour les cases cocher. Les bouton ont vos codes un peu modifie par rapport a cet exemple.

https://mon-partage.fr/f/0GPurrzs/

A vous de dire si ok ou pas

Répondre

myleneher 22Messages postés lundi 19 juin 2017Date d'inscription 21 juin 2017 Dernière intervention - 20 juin 2017 à 14:04

C'est super bien mais comment vous avez fait ???? Comment sont faites les cases à cocher ? C'est un code VBA ? Ça peut être adapté à mon tableau ?

Répondre

myleneher 22Messages postés lundi 19 juin 2017Date d'inscription 21 juin 2017 Dernière intervention - 20 juin 2017 à 14:07

Par contre le bouton réinitialiser ne fonctionne pas erreur dexecution. Vous avez pu inclure un code pour l'adaptation des hauteurs de ligne en cours de saisie ?

Répondre

Utile

f894009 11975Messages postés dimanche 25 novembre 2007Date d'inscription 12 août 2017 Dernière intervention 20 juin 2017 à 14:43

Re,

Reinit: dans VBA feuille Feuil1, j'ai inverse prot et unprot. Code ci-dessous ok

Private Sub CommandButton3_Click()
    Unprot
    Range("A2:A32") = "£"
    Prot
End Sub

C'est super bien mais comment vous avez fait ????<ital>
Avec mes petit doigts

<ital>Comment sont faites les cases à cocher ? C'est un code VBA ?
Oui, code VBA feuil1

<ital>Ça peut être adapté à mon tableau ?
Ben oui, sinon je ne vous l'aurai pas donne

des hauteurs de ligne en cours de saisie
Ce n'est pas valable par ligne, il faut le faire pour tout le tableau

Afficher les 13 commentaires

myleneher 22Messages postés lundi 19 juin 2017Date d'inscription 21 juin 2017 Dernière intervention - 20 juin 2017 à 14:57

ça marche pour la hauteur de ligne avec ce que vous m'avez indiqué mon problème était que mes colonnes A à C étaient fusionnées
j'ai essayé d'appliquer l'ensemble de vos codes VBA à mon fichier histoire d'appliquer ce que vous aviez fait mais ça ne marche pas. Faut-il que je recréé un nouveau fichier ?
si c'est le cas ça ne me dérange pas, pourvu que mon fichier soit "beau" et surtout fonctionnel pour des ultradébutants

Répondre

f894009 11975Messages postés dimanche 25 novembre 2007Date d'inscription 12 août 2017 Dernière intervention - 20 juin 2017 à 15:20

Re,
mais ça ne marche pas. Faut-il que je recréé un nouveau fichier ?
Normalement non, en modifiant votre fichier d'origine ca doit le faire. Si vous n'y arrivez pas dites le et je fais les modifs

Répondre

myleneher 22Messages postés lundi 19 juin 2017Date d'inscription 21 juin 2017 Dernière intervention - 20 juin 2017 à 15:28

j'ai essayé sur un nouveau fichier j'ai collé vos codes VBA et les cellules sont bloquées car protégées...
c'est vraiment pénible de ne pas y arriver toute seule...
pouvez-vous une fois de plus m'aider ?
ou me donner la marche à suivre pour que j'essaie d'y arriver pour ne pas mourir bête...

Répondre

f894009 11975Messages postés dimanche 25 novembre 2007Date d'inscription 12 août 2017 Dernière intervention - 20 juin 2017 à 16:32

Re,

Le mot de passe pour enlever protection est ecrit dans le VBA de la feuille.
En partant de votre fichier d'origine, vous devez dans les codes feuille, adapter la ou les plages de "cases a cocher"

Répondre

myleneher 22Messages postés lundi 19 juin 2017Date d'inscription 21 juin 2017 Dernière intervention - 20 juin 2017 à 17:13

j'ai trouvé pour les couleurs des boutons
reste plus qu'à trouver comment vous avez fait vos cases à cocher...

Répondre

f894009 11975Messages postés dimanche 25 novembre 2007Date d'inscription 12 août 2017 Dernière intervention - 20 juin 2017 à 17:38

Re,
Allez, je prends "pitie" de vous
code dans feuil1

'police cellules: Winsdings2
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
  If Not Application.Intersect(Target, Range("A2:A32")) Is Nothing Then
    Cancel = True
    If ActiveCell.Value = "R" Then
      ActiveCell.Value = "£"
    ElseIf ActiveCell.Value = "" Or ActiveCell.Value = "£" Then
      ActiveCell.Value = "R"
    End If
  End If
End Sub

Répondre

myleneher 22Messages postés lundi 19 juin 2017Date d'inscription 21 juin 2017 Dernière intervention - 21 juin 2017 à 12:05

Bonjour à vous
Bon alors j'ai essayé avec votre code mais rien n'y fait. ...
Est ce que je peux vous envoyer la dernière version de mon fichier pour que vous puissiez y jeter un oeil ?

Répondre

f894009 11975Messages postés dimanche 25 novembre 2007Date d'inscription 12 août 2017 Dernière intervention - 21 juin 2017 à 12:20

Bonjour,
OK, envoyez l'bousin................

Répondre

myleneher 22Messages postés lundi 19 juin 2017Date d'inscription 21 juin 2017 Dernière intervention - 21 juin 2017 à 13:57

Merci vraiment pour l'aide que vous m'accorder voici le fichier https://mon-partage.fr/f/oww5X77C/

Répondre

f894009 11975Messages postés dimanche 25 novembre 2007Date d'inscription 12 août 2017 Dernière intervention - 21 juin 2017 à 14:34

Re,

Fichier modifie: https://mon-partage.fr/f/Zld8NYQ4/

Répondre

myleneher 22Messages postés lundi 19 juin 2017Date d'inscription 21 juin 2017 Dernière intervention - 21 juin 2017 à 14:57

c'est top !!! merci beaucoup pour votre aide !!!
je suppose que j'avais fait des erreurs... lol
c'est vraiment un travail de haute qualité même si hyper technique et que je n'ai pas tout suivi...
merci encore et bonne après-midi

Répondre

f894009 11975Messages postés dimanche 25 novembre 2007Date d'inscription 12 août 2017 Dernière intervention - 21 juin 2017 à 14:59

Re,

et que je n'ai pas tout suivi...
Ca viendra, c'est l'effet KissCool

Répondre

Répondre au sujet

Posez votre question

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

S'inscrire maintenant

Macro case à cocher désactivée = ligne non visible [Résolu]

Vous n'êtes pas encore membre ? inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !