Macro : Tableau avec cellules masquées

pierrejean

XLDnaute Barbatruc

• 30 Juillet 2008

• #2

Re : Macro : Tableau avec cellules masquées

bonjour Dolichotis

Vois si cela te convient

Le tableau peut etre placé partout sauf a debuter en colonne A (bien conserver la mention Tableau

La liste d'Objets doit etre en colonne A

 

Pièces jointes

• ListeEx.zip

  12 KB · Affichages: 24
• ListeEx.zip

  12 KB · Affichages: 21
• ListeEx.zip

  12 KB · Affichages: 25

Vote positif 0 Vote négatif

D

Dolichotis

XLDnaute Occasionnel

• 30 Juillet 2008

• #3

Re : Macro : Tableau avec cellules masquées

bonjour pierrejean,

et merci pour ton aide !

cependant, quelques questions :
- pourquoi ne peut-on pas mettre les objets qu'en A ? (même si on change le code ?)
- qu'est-ce que ubound ?

en fait, j'aurais voulu le mettre à la suite d'un tableau. donc les objets seront en M plutot qu'en A.
Je vais étudier plus préciser ton code demain car là, je suis claquée, je viens de tomber malade (facultés de raisonnement proche de 0).

encore merci et bonne soirée !

 

Vote positif 0 Vote négatif

pierrejean

XLDnaute Barbatruc

• 30 Juillet 2008

• #4

Re : Macro : Tableau avec cellules masquées

Re

Si l'on modifie le code on peut ,bien sur, mettre les Objets ou on le souhaite (Attention toutefois a la façon de definir le tablobjets)

Quant a Ubound c'est l'une des fins d'un tableau

J'essaie de commenter le code afin de t'aider a comprendre

Et tous mes voeux de prompt rétablissement

 

Vote positif 0 Vote négatif

pierrejean

XLDnaute Barbatruc

• 30 Juillet 2008

• #5

Re : Macro : Tableau avec cellules masquées

Re

Voici les commentaires

Si les crobes (entiers ou a mi) t'empechent d'adapter n'hesite pas à revenir en precisant l'emplacement respectif des tableaux

 

Pièces jointes

• ListeEx.zip

  12.6 KB · Affichages: 29
• ListeEx.zip

  12.6 KB · Affichages: 26
• ListeEx.zip

  12.6 KB · Affichages: 24

Dernière édition: 30 Juillet 2008

Vote positif 0 Vote négatif

D

Dolichotis

XLDnaute Occasionnel

• 31 Juillet 2008

• #6

Re : Macro : Tableau avec cellules masquées

Bonjour le forum, bonjour Pierrejean,

En ce qui concerne, les microbes, la moitié me laisse tranquille depuis hier. Merci de tes voeux et de ton aide. Ca va mieux qu’hier mais je reste à moitié KO.

J'ai regardé ton fichier, (merci pour les explications) et j'ai encore quelques questions :

- tes variables ne sont pas définies mais dans le fichier où je souhaite insérer cette macro, j'ai Option explicit. Je n'arrive à trouver les déclarations appropriées pour chaque variable(j'ai essayé variant, long, integer selon les variables). Par exemple, n doit être du même type d'Ubound, je suppose mais quand je mets integer, ça ne marche pas.

- derlin est différent de derl ?

En fait, j'ai mis la liste d"objets" dans une autre feuille de mon classeur et elle reste en colonne A. Mais le tableau est sur une autre feuille (j’ai conservé le mot Tableau) Cela gene-t-il pour le bon déroulement de la macro ?

- Si un objet n’a pas de paramètres, noircira-t-il toutes les cellules de la ligne (jusqu’à la fin du tableau)? (ce qui est souhaité)

Voilà, j’essaie de comprendre mais ça se fait pas d’un coup (surtout en ce moment) ! Je continue d'essayer de l'adapter à mon classeur. Encore merci.

 

Vote positif 0 Vote négatif

D

Dolichotis

XLDnaute Occasionnel

• 31 Juillet 2008

• #7

Re : Macro : Tableau avec cellules masquées

Re

Suite : voilà, après avoir adapté mon tableau, je l'ai lancé puis en pas à pas mais il y a un problème.
Avant la définition de tablo, tablo =vide après tablo ?! (ne vaut rien) ne renvoie pas de valeur.
Et après, l'exploration du tableau ne se fait pas. Après for n=2, il va directement à la fin de la procédure.

Mais en fait, le tableau n'est pas exactement pareil que dans l'exemple : Les objets définis dans le tableau ne sont pas directement à gauche mais à 3 colonnes à gauche. C'est possible de prendre celle-ci en référence ? Où doit-on changer le code ?
Je ne sais pas si c'est à cause de ça, mais il me donne un nombre faux de lignes (derlin=27)

merci !

 

Vote positif 0 Vote négatif

pierrejean

XLDnaute Barbatruc

• 31 Juillet 2008

• #8

Re : Macro : Tableau avec cellules masquées

Re

Voici une version avec

- declaration des variables
- tableau des objets sur Feuil2 (a priori n'importe ou)
Si un objet n'a rien il doit noircir toute la ligne
Pas bien compris ce que tu veux dire par 3 colonnes a gauche !!!

Teste et n'hesite pas arevenir si problème

Soignes-toi bien

 

Pièces jointes

• ListeEx.zip

  13.7 KB · Affichages: 19
• ListeEx.zip

  13.7 KB · Affichages: 28
• ListeEx.zip

  13.7 KB · Affichages: 29

Vote positif 0 Vote négatif

D

Dolichotis

XLDnaute Occasionnel

• 31 Juillet 2008

• #9

Re : Macro : Tableau avec cellules masquées

Re
merci pour ce nouveau fichier ; j'ai compris que c et d étaient des cellules.

Je voulais dire que juste en dessous de Tableau, il n'y avait pas les objets mais 3 colonnes à gauche de cette colonne. Mais je vais essayer d'arranger ça, insérant une colonne cachée...

Au fait, une petite question : comment on "cache" une feuille ? POur qu'elle ne soit pas visible de l'utilisateur. J'ai essayé : Worksheets("Feuil4").Visible = xlSheetVeryHidden dans une procédure mais ça bloque. Et il faudra qu'elle soit cachée tout le temps mais je ne sais pas quelle procédure choisir...

Merci pour tes modifications, je me replonge de suite dedans !

 

Vote positif 0 Vote négatif

pierrejean

XLDnaute Barbatruc

• 31 Juillet 2008

• #10

Re : Macro : Tableau avec cellules masquées

Re

Desolé, mais je ne maitrise absolument pas les techniques de cache et de protection

teste:

Code:

Private Sub Worksheet_Activate()
  ActiveSheet.Visible = False
End Sub

 

Vote positif 0 Vote négatif

D

Dolichotis

XLDnaute Occasionnel

• 31 Juillet 2008

• #11

Re : Macro : Tableau avec cellules masquées

Re

Bon je n'y arriverai pas ce soir...
Est-ce qu'il y a une limite pour les tableaux ? Parce que le mien est très grand. Je ne sais pas si c'est à cause de ça que ça ne marche pas.

J'espère être totalement guérie demain pour arriver à débloquer le problème.

En tout cas, merci beaucoup pour le temps que tu m'as accordé.

Je revois ça demain

Bonne soirée !

 

Vote positif 0 Vote négatif

D

Dolichotis

XLDnaute Occasionnel

• 4 Août 2008

• #12

Re : Macro : Tableau avec cellules masquées

Bonjour le forum, pierrejean,

Pierrejean, ayant l'esprit clair après ce petit épisode malade, j'ai revu ton code.
J'ai vu qu'il manquait un end if à la fin de l'exploration du tableau (même si ça n'avait pas l'air d'empêcher le fichier que tu m'as envoyé de tourner).

Mais le problème est autre : quand j'exécute, vers l'exploration du tableau, ça marque incompatibilité de type.
Serait-ce à cause de la taille de mon tableau ? Jusqu'à combien peut aller Ubound ?

merci pour ton code de protection, je viens de le voir, je vais l'essayer.

et bonne semaine à tous !

 

Dernière édition: 4 Août 2008

Vote positif 0 Vote négatif

pierrejean

XLDnaute Barbatruc

• 4 Août 2008

• #13

Re : Macro : Tableau avec cellules masquées

Re

heureux que cela aille mieux !!

Teste cette version

les variables de dimension des tableaux sont declarées Long ce qui permet d'aller a 2 147 483 647

par ailleurs j'ai nommé expressement les feuilles dans toutes les expressions (initialement la macro n'etait prevue que pour lancement a partir de Feuil1)

Et je n'ai pas ajouté de End If !!!!

 

Pièces jointes

• ListeEx.zip

  13.8 KB · Affichages: 29
• ListeEx.zip

  13.8 KB · Affichages: 29
• ListeEx.zip

  13.8 KB · Affichages: 29

Vote positif 0 Vote négatif

D

Dolichotis

XLDnaute Occasionnel

• 4 Août 2008

• #14

Re : Macro : Tableau avec cellules masquées

Re pierrejean

Finalement le tableau à masquer était dans un autre classeur, mais j'ai modifié le code pour qu'il aille dans ce classeur. De ce côté, c'est bon.

Par contre, j'ai une question à te poser :
dans mon classeur, les renseignements associés aux objets (A, B,C etc), ne sont pas sur la même ligne que le mot Tableau, mais 7 lignes au-dessus (Initiales de renseignements, officieux).
Est-il possible de modifier le code pour qu'il cherche dans la bonne ligne ?
J'ai essayé de modifier letype mais ça ne marche pas...

(pourquoi pas de end if à la fin ?)

Je ne sais pas s'il y a une solution mais en tout cas merci encore pour le temps que tu m'accordes, désolée de t'embêter encore avec ça. 🙂

Merci pour le code pour cacher une feuille, ça marche !

 

Pièces jointes

• ListeExX3.xls

  36.5 KB · Affichages: 54

Vote positif 0 Vote négatif

pierrejean

XLDnaute Barbatruc

• 4 Août 2008

• #15

Re : Macro : Tableau avec cellules masquées

Re

A priori la meilleure façon de traiter 7 lignes au dessus consiste simplement a mettre le mot Tableau en tête du tableau complet (c'est-a-dire a gauche de A)
teste et reviens si problème
Qu'y a_t_il dans les cellules entre le mot Tableau et le mot carte ?
pas de end if a la fin parcequ'il y en a autant que necessaire

 

Vote positif 0 Vote négatif