flo2002
XLDnaute Impliqué
Re Bonjour à tous!
En esperant ne pas deja avoir poster sur ce sujet!
Mon probleme est tout d'abord que excel n'arrive pas à identifier la ligne ou il y aurai mes etiquettes. Personnellement si on pouvait avoir un moyen qu'il ne mette plus ce message ce serai pas mal.
Sinon un autre probleme deja abordé mais on ne sait jamais, il me met le total sur une ligne de manière aleatoire!
voici le code utilisé:
Sub ssttxIRP()
'
' ssttxIRP Macro
' Macro enregistrée le 11/05/2006 par fllecorr
'
'
Rows('8:300').Select
Selection.Subtotal GroupBy:=1, Function:=xlSum, TotalList:=Array(11, 12, 13 _
, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, _
40, 41, 42, 43, 44, 70), Replace:=True, PageBreaks:=False, SummaryBelowData:= _
True
Range('a1').Select
End Sub
Sub sup_ssttxIRP()
'
' sup_ssttx Macro
' Macro enregistrée le 09/05/2006 par fllecorr
'
'
Cells.Select
Selection.RemoveSubtotal
Range('a1').Select
End Sub
merci d'avance ou d'avance merci!
En esperant ne pas deja avoir poster sur ce sujet!
Mon probleme est tout d'abord que excel n'arrive pas à identifier la ligne ou il y aurai mes etiquettes. Personnellement si on pouvait avoir un moyen qu'il ne mette plus ce message ce serai pas mal.
Sinon un autre probleme deja abordé mais on ne sait jamais, il me met le total sur une ligne de manière aleatoire!
voici le code utilisé:
Sub ssttxIRP()
'
' ssttxIRP Macro
' Macro enregistrée le 11/05/2006 par fllecorr
'
'
Rows('8:300').Select
Selection.Subtotal GroupBy:=1, Function:=xlSum, TotalList:=Array(11, 12, 13 _
, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, _
40, 41, 42, 43, 44, 70), Replace:=True, PageBreaks:=False, SummaryBelowData:= _
True
Range('a1').Select
End Sub
Sub sup_ssttxIRP()
'
' sup_ssttx Macro
' Macro enregistrée le 09/05/2006 par fllecorr
'
'
Cells.Select
Selection.RemoveSubtotal
Range('a1').Select
End Sub
merci d'avance ou d'avance merci!