| Date | Auteur du sujet | Sujet | Extrait du message |
|---|
| 09/02/2021 à 12:13 | eric0068 | Beforeprint et Enregistrement sous PDF | Bon, finalement j'ai opter pour un Combo beforeprint sans l'utilisation de '.Printout' et workbookActive... |
| 26/01/2021 à 14:45 | eric0068 | Beforeprint et Enregistrement sous PDF | Je m'exprimes peut-être de la mauvaise manière. Si j'utilise mon code ainsi : Alors quand je fais enregistrer Sous PDF, Excel me dit que le ficher ne peut être sauvegarder par contre l'impression papier fonctionne Private Sub Workbook_BeforePrint(Cancel As Boolean) If ActiveSheet.Name = "Stübli- Kur... |
| 24/01/2021 à 17:27 | eric0068 | Beforeprint et Enregistrement sous PDF | Ok j'arrive presque a mon but.... Dans le 3 ème ongelt apres la Sauvegarde, si j'y refais un changement en colone "I" et refais une Sauvegarde, l'evenement n'est plus declancher....... |
| 23/01/2021 à 19:09 | eric0068 | Beforeprint et Enregistrement sous PDF | Le voici... |
| 23/01/2021 à 17:14 | eric0068 | Beforeprint et Enregistrement sous PDF | J'ai oublier de mentionner que mon soucis viens de Cancel = True en Effet quand celui ci est true je peux imprimer mais pas savegarder Sous pdf, quand il est false, je peux sauvegarder Sous Pdf mais j'imprime deux pages... |
| 23/01/2021 à 14:33 | eric0068 | Beforeprint et Enregistrement sous PDF | C'est bien l'idée de base, mais uniquement lors de l'inpression ou de la Sauvegarde PDF le reste du temps les cellules doivent etre visibles... |
| 23/01/2021 à 13:50 | eric0068 | Beforeprint et Enregistrement sous PDF | J'ai sur ma feuille, deux cellules que je souhaite cacher lors d'une Impression et / ou lors d'une Sauvegarde Sous PDF. Mon code avant Impression semble fonctionner mais je coince pour l'enregistrement Sous PDF.... Dim ok As Boolean Private Sub Workbook_BeforePrint(Cancel As Boolean) If ok = True Th... |
| 01/07/2013 à 19:21 | eric0068 | Optimisation des pages à imprimer | Comme promis Bonzai, le test grandeur nature a été fait. Test ancienne macro 7 min 52 sec pour 15 pages. Test nouvelle macro 2 min 48 sec pour 18 pages. Je crois que cela se passe de tout commentaire. Merci... |
| 29/06/2013 à 13:49 | eric0068 | Optimisation des pages à imprimer | Ton pseudo est à la mesure de ta rapidité. Merci pour tout. Je reconfirmerais lundi soir mais cela me semble tout bon. Milles merci... |
| 29/06/2013 à 13:22 | eric0068 | Optimisation des pages à imprimer | Je viens de tester la macro, elle semble donner un bon résultat. Il faudra que je la reteste lundi en situation réelle d'utilisation. Merci déjà pour la prompte réponse. Si je comprends bien la macro celle-ci dit: Pour chauqe feuille dans le classeur, si la cellule c13 est du texte alors garde ce ta... |
| 29/06/2013 à 11:24 | eric0068 | Optimisation des pages à imprimer | Je me permet de revenir vers tous afin d'essayer d'améliorer le temps d'impression. La macro en elle même (boutton dans la feuille 1 "Check liste drucken" ) fonctionne très bien (excel 2003 ...... non on ne rigole pas hein....) : Sub MakroA() Application.ScreenUpdating = False Dim WS_Count As Intege... |
| 02/11/2012 à 20:01 | eric0068 | Erreur de macro ou long calcul ? | Ceci prouve par a + b que nom de dieu j'ai encore bien à apprendre.... Déjà merci, ça fonctionne super. Du reste, ma logique n'était pas totalement fausse mais voyons si j'ai bien compris .... Sub Schaltfläche1_KlickenSieAuf() Application.ScreenUpdating = False For i = 914 To 2 Step -48 Jusque la on... |
| 02/11/2012 à 17:07 | eric0068 | Erreur de macro ou long calcul ? | Je viens de tester et hélas, je n'ai pas constaté de changements... Le fichier est joint tout se passe entre les deux premiers onglets... |
| 02/11/2012 à 15:48 | eric0068 | Erreur de macro ou long calcul ? | Après quelques recherches, voici que je réussi ma première macro tout seul (excel 2007 / win XP)....... Sub Schaltfläche1_KlickenSieAuf() Application.ScreenUpdating = False For i = 914 To 2 Step -48 For b = i To i + 47 If Range("g" & i).Value = "X" Then Rows(b).Hidden = True ElseIf Range("g" & i).Va... |
| 25/09/2012 à 09:30 | eric0068 | Cacher ou montrer ligne si case sans texte et non noire | Coucou Dan, Enfait c'est inutile mais j'ai posé la question avant même d'y avoir réfléchi ........... Merci pour toutes les explications, va sörieusement falloir que je me mettre à la prog. Très bonne journée et à très vite lol, le fichier est loin d'être fini .... Eric... |
| 24/09/2012 à 15:01 | eric0068 | Cacher ou montrer ligne si case sans texte et non noire | Coucou, Le code semble très bien fonctionner, j'ai retiré les MFC et je suis entrain de corriger les fonctions que j'ai mal écrites,( c'est grace au vb que je m'en suis rendu compte). Toujours en est-il que merci 1000 fois. Deux questrions subsistent néanmoins ; la première, peux-tu me décoder en la... |
| 24/09/2012 à 13:32 | eric0068 | Cacher ou montrer ligne si case sans texte et non noire | C'est moi qui ai mal du comprendre, toutefois la raison du layout de la page 1 reste effective. Si je met les 2 tableaux sur la même feuille cela réduirait de tableau premier, or il faut que ce tableau reste fixe. La j'ai peur que ce sois moi qui m'exprime mal................. |
| 24/09/2012 à 13:20 | eric0068 | Cacher ou montrer ligne si case sans texte et non noire | La MEFC ne me permettait pas de mettre une bordure plus grosse, en effet cette feuille est censée être découpée. Mais je suis ouvert a toute proposition. Bonjour lermite, Je met deux pages en parallèle mais la page 1 doit garder son layout d'origine. Merci de vos réponses et du temps que vous m'acco... |
| 24/09/2012 à 09:42 | eric0068 | Cacher ou montrer ligne si case sans texte et non noire | Je me sert de votre forum afin d'éditer un fichier, mais la je bloque. La demande est la suivante, selon les infos de la page 1, la page 2 se remplit. Selon les infos de la page 2 certaines lignes sont encadrer et d'autres coloriées en noir. Jusque la tout vas bien. Il ne reste qu'a masquer les lign... |