jacky49
XLDnaute Impliqué
Bonsoir le Forum,
J'ai ce code qui me sert à imprimer un tableau mais je voudrais masquer des colonnes et je n'arrives pas à insérer les lignes de code pour les masquer , je voudrais masquer les colonnes EM,EO,EP
merci d'avance
jacky
J'ai ce code qui me sert à imprimer un tableau mais je voudrais masquer des colonnes et je n'arrives pas à insérer les lignes de code pour les masquer , je voudrais masquer les colonnes EM,EO,EP
merci d'avance
jacky
Code:
Sub PlacementSurLaLigne(ByVal WsName As String)
Dim MaPlage As Range
Dim Derlig As Long
With ThisWorkbook.Worksheets(WsName)
Derlig = .Range("EL" & .Rows.Count).End(xlUp).Row
With .PageSetup
.PrintArea = "EI1:EY" & Derlig
End With
.PrintOut Copies:=4, Collate:=True
End With
End Sub