portrait ou paysage

[guima1642]

Bonjour,

Peut on indiquer dans une macro que l'on veut une impression en portrait si un "P" se trouve en "colonne F"
ou une impression en paysage si un "L" se trouve en "colonne F"

Merci d'avance

 

[tototiti2008]

Re : portrait ou paysage

Bonjour guima,

si j'ai bien compris

 ActiveSheet.PageSetup.Orientation = IIf(Range("F1").Value = "L", xlLandscape, xlPortrait)

 

[PascalXLD]

Re : portrait ou paysage

Bonjour

A essayer dans le code du Thisworkbook

Private Sub Workbook_BeforePrint(Cancel As Boolean)
If Range("F1") = "L" Then
ActiveSheet.PageSetup.Orientation = xlLandscape
ElseIf Range("F1") = "P" Then
ActiveSheet.PageSetup.Orientation = xlPortrait
Else
MsgBox "comment imprime-t-on ?"
Cancel = True
End If
End Sub

 

[criscris11]

Re : portrait ou paysage

Bonjour guima,

si j'ai bien compris

 ActiveSheet.PageSetup.Orientation =[COLOR=Red][B] IIf[/B][/COLOR](Range("F1").Value = "L", xlLandscape, xlPortrait)

Attention, un I en trop s'est glissé dans le If du code 😉.

 

[PascalXLD]

Re : portrait ou paysage

Attention, un I en trop s'est glissé dans le If du code 😉.

Re

Non non pas du tout c'est bien un IIf

très pratique par moment 😉

 

[guima1642]

Re : portrait ou paysage

Merci pour ces solutions.
Quel rapidité.
Super

 

[criscris11]

Re : portrait ou paysage

Re Pascal,
Sorry, je n'avais jamais vu cela auparavant : pourrais-tu éclairé ma lanterne, s'il te plaît ?

 

[PascalXLD]

Re : portrait ou paysage

re

alors cela se contruit ainsi

iif(test, valeur si vrai, valeur si faux)

cela peut-être pratique lorsqu'il n'y a que 2 possibilités

exemple

Range("A1") = IIf(tata> 1000, "Grand", "Petit")

Par contre il faut que la condition soit toujours "testable"

 

[criscris11]

Re : portrait ou paysage

Re,
Merci Pascal pour ces précisions.

 

[tototiti2008]

Re : portrait ou paysage

Bonjour PascalXLD, criscris,

Par contre il faut que la condition soit toujours "testable"

En effet, tu fais bien de préciser (j'en ai fait l'expérience récemment), les 2 cas sont évalués (vrai et faux) même s'il n'a pas besoin de rentrer dedans... c'est le défaut du iif. Ca peut évidement occasionner quelques plantages.