XL 2010 comment inserer un texte ou zone de texte dans une feuille excell

[pierre dupont]

bonjour j'ai vu ici des solutions mais je ne sais pas les appliquer
je voudrai tout simplement insérer un texte en filigrane au milieu de ma feuille
d'avance merci de votre aide

 

[Staple1600]

Re

Voici mes réglages correspondant à mon filigrane

Pour Excel 2010, l'affichage des options doit être différent.
(Faire un clic-droit sur le WordArt et choisir Format de la forme)

PS: Je suis sur Excel 2013.

 

[Staple1600]

Re

Sur Excel 2010, cela doit ressembler à cela (à vérifier)

 

[patricktoulon]

bonjour à tous
avec l'option entête de page/image vous avez un vrai filigrane( les cellules sont accessibles) mais avec un simple wordart ça n'est plus le cas j'ai testé les 2 tutos
bon si c'est juste pour l'impression c'est pas grave par contre si le filigrane doit rester ça peut poser problème
il y a des solutions certes un peu plus compliquées
par vba
1 créer un shape blanc de la dimension de la plage(la plage qui comprends toute la page qui s'imprime )
2 créer un wordart l'arranger a sa convenance lui appliquer une rotation et le placer
3 grouper la shapes et le wordart
4 sauver le group avec la méthode chart connue de tous on la trouve partout
5 deleter le group
6 insertion/entete pied de page
7 image(choisir l'image précédemment créée et enregistrée avec l'export du chart

tout ça par vba doit prendre moins d'une seconde

voila c'est la même chose que ce que t'expliquais Staple1600 au début sauf que l'on passe pas par word et paint

 

[pierre dupont]

super le seul soucis mon filigrane s'affiche au dessus du texte et pas en dessous je suis exactement votre tuto loll je comprends pas

 

[patricktoulon]

super le seul soucis mon filigrane s'affiche au dessus du texte et pas en dessous je suis exactement votre tuto loll je comprends pas

j'ai répondu à cette question juste avant

 

[Staple1600]

Re, bonjour patricktoulon

=>pierredupont
Tu as pris quelle option?
• Avec WordArt
• ou avec une forme automatique (methode 2)

Il faut régler la transparence du texte dans le Word
(voir mes précédents messages)
Est-ce que tu as trouvé comment on règle la transparence avec Excel 2010?

=>patricktoulon
Voir mes premiers messages où j'ai déjà évoqué Entête/=>Insérer image
(cf tuto microsoft)
=> message#8

 

[pierre dupont]

oui pas de soucis pour régler la transparence mais elle cache le contenu mon filigrane reste devant le texte

 

[patricktoulon]

heu.... tu a lu ce que j'ai posté en #34
@Staple1600 oui j'ai vu j'ai seulement indiqué que tout pouvait se faire a partir d'excel mais c'est un peu plus compliqué
j'ai bien détaillé les étapes

 

[Staple1600]

Re

Est-ce tu as mis une couleur (même blanche) de fond dans ton WordArt.
Si c'est le cas, il faut choisir Aucun remplissage et aucune bordure.

 

[Staple1600]

Re

=>pierredupont
Sur mon exemple de ce matin, on voit suffisamment le texte derrière le filigrane, non ?



=>patricktoulon
C'est un problème de lunettes qui m'a fait passer par Word
(voir mon premier message de ce matin)
J'indiquais simplement que le demandeur ayant des difficultés avec la méthode décrite dans le message#8, qu'il était plus simple de passer par WordArt directement dans Excel.
(Si on repart dans l'entête, on va ajouter de la difficulté à la difficulté )

 

[patricktoulon]

non pas du tout
et de toute façon ça ne lui convient pas puisque le shape sera toujours dessus

déjà pour créer l'object (qui est le filigrame)
l'arranger comme vous voulez après

Sub test()
    Set Rng = Range(ActiveSheet.PageSetup.PrintArea)
    ActiveSheet.Shapes.AddTextEffect(msoTextEffect1, " ceci est un filigrane ", _
                                     "algerian", 14#, msoTrue, msoFalse, 0, Rng.Height / 2).Select
    With Selection
        .Width = Rng.Height
        .ShapeRange.TextEffect.PresetShape = msoTextEffectShapePlainText
        .ShapeRange.Fill.Transparency = 1
        .ShapeRange.Line.Weight = 0
        .ShapeRange.Line.Transparency = 1
        .ShapeRange.IncrementRotation -40#
    End With
End Sub

si le printarea est grand et que l'on amis des sauts de pages il faut prendre le top de la ligne ou se trouve le premier saut /2 à la place de Rng.Height / 2

si il veux vraiment en filigrane
avant cela il faut crer un shape blanc(plein) de la dimension et en top 0 et left 0 du du range printarea
ensuite creer le wordart
grouper les deux
sauver en image avec un chart
et reprendre ta manipe entete/image avec l'image précédemment sauvée
l'image se placera toute seule puisque elle est sensée être de la même dimension que la page(1) du printarea

vous avez deja le wordart en diagonale

 

[Staple1600]

Re

=>patricktoulon
Du VBA?
Je m'en suis abstenu puisque

je vais me situer vis à vis de vous je ne suis pas l'expert que vous êtes je sais faire les feuilles de calcul simple en employant quelques fonctions comme le "si"et autres fonctions de base

NB: Sur ma copie d'écran, j'ai pas la berlue, on voit le contenu des cellules derrière le WordArt, non?

 

[patricktoulon]

re
ben lui reste plus qu'a trouver une baguette magique alors

pas de bras pas de chocolat
sans vba il ne pourra pas faire ce qu'il désire

 

[Staple1600]

Re

=>patricktoulon
Euh, tu n'es pas d'accord avec moi? (Y'a un truc qui m'échappe)
(Je parle de la copie écran de mon test filigrane -> cf message#28)
On voit clairement le contenu des cellules, non?
Pourquoi cette solution (avec WordArt) te convient pas?

 

[patricktoulon]

re
parce que comme il a préciser a plusieurs reprises les cellules sous le wordart ne sont plus accessibles
c'est tout
il veux un filigrane permanent pas qu'en impression
conclusion il faut le construire le sauver en image et le mettre en filigrane avec entete/image
pour cela suivre les étapes que j'ai cité plus haut (et c'est la méthode la plus simple(on peut faire avec les api gdi aussi)) mais a mon avis c'est la rupture d'anévrisme
c'est pas compliqué sans vba il peut pas c'est tout
donc je répète (pas de bras pas de chocolat)
soit il s'y met soit il oublie