Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Excel > Macros et VBA Excel
Macros et VBA Excel Vos questions relatives aux macros Excel, à l'utilisation de VBA et à l'automatisation de vos classeurs Excel.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 08/12/2011, 15h14   #1
Invité de passage
 
Inscription : décembre 2011
Messages : 32
Détails du profil
Informations forums :
Inscription : décembre 2011
Messages : 32
Points : 4
Points : 4
Par défaut Arrière plan & mise en forme VBA excel

Bonjour,

Je voulais savoir s'il est possible d'imprimer l'arrière-plan dans un fichier Excel ?

Je m'explique

J'ai un document papier que je dois remplir tous les mois, puis le scanner pour le faire passer par @Mail et mon correspondant doit l'imprimer

Je l'ai donc scanné puis mis en arrière-plan dans un fichier Excel (Menu format - Feuille - Arrière-plan)

Ensuite le mettre en forme.

Si j'imprime le document, seul le texte que j'ai tapé s'imprime mais pas l'arrière-plan ????

Avez-vous une astuce pour imprimer l'arrière-plan ?
Je souhaiterais par la suite l'imprimer en vba.

Merci pour votre aide!!!!
ARTETA13 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 08/12/2011, 16h30   #2
Membre régulier
 
Femme
Inscription : septembre 2011
Messages : 86
Détails du profil
Informations personnelles :
Sexe : Femme
Localisation : France, Nord (Nord Pas de Calais)

Informations professionnelles :
Secteur : Industrie

Informations forums :
Inscription : septembre 2011
Messages : 86
Points : 75
Points : 75
,

Pour l'impression de l'arrière-plan, je ne sais pas.

Pour l'impression par vba, je te propose :

Code :
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
 
Private Sub CommandButton1_Click() 'J'utilise un bouton pour lancer l'aperçu
'Permet d'ouvrir la fênetre d'aperçu avt impression
 
Worksheets(ImpMois).Select
 
With ActiveSheet.PageSetup
    .PrintTitleRows = ""
    .PrintTitleColumns = "$A:$A"
End With
 
If ImpMois = "Bilan" Then
'Définit la plage de cellules que tu souhaites imprimer
ActiveSheet.PageSetup.PrintArea = "$A$1:$H$20"
Else
ActiveSheet.PageSetup.PrintArea = "$A$1:$AF$20"
End If
'Paramètres de mise en page
With ActiveSheet.PageSetup
    .RightHeader = "" & Chr(10) & "" & Chr(10) & "" & Chr(10) & "" & Chr(10) & "&G"
    .LeftFooter = "&P / &N" & Chr(10) & "" & Chr(10) & "" & Chr(10) & ""
    .CenterFooter = "&12&D - &T" & Chr(10) & "" & Chr(10) & "" & Chr(10) & ""
    .RightFooter = "&""Arial,Italique""&Graphique" & Chr(10) & "" & Chr(10) & "" & Chr(10) & ""
    .Zoom = 70
    .CenterHorizontally = True
    .CenterVertically = True
    .Orientation = xlLandscape
End With
 
Me.Hide
ActiveWindow.SelectedSheets.PrintPreview
Me.Show
 
End Sub
A toi de varier les paramètres pour avoir l'impression que tu souhiates (paysage, marges, en-tête et pied de page...)

Cdt
Cocotte278 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 08/12/2011, 17h02   #3
Expert Confirmé Sénior
 
Avatar de jfontaine
 
Homme Jérôme FONTAINE
Contrôleur de Gestion
Inscription : juin 2006
Messages : 3 920
Détails du profil
Informations personnelles :
Nom : Homme Jérôme FONTAINE
Âge : 38
Localisation : France, Sarthe (Pays de la Loire)

Informations professionnelles :
Activité : Contrôleur de Gestion

Informations forums :
Inscription : juin 2006
Messages : 3 920
Points : 7 237
Points : 7 237
Bonjour,

Dans Excel on ne peut pas imprimer un arrière plan.

Par contre, l'astuce est de mettre la même image dans l'en-tête de la mise en page d'impression.
__________________
Jérôme

Citation:
"Ils ne savaient pas que c'était impossible, alors ils l'ont fait" - Marc Twain
Si la réponse répond à votre besoin, votre vote nous encouragera.
Dans le cas ou la réponse mérite, à vos yeux, un , nous faire partager la raison de ce vote, pourrait nous permettre de nous améliorer.
jfontaine est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 01h01.


 
 
 
 
Partenaires

Hébergement Web