Re:Macro : reconnaitre le texte dans une cellule d
super jm
je vois que tu maitrise vraiment
donc encore une tite quesiton pour toi
je vais t'expliquer dans le détail ce que je voudrais réaliser
et voici d'abord la macro que j'ai écrite en grande partie grace a toi :
Sub Macro1()
'
' Macro1 Macro
' Macro enregistrée le 01/08/2005 par ff²
'
'
Range('J3:J23').Select
Selection.ClearContents
Dim MaVar As String
MaVar = Range('D4').Offset(0, -1)
Range('A30:A57').Select
Selection.AutoFilter
Selection.AutoFilter Field:=1, Criteria1:=MaVar
Range('B31:B47').Select
Selection.Copy
ActiveWindow.SmallScroll Down:=-24
Range('J3').Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Range('D4').Select
Application.CutCopyMode = False
With Selection.Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:='=$J$3:$J$29'
.IgnoreBlank = True
.InCellDropdown = True
.InputTitle = ''
.ErrorTitle = ''
.InputMessage = ''
.ErrorMessage = ''
.ShowInput = True
.ShowError = True
End With
End Sub
en fait je demande à la macro de regarder la cellule précédente à partir de laquelle elle fait le tri sur une liste en dessous elle recopie les cellules triées à droite , les colle sur une plage à partir de laquelle (dans la cellule de départ) je réalise une liste de validation.
Le fait est que je voudrais que cette macro s'étende à toute la colonne et nom pas uniquement à la celulle D4.
Tu vois ce que je veux dire : que si je me mets dans la cellule D456, la macro prenne comme variable la C456 pour faire le tri!
peux-tu m'indiquer une fois encore le chemin à suivre stp ?
ff
