Question : Exceler la pâte comme les formes d'impression d'image ont diminué pour ne pas imprimer.

Bonjour experts,

I AM essayant… « Image/copie de Paste/As comme Picture/As montré une fois imprimé » ..... une partie d'une feuille contenant des colonnes et des formes de données.  Je ne veux pas que les formes impriment, et ai marqué les formes dans la fenêtre des propriétés de la forme pour ne pas imprimer, pourtant quand I « image/copie de Paste/As comme Picture/As montré une fois imprimée »….la forme est également imprimée.  Leur code de VBA est-il pour empêcher ceci ?   J'ai attaché un sample.

Thanks pour l'aide !     class= " lastRow de
>Attachments de " nom " de class= de
class= " valeur " de
>
de " description " de class= de
le class= de
de >
class= de

Réponse : Exceler la pâte comme les formes d'impression d'image ont diminué pour ne pas imprimer.

Bonjour biker9,

quand vous employez CopyPicture, vous copiez l'image pendant qu'elle apparaît sur l'écran. Les arrangements d'impression pour la forme sont ignorés. Elle est plutôt comme prendre un screenshot, pas comme envoyer la gamme à l'imprimeur (dans ce cas la forme ne serait pas imprimée).

Comme contournement, vous pouvez placer la suffisance et la frontière de la forme au msoFalse avant de copier la gamme (comme gamme ou image) et puis, après l'opération de copie, reconstituer la suffisance et l'encadrer (avec le msoTrue)

L'extrait de code joint travaille sur votre exemple.

à la votre, teylyn
1 :
2 :
3 :
4 :
5 :
6 :
7 :
8 :
9 :
10 :
11 :
12 :
13 :
14 :

Print_as_Pic secondaire ()
'
    Avec ActiveSheet.Shapes.Range (rangée (« rectangle 11 »))
        . Fill.Visible = msoFalse
        . Line.Visible = msoFalse
    Extrémité avec
    Gamme (« B2 : F22 »). Copier la gamme (« J2 »)
    Avec ActiveSheet.Shapes.Range (rangée (« rectangle 11 »))
        . Fill.Visible = msoTrue
        . Line.Visible = msoTrue
    Extrémité avec
    Gamme (« P4 »). Choisi

Sous-marin d'extrémité
Autres solutions  
  •  MS Excel 2007 et pdf - l'exportation vers le pdf prend de longues heures !
    •
  •  Dans le Perl, comment j'ajoute une valeur à la liste, puis le contrôle pour voir si la valeur existent avant d'ajouter une nouvelle valeur
    •
  •  Comment fais j'initialiser de la HP BL460c G6 de san et de la HP XP 240000
    •
  •  Comment fais j'employer une clef de permis de volume sur un ordinateur de HP avec du CD de restauration
    •
  •  Emplacement primaire de deux SCCM dans l'annuaire actif
    •
  •  L'initiateur et la HP D2D de l'iSCSI R2 du serveur 2008 de Windows GERCENT l'issue
    •
  •  Stocker le dossier dans le mysql using connector.net et le champ de goutte
    •
  •  Carte vidéo d'USB - bit 32 sur le matériel travaillant au niveau du bit 64 ?
    •
  •  asp.net que j'essaye de convertir une forme de HTML en forme d'aspx ou ? ce qui jamais. Aide du besoin sur la façon dont à à elle.
    •
  •  Winzip 12 issues de secours du travail ?
    •
     
    programming4us programming4us