OVH Cloud OVH Cloud

Encadré automatique A:H

6 réponses
Avatar
Vincent
Bonjour.
J'ai créé un macro qui envoie une ligne après copie dans une feuille
les lignes se mettent les une après les autres.
Comment faire afin qu'un encadrée se mette automatiquement autour.
sans MEFC, car je souhaite pouvoir imprimer directement.
A:H

Merci beaucoup
VIncent

6 réponses

Avatar
LeSteph
Bonsoir,
Souvent quand on envoie la ligne c'est pour le macro!
Alors c'est valable pour plein d'autres poissons et je te garantis
que si tu écoute 'ce conseil 'tu vas en attraper :
pour mettre l'encadré tu donnes 'un petit coup d'enregistreur'
tu sélectionne la zone que tu veux encadrer et tu cliques sur le
bouton d'encadrement dans la barre d'outils.
Tu arrêtes là la macro et tu fais alt-F11 pour relever
tes filets.
Bonne pêche.

leStephinou

"Vincent" a écrit dans le message de
news:
Bonjour.
J'ai créé un macro qui envoie une ligne après copie dans une feuille
les lignes se mettent les une après les autres.
Comment faire afin qu'un encadrée se mette automatiquement autour.
sans MEFC, car je souhaite pouvoir imprimer directement.
A:H

Merci beaucoup
VIncent




Avatar
Vincent
Yes LeSteph, c'est vrai !
Mais je pense qu'il y a plus propre, car il y a beaucoup de lignes et ma
foi, pour nettoyer tout cela...
M'enfin
Merci quand même
@+

"LeSteph" a écrit dans le message de
news:%
Bonsoir,
Souvent quand on envoie la ligne c'est pour le macro!
Alors c'est valable pour plein d'autres poissons et je te garantis
que si tu écoute 'ce conseil 'tu vas en attraper :
pour mettre l'encadré tu donnes 'un petit coup d'enregistreur'
tu sélectionne la zone que tu veux encadrer et tu cliques sur le
bouton d'encadrement dans la barre d'outils.
Tu arrêtes là la macro et tu fais alt-F11 pour relever
tes filets.
Bonne pêche.

leStephinou

"Vincent" a écrit dans le message de
news:
Bonjour.
J'ai créé un macro qui envoie une ligne après copie dans une feuille
les lignes se mettent les une après les autres.
Comment faire afin qu'un encadrée se mette automatiquement autour.
sans MEFC, car je souhaite pouvoir imprimer directement.
A:H

Merci beaucoup
VIncent








Avatar
EMiLe
Je vois que tout le monde se marre bien ici... ;)
Pas mal le ptit jeu de mots...

Je sers la sciences et c'est ma joie

EMiLe



Bonsoir,
Souvent quand on envoie la ligne c'est pour le macro!
Alors c'est valable pour plein d'autres poissons et je te garantis
que si tu écoute 'ce conseil 'tu vas en attraper :
pour mettre l'encadré tu donnes 'un petit coup d'enregistreur'
tu sélectionne la zone que tu veux encadrer et tu cliques sur le
bouton d'encadrement dans la barre d'outils.
Tu arrêtes là la macro et tu fais alt-F11 pour relever
tes filets.
Bonne pêche.

leStephinou

"Vincent" a écrit dans le message de
news:

Bonjour.
J'ai créé un macro qui envoie une ligne après copie dans une feuille
les lignes se mettent les une après les autres.
Comment faire afin qu'un encadrée se mette automatiquement autour.
sans MEFC, car je souhaite pouvoir imprimer directement.
A:H

Merci beaucoup
VIncent









Avatar
LeSteph
Bon , me suis abstenu sur l'autre coup(tu n'aurais rien dû donner00:15:22)
car ru-th avait donné un très bon conseil
et ma moquerie n'était pas innocente mais je vois que tu comprends alors
bienvenue au Club?..
Désormais ton ami..
leSteph
"EMiLe" a écrit dans le message de
news:
Je vois que tout le monde se marre bien ici... ;)
Pas mal le ptit jeu de mots...

Je sers la sciences et c'est ma joie

EMiLe



Bonsoir,
Souvent quand on envoie la ligne c'est pour le macro!
Alors c'est valable pour plein d'autres poissons et je te garantis
que si tu écoute 'ce conseil 'tu vas en attraper :
pour mettre l'encadré tu donnes 'un petit coup d'enregistreur'
tu sélectionne la zone que tu veux encadrer et tu cliques sur le
bouton d'encadrement dans la barre d'outils.
Tu arrêtes là la macro et tu fais alt-F11 pour relever
tes filets.
Bonne pêche.

leStephinou

"Vincent" a écrit dans le message de
news:

Bonjour.
J'ai créé un macro qui envoie une ligne après copie dans une feuille
les lignes se mettent les une après les autres.
Comment faire afin qu'un encadrée se mette automatiquement autour.
sans MEFC, car je souhaite pouvoir imprimer directement.
A:H

Merci beaucoup
VIncent











Avatar
LeSteph
Bonjour,
...
pour nettoyer tout cela
Tu gardes un seul With

tu vires les constantes xl... et gardes tout borders
ensuite
tu enlève ce qui n'est pas souhaitable

Sub cadrececi()
With Selection.Borders
.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = xlAutomatic
End With
Selection.Borders(xlInsideVertical).LineStyle = xlNone
Selection.Borders(xlDiagonalDown).LineStyle = xlNone
Selection.Borders(xlDiagonalUp).LineStyle = xlNone
End Sub

leSteph

"Vincent" a écrit dans le message de
news:
Yes LeSteph, c'est vrai !
Mais je pense qu'il y a plus propre, car il y a beaucoup de lignes et ma
foi, pour nettoyer tout cela...
M'enfin
Merci quand même
@+

"LeSteph" a écrit dans le message de
news:%
Bonsoir,
Souvent quand on envoie la ligne c'est pour le macro!
Alors c'est valable pour plein d'autres poissons et je te garantis
que si tu écoute 'ce conseil 'tu vas en attraper :
pour mettre l'encadré tu donnes 'un petit coup d'enregistreur'
tu sélectionne la zone que tu veux encadrer et tu cliques sur le
bouton d'encadrement dans la barre d'outils.
Tu arrêtes là la macro et tu fais alt-F11 pour relever
tes filets.
Bonne pêche.

leStephinou

"Vincent" a écrit dans le message de
news:
Bonjour.
J'ai créé un macro qui envoie une ligne après copie dans une feuille
les lignes se mettent les une après les autres.
Comment faire afin qu'un encadrée se mette automatiquement autour.
sans MEFC, car je souhaite pouvoir imprimer directement.
A:H

Merci beaucoup
VIncent












Avatar
Vincent
Merci beaucoup Le steph
Vincent

"LeSteph" a écrit dans le message de
news:
Bonjour,
...
pour nettoyer tout cela
Tu gardes un seul With

tu vires les constantes xl... et gardes tout borders
ensuite
tu enlève ce qui n'est pas souhaitable

Sub cadrececi()
With Selection.Borders
.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = xlAutomatic
End With
Selection.Borders(xlInsideVertical).LineStyle = xlNone
Selection.Borders(xlDiagonalDown).LineStyle = xlNone
Selection.Borders(xlDiagonalUp).LineStyle = xlNone
End Sub

leSteph

"Vincent" a écrit dans le message de
news:
Yes LeSteph, c'est vrai !
Mais je pense qu'il y a plus propre, car il y a beaucoup de lignes et ma
foi, pour nettoyer tout cela...
M'enfin
Merci quand même
@+

"LeSteph" a écrit dans le message de
news:%
Bonsoir,
Souvent quand on envoie la ligne c'est pour le macro!
Alors c'est valable pour plein d'autres poissons et je te garantis
que si tu écoute 'ce conseil 'tu vas en attraper :
pour mettre l'encadré tu donnes 'un petit coup d'enregistreur'
tu sélectionne la zone que tu veux encadrer et tu cliques sur le
bouton d'encadrement dans la barre d'outils.
Tu arrêtes là la macro et tu fais alt-F11 pour relever
tes filets.
Bonne pêche.

leStephinou

"Vincent" a écrit dans le message de
news:
Bonjour.
J'ai créé un macro qui envoie une ligne après copie dans une feuille
les lignes se mettent les une après les autres.
Comment faire afin qu'un encadrée se mette automatiquement autour.
sans MEFC, car je souhaite pouvoir imprimer directement.
A:H

Merci beaucoup
VIncent