masquer/afficher vba

masquer/afficher vba - VB/VBA/VBS - Programmation

Marsh Posté le 31-10-2007 à 11:29:40    

Bonjour,  
J'aurai besoin d'un petit coup de poue.  
Voilà, j'ai un tableau de 24 colonnes représentants des mois. Chaque mois à 2 colonnes.  
Mon problème c'est que jusqu'à maintenant pour afficher le mois désiré, je suis obligé de cacher les autres. Cela prend beaucoup de temps étant donné que je dois avoir presque 20 fichiers de ce type.  
y'a t'il un moyen de faire une macro, qui me permettrait d'afficher le mois recherché (le numéro je le renseignerai dans une case par exemple).  
 
au j'ai oublié, je débute  
merci  
 

Reply

Marsh Posté le 31-10-2007 à 11:29:40   

Reply

Marsh Posté le 31-10-2007 à 13:02:11    

Tu as aussi oublié de dire avec quel logiciel tu bosses. Excel, Access ?
Sous Excel si tu nommes tes colonnes, tu peux utiliser l'option Atteindre (F5).

Reply

Marsh Posté le 31-10-2007 à 14:16:01    

ah oui excuse.
je bosse sur excel
avec la fonction atteindre, ça me permet pas de cacher les autres mois.
le but c'est d'avoir les données que d'un seul mois
j'ai fait un petit truc de mon coté: dans la cellule B2 je renseigne le mois que je souhaite afficher. avec une macro ça me fait un copié coller des données du mois. le tableau initial dans ce cas, sera toujours caché.
voici mon code, je ne sais pas si c améliorable:

Code :
  1. Cells.Find(What:=Cells(2, 2), After:=ActiveCell, MatchCase:= _
  2.         False, SearchFormat:=False).Activate
  3.        
  4.     ActiveCell.Range("A1:A6" ).Select
  5.     ActiveCell.Range("A1:b6" ).Copy
  6.     [P5:Q5].PasteSpecial Paste:=xlPasteValuesAndNumberFormats, Operation:= _
  7.         xlNone, SkipBlanks:=False, Transpose:=False
  8.     Application.CutCopyMode = False

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed