Problème avec feuille masquée

[p'tit lulu]

😕
Bonjour, grâce a votre aide j'ai pu avancer sur mon fichier, cependant, un nouveau problème apparait ! c'est peut être tout bête mais je ne trouve pas de solution. Mon fichier est composé de 7 ou 8 feuilles que je peux imprimées à l'aide d'un bouton. Cela marche nikel, mais lorsque je masque les feuilles pour ne garder que la principale, l'impression devient impossible.......
Merci ! 😀

 

[wilfried_42]

Re : Problème avec feuille masquée

bonjour

C'est normal, on ne peut imprimer ce qu l'on ne voit pas

Dans ta macro d'impression :

Application.ScreenUpdating = Not Application.ScreenUpdating
sheets("Mafeuille").visible = true
sheets("mafeuille").printout ' tes instruction d'impression
sheets("MaFeuille").visible = false
Application.ScreenUpdating = Not Application.ScreenUpdating

 

[p'tit lulu]

Re : Problème avec feuille masquée

🙁 je n'y arrive pas...... étant novice en vba, je dois faire des erreurs....
peut être mon code pour l'impression pourrait aider.... merci !

Private Sub Imprimer1_Click()
Dim i As Integer
Unload Me
For i = 1 To 6
If Controls("CheckBox" & i) = True Then ActiveSheet.PrintOut
Next
End Sub

 

[wilfried_42]

Re : Problème avec feuille masquée

re:

il y a un petit probleme avec ton code, tu n'actives pas les feuilles que tu veux imprimer, si tes 6 checkBox sont cochées, tu imprimes 6 fois la feuille active (ou bien je n'ai rien compris, ce qui ne m'etonnerait pas)

m'enfin selon ce que j'ai compris
1) nommer les feuilles : exemple Imp1, Imp2; Imp3,Imp4,Imp5,Imp6
2) les masquer

Private Sub Imprimer1_Click()
Dim i As Integer
Me.hide
Application.ScreenUpdating = Not Application.ScreenUpdating
For i = 1 To 6
If Controls("CheckBox" & i) = True Then 
   Sheets("Imp" & i).Visible =True
   Sheets("Imp" & i).PrintOut
   Sheets("Imp" & i).Visible = False
end if
Next i
Unload me
Application.ScreenUpdating = Not Application.ScreenUpdating
End Sub

J'ai fait une modif, dans un premier temps, cacher userform, pour pouvoir imprimer, et à la fin la decharger de la memoire

 

[p'tit lulu]

Re : Problème avec feuille masquée

Merci pour le coup de main ! je me rends compte que ton dicton prend ici tout son sens ''Plus j'apprends, plus je sais....... plus je sais que je ne sais rien. '', c'est tout à fait mon cas !!!! 😀
bonne journée !

 

[p'tit lulu]

Re : Problème avec feuille masquée

Non....rien à faire. Je n'y arrive pas, j'ai pourtant testé ton code, renommé mes feuilles, essayé de le modifier, essayé de passer avec une macro mais rien à faire....je tourne en rond ! si quelqu'un a 2 mn pour jeter un coup d'oeil .....🙄
je joints mon fichier.

 

[Dull]

Re : Problème avec feuille masquée

Salut p'tit lulu, Wilfried 🙂, le Forum

j'ai fait une peu le ménage dans tes codes et le fichier joint devrais pouvoir le faire

Bonne Journée

 

[p'tit lulu]

Re : Problème avec feuille masquée

Merci Dull !
effectivement, tu as fait du ménage, chose que je n'arrive pas encore a faire ! bonne journée !😀

 

[Dull]

Re : Problème avec feuille masquée

Re le Fil

Dicton de chez nous

"tardra...viendra"

Avec le temps... ça va venir 🙂

Bonne journée

 

[p'tit lulu]

Re : Problème avec feuille masquée

Bonjour Dull, le forum....

j'ai un petit problème avec le fichier que tu m'as renvoyé, toutes les feuilles masquées apparaissent pour l'impression et se masquent à nouveau en fin d'impression sauf la feuille 6 ? surement pas grand chose mais......

merci, bonne soirée et bon week end a tous !

 

[Dull]

Re : Problème avec feuille masquée

Salut P'tit lulu, le Form

Pour l'Impression je n'ai pas vu le soucis
par contre sur le Bouton "Vider Horaire Semaine"
Ajoute cette ligne

Sheets("Empl6").Visible = False

avant

Application.ScreenUpdating = True
End Sub

dans le Module5

Bonne Journée

 

[Guiv]

Re : Problème avec feuille masquée

Bonjour Ptitlulu, le fil

Content de voir que ton projet avance.
Juste une petite remarque, si tu tiens à ce que tes feuilles restent cachées.
Si l'utilisateur ferme le userform1 (celui qu'on appelle avec les boutons prénoms) par la croix, sans clicker sur les boutons entrée/sortie, alors la feuille reste affichée...
Je propose une petite modif pour arranger ça (empêcher la fermeture par la croix et ajouter un bouton qui ferme et cache la feuille)
Cordialement,
Guiv

 

[p'tit lulu]

Re : Problème avec feuille masquée

bonjour a tous,

merci Guiv, j'y pensais mais je ne voulais pas abusé.... 😛
alors si maintenant les réponses arrivent sans que l'on pose les questions !!! que demander de plus !!! 😀
bon week end a tous !

 

[p'tit lulu]

Re : Problème avec feuille masquée

Rebonjour ! comme un problème n'arrive jamais seul....
sur ce même dossier, lorsque je clique sur le nom d'un employé, mon userbox s'ouvre, si je veux marquer un commentaire, cela ne marche pas. A peine une lettre tapée et tout se ferme..... 🙁

une bouée de sauvetage.......

merci, bon week end !!!

😀 avec toutes ces bouées de sauvetage, je vais pouvoir me faire un bâteau !😀

 

[Guiv]

Re : Problème avec feuille masquée

Re bonjour,
Ca vient du fait que tu as utilisé l'évènement "change" de la textbox : dès que tu tapes qlqchose, le code s'éxécute.
J'ai essayé avec AfterUpDate, mais ça fait planter...
Peut-être faut-il mettre un bouton avec le code d'éxécution de ta textbox...
Cela dit, vu que le userform se ferme quand on clique entrée ou sortie, ton commentaire risque de ne pas se retrouver à la bonne ligne (d'après ton code, il va à la première ligne vide qu'il rencontre, et qui ne sera pas forcément celle de la date où tu voudrais qu'il aille...)
Bon courage
Guiv