Macro : dire à la macro de cibler la cellule sélec

[ff² francois]

bjr,
je galère sur mes macros,

j'en ai écrit une belle qui quand je suis sur la cellule H8, regarde la cellule précédente (G8) la prend comme variable et tri à partir d'elle une liste prédéfinie.
Le truc c que je voudrais que qu'en je me met sur la cellule H9 elle prenne G9 et non pas G8. lol
qui peut me dire ce qu'il faut que j'écrive.
Merci d'avance

 

[Hervé]

Bonjour francois, le forum

regarde du coté de l'instruction offset qui permet de décaler une cellule, par exemple :

tavariable = ActiveCell.Offset(0, 1).value

Offset(ligne, colonne) pour ce décaler d'une colonne à droite = offset(0,1)
une colonne à gauche : offset(0,-1)
la ligne en dessous : offset(-1,0)

etc....

salut

 

[ff² francois]

hervé
ca ma marche pas

voilà ma macro 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


je te donne le fichier joint
je voudrais qu'en fait ou que je sois sur la colonne D , la macro prenne tjrs la cellule précédente pour comme variable pour trier sur la liste.
j'ai essayer avec activecell mais ca fait pas ce que je veux
merci pour ton aide

 

[Hervé]

bonsoir francois, le forum



Il manque la pièce jointe, sinon

tu dis :

je voudrais qu'en fait ou que je sois sur la colonne D , la macro prenne tjrs la cellule précédente

précédente par rapport à quoi ?

tu sélectionnes D4 et tu veux que la macro travaille avec D3 ???

Merci de nous fournir une pièce jointe.

salut