Bonjour,
Je cherche comment faire pour avoir sur une zone d'une feuille comme un
fond mais
que l'on puisse écrire dans les cellules en dessous.
Voir image
https://www.cjoint.com/c/JIgr0vMjfL1
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
MichD
Le 06/09/20 à 13:52, Brat'ac a écrit :
Bonjour, Je cherche comment faire pour avoir sur une zone d'une feuille comme un fond mais que l'on puisse écrire dans les cellules en dessous. Voir image https://www.cjoint.com/c/JIgr0vMjfL1 Merci
Bonjour,
Je cherche comment faire pour avoir sur une zone d'une feuille comme un
fond mais
que l'on puisse écrire dans les cellules en dessous.
Voir image
https://www.cjoint.com/c/JIgr0vMjfL1
Bonjour, Je cherche comment faire pour avoir sur une zone d'une feuille comme un fond mais que l'on puisse écrire dans les cellules en dessous. Voir image https://www.cjoint.com/c/JIgr0vMjfL1 Merci
Bonjour, rien à faire, j'ai essayé et rien pas de filigrane ni à l'écran ni en impression j'ai aussi essayé l'arrière-plan la par contre c'est la zizanie à l'écran https://www.cjoint.com/c/JIhiYRuAVl1
Bonjour, rien à faire, j'ai essayé et rien pas de filigrane ni à
l'écran ni en impression
j'ai aussi essayé l'arrière-plan la par contre c'est la zizanie à
l'écran
Bonjour, rien à faire, j'ai essayé et rien pas de filigrane ni à l'écran ni en impression j'ai aussi essayé l'arrière-plan la par contre c'est la zizanie à l'écran https://www.cjoint.com/c/JIhiYRuAVl1
Péhemme
Bonjour Brat'ac Je ne sais pas si cela répond à ta question, mais voici, à titre d'exemple, ce que je faisais (quand je travaillais du temps des dinosaures) : Sub Fili_Confidentiel() ActiveSheet.Shapes.AddTextEffect _ (msoTextEffect2, "C o n f i d e n t i e l", "ARIAL", 60#, _ msoFalse, msoFalse, 200, 100#).Select With Selection .ShapeRange.Fill.Visible = msoFalse 'msoTrue .ShapeRange.Fill.Solid .ShapeRange.Fill.ForeColor.SchemeColor = 22 .ShapeRange.Fill.Transparency = 1 'Maximum de la transparence .ShapeRange.Line.Visible = msoFalse .ShapeRange.IncrementRotation -45 .ShapeRange.IncrementLeft -250 .ShapeRange.IncrementTop 100 End With [a5].Select End Sub Bonne journée Michel W7 - Excel 2010 "Brat'ac" a écrit dans le message de groupe de discussion : 5f55f483$0$5901$ MichD a émis l'idée suivante :
Bonjour, rien à faire, j'ai essayé et rien pas de filigrane ni à l'écran ni en impression j'ai aussi essayé l'arrière-plan la par contre c'est la zizanie à l'écran https://www.cjoint.com/c/JIhiYRuAVl1
Bonjour Brat'ac
Je ne sais pas si cela répond à ta question, mais voici, à titre d'exemple,
ce que je faisais (quand je travaillais du temps des dinosaures) :
Sub Fili_Confidentiel()
ActiveSheet.Shapes.AddTextEffect _
(msoTextEffect2, "C o n f i d e n t i e l", "ARIAL", 60#, _
msoFalse, msoFalse, 200, 100#).Select
With Selection
.ShapeRange.Fill.Visible = msoFalse 'msoTrue
.ShapeRange.Fill.Solid
.ShapeRange.Fill.ForeColor.SchemeColor = 22
.ShapeRange.Fill.Transparency = 1 'Maximum de la transparence
.ShapeRange.Line.Visible = msoFalse
.ShapeRange.IncrementRotation -45
.ShapeRange.IncrementLeft -250
.ShapeRange.IncrementTop 100
End With
[a5].Select
End Sub
Bonne journée
Michel
W7 - Excel 2010
"Brat'ac" a écrit dans le message de groupe de discussion :
5f55f483$0$5901$426a34cc@news.free.fr...
Bonjour, rien à faire, j'ai essayé et rien pas de filigrane ni à
l'écran ni en impression
j'ai aussi essayé l'arrière-plan la par contre c'est la zizanie à
l'écran
Bonjour Brat'ac Je ne sais pas si cela répond à ta question, mais voici, à titre d'exemple, ce que je faisais (quand je travaillais du temps des dinosaures) : Sub Fili_Confidentiel() ActiveSheet.Shapes.AddTextEffect _ (msoTextEffect2, "C o n f i d e n t i e l", "ARIAL", 60#, _ msoFalse, msoFalse, 200, 100#).Select With Selection .ShapeRange.Fill.Visible = msoFalse 'msoTrue .ShapeRange.Fill.Solid .ShapeRange.Fill.ForeColor.SchemeColor = 22 .ShapeRange.Fill.Transparency = 1 'Maximum de la transparence .ShapeRange.Line.Visible = msoFalse .ShapeRange.IncrementRotation -45 .ShapeRange.IncrementLeft -250 .ShapeRange.IncrementTop 100 End With [a5].Select End Sub Bonne journée Michel W7 - Excel 2010 "Brat'ac" a écrit dans le message de groupe de discussion : 5f55f483$0$5901$ MichD a émis l'idée suivante :
Bonjour, rien à faire, j'ai essayé et rien pas de filigrane ni à l'écran ni en impression j'ai aussi essayé l'arrière-plan la par contre c'est la zizanie à l'écran https://www.cjoint.com/c/JIhiYRuAVl1
Péhemme
Mais il est vrai que je ne le faisais qu'une fois mon projet terminé. Michel "Brat'ac" a écrit dans le message de groupe de discussion : 5f55f483$0$5901$ MichD a émis l'idée suivante :
Bonjour, rien à faire, j'ai essayé et rien pas de filigrane ni à l'écran ni en impression j'ai aussi essayé l'arrière-plan la par contre c'est la zizanie à l'écran https://www.cjoint.com/c/JIhiYRuAVl1
Mais il est vrai que je ne le faisais qu'une fois mon projet terminé.
Michel
"Brat'ac" a écrit dans le message de groupe de discussion :
5f55f483$0$5901$426a34cc@news.free.fr...
Bonjour, rien à faire, j'ai essayé et rien pas de filigrane ni à
l'écran ni en impression
j'ai aussi essayé l'arrière-plan la par contre c'est la zizanie à
l'écran
Mais il est vrai que je ne le faisais qu'une fois mon projet terminé. Michel "Brat'ac" a écrit dans le message de groupe de discussion : 5f55f483$0$5901$ MichD a émis l'idée suivante :
Bonjour, rien à faire, j'ai essayé et rien pas de filigrane ni à l'écran ni en impression j'ai aussi essayé l'arrière-plan la par contre c'est la zizanie à l'écran https://www.cjoint.com/c/JIhiYRuAVl1
Bonjour, rien à faire, j'ai essayé et rien pas de filigrane ni à l'écran ni en impression j'ai aussi essayé l'arrière-plan la par contre c'est la zizanie à l'écran https://www.cjoint.com/c/JIhiYRuAVl1
A ) Crée ou trouve l'image que tu veux utiliser. B ) Ruban / Insertion / Section TEXTE, commande : En-tête/Pied La feuille de calcul est modifiée et tu as le curseur qui clignote dans un rectangle "En-tête" C ) Section : Éléments en-tête et pied de page / commande : Image Une fenêtre d'ouvre et tu sélectionnes l'image désirée en parcourant l'explorateur de fichiers Windows. D ) Lorsque dans ledit rectangle tu as ceci : &[Image] , il ne te reste plus qu'à cliquer à l'extérieur de ce dernier. L'image apparaît. Ladite image se déplace chaque fois que tu cliques dans une nouvelle section. E ) Eh! oui, ça fonctionne bien! MichD
Bonjour, rien à faire, j'ai essayé et rien pas de filigrane ni à l'écran
ni en impression
j'ai aussi essayé l'arrière-plan la par contre c'est la zizanie à l'écran
https://www.cjoint.com/c/JIhiYRuAVl1
A ) Crée ou trouve l'image que tu veux utiliser.
B ) Ruban / Insertion / Section TEXTE, commande : En-tête/Pied
La feuille de calcul est modifiée et tu as le curseur qui
clignote dans un rectangle "En-tête"
C ) Section : Éléments en-tête et pied de page / commande : Image
Une fenêtre d'ouvre et tu sélectionnes l'image désirée en parcourant
l'explorateur de fichiers Windows.
D ) Lorsque dans ledit rectangle tu as ceci : &[Image] , il ne te reste
plus qu'à cliquer à l'extérieur de ce dernier. L'image apparaît.
Ladite image se déplace chaque fois que tu cliques dans une
nouvelle section.
Bonjour, rien à faire, j'ai essayé et rien pas de filigrane ni à l'écran ni en impression j'ai aussi essayé l'arrière-plan la par contre c'est la zizanie à l'écran https://www.cjoint.com/c/JIhiYRuAVl1
A ) Crée ou trouve l'image que tu veux utiliser. B ) Ruban / Insertion / Section TEXTE, commande : En-tête/Pied La feuille de calcul est modifiée et tu as le curseur qui clignote dans un rectangle "En-tête" C ) Section : Éléments en-tête et pied de page / commande : Image Une fenêtre d'ouvre et tu sélectionnes l'image désirée en parcourant l'explorateur de fichiers Windows. D ) Lorsque dans ledit rectangle tu as ceci : &[Image] , il ne te reste plus qu'à cliquer à l'extérieur de ce dernier. L'image apparaît. Ladite image se déplace chaque fois que tu cliques dans une nouvelle section. E ) Eh! oui, ça fonctionne bien! MichD
