Je veux définir une zone d'impression variable en fonction du nombre de
lignes sur feuille
À l'aide de l'enregistreur de macros, j'ai obtenu la zone suivante:
sub imprime()
Range("A1:E23").Select
ActiveSheet.PageSetup.PrintArea = "$A$1:$E$23"
end sub
Ma question:
Comment puis-je définir la zone d'impression en fonction des paramètres
suivants:
sub imprime()
Dim portion As Range
Dim lignes
lignes = Sheets("feuil2").Range("d3") + 5
Range("A1").Select
ActiveCell.Resize(lignes, 5).Select
ActiveSheet.PageSetup.PrintArea = 'portion'
"$A$1:$E$23"
end sub
Salut sub imprime() lignes = Feuil2.[D3]+5 Feuil2.PageSetup.PrintArea = "A1:E" & lignes End sub
Youky "Flac" a écrit dans le message de news: e9p%
Bonjour à tous, Excel 2000
Je veux définir une zone d'impression variable en fonction du nombre de lignes sur feuille
À l'aide de l'enregistreur de macros, j'ai obtenu la zone suivante:
sub imprime() Range("A1:E23").Select ActiveSheet.PageSetup.PrintArea = "$A$1:$E$23" end sub
Ma question: Comment puis-je définir la zone d'impression en fonction des paramètres suivants:
sub imprime() Dim portion As Range Dim lignes lignes = Sheets("feuil2").Range("d3") + 5 Range("A1").Select ActiveCell.Resize(lignes, 5).Select ActiveSheet.PageSetup.PrintArea = 'portion' "$A$1:$E$23" end sub
Merci
Flac
Salut
sub imprime()
lignes = Feuil2.[D3]+5
Feuil2.PageSetup.PrintArea = "A1:E" & lignes
End sub
Youky
"Flac" <luc_bt@hotmail.com> a écrit dans le message de news:
e9p%23OqefHHA.5052@TK2MSFTNGP06.phx.gbl...
Bonjour à tous,
Excel 2000
Je veux définir une zone d'impression variable en fonction du nombre de
lignes sur feuille
À l'aide de l'enregistreur de macros, j'ai obtenu la zone suivante:
sub imprime()
Range("A1:E23").Select
ActiveSheet.PageSetup.PrintArea = "$A$1:$E$23"
end sub
Ma question:
Comment puis-je définir la zone d'impression en fonction des paramètres
suivants:
sub imprime()
Dim portion As Range
Dim lignes
lignes = Sheets("feuil2").Range("d3") + 5
Range("A1").Select
ActiveCell.Resize(lignes, 5).Select
ActiveSheet.PageSetup.PrintArea = 'portion'
"$A$1:$E$23"
end sub
Salut sub imprime() lignes = Feuil2.[D3]+5 Feuil2.PageSetup.PrintArea = "A1:E" & lignes End sub
Youky "Flac" a écrit dans le message de news: e9p%
Bonjour à tous, Excel 2000
Je veux définir une zone d'impression variable en fonction du nombre de lignes sur feuille
À l'aide de l'enregistreur de macros, j'ai obtenu la zone suivante:
sub imprime() Range("A1:E23").Select ActiveSheet.PageSetup.PrintArea = "$A$1:$E$23" end sub
Ma question: Comment puis-je définir la zone d'impression en fonction des paramètres suivants:
sub imprime() Dim portion As Range Dim lignes lignes = Sheets("feuil2").Range("d3") + 5 Range("A1").Select ActiveCell.Resize(lignes, 5).Select ActiveSheet.PageSetup.PrintArea = 'portion' "$A$1:$E$23" end sub
Je veux définir une zone d'impression variable en fonction du nombre de lignes sur feuille
À l'aide de l'enregistreur de macros, j'ai obtenu la zone suivante:
sub imprime() Range("A1:E23").Select ActiveSheet.PageSetup.PrintArea = "$A$1:$E$23" end sub
Ma question: Comment puis-je définir la zone d'impression en fonction des paramètr es suivants:
sub imprime() Dim portion As Range Dim lignes lignes = Sheets("feuil2").Range("d3") + 5 Range("A1").Select ActiveCell.Resize(lignes, 5).Select ActiveSheet.PageSetup.PrintArea = 'portion' "$A$1:$E$23" end sub
On 13 avr, 18:41, "Flac" <luc...@hotmail.com> wrote:
Bonjour à tous,
Excel 2000
Je veux définir une zone d'impression variable en fonction du nombre de
lignes sur feuille
À l'aide de l'enregistreur de macros, j'ai obtenu la zone suivante:
sub imprime()
Range("A1:E23").Select
ActiveSheet.PageSetup.PrintArea = "$A$1:$E$23"
end sub
Ma question:
Comment puis-je définir la zone d'impression en fonction des paramètr es
suivants:
sub imprime()
Dim portion As Range
Dim lignes
lignes = Sheets("feuil2").Range("d3") + 5
Range("A1").Select
ActiveCell.Resize(lignes, 5).Select
ActiveSheet.PageSetup.PrintArea = 'portion'
"$A$1:$E$23"
end sub
Je veux définir une zone d'impression variable en fonction du nombre de lignes sur feuille
À l'aide de l'enregistreur de macros, j'ai obtenu la zone suivante:
sub imprime() Range("A1:E23").Select ActiveSheet.PageSetup.PrintArea = "$A$1:$E$23" end sub
Ma question: Comment puis-je définir la zone d'impression en fonction des paramètr es suivants:
sub imprime() Dim portion As Range Dim lignes lignes = Sheets("feuil2").Range("d3") + 5 Range("A1").Select ActiveCell.Resize(lignes, 5).Select ActiveSheet.PageSetup.PrintArea = 'portion' "$A$1:$E$23" end sub