J'ai 2 zônes zOrigine et zCible, de taille identique (même nb de lignes, et
une seule colonne), situées dans des feuilles différentes d'un même
classeur.
La cellule active est située dans zOrigine.
Je souhaite me positionner sur la cellule "homologue", située au m^me
endroit, mais dans zCible.
Existe-t-il une fonction, qui saurait me donner aisément la position de ma
cellule active dans zOrigine ?
J'ai essayé ADDRESS, mais sans succès, et n'ai rien trouvé dans les
newsgroups qui répondrait à ce problême.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Joël GARBE
Bonsoir...
Sub KelCellule() Dim i As Long Dim j As Integer i = ActiveCell.Row - Range("Source").Range("A1").Row j = ActiveCell.Column - Range("Source").Range("A1").Column Range("Desti").Select ActiveCell.Offset(i, j).Activate End Sub
Bien cordialement,
Joël GARBE www.joelgarbe.fr "mouspi" a écrit dans le message de news: %23LwS$
Bonsoir à tous,
J'ai 2 zônes zOrigine et zCible, de taille identique (même nb de lignes, et une seule colonne), situées dans des feuilles différentes d'un même classeur.
La cellule active est située dans zOrigine.
Je souhaite me positionner sur la cellule "homologue", située au m^me endroit, mais dans zCible.
Existe-t-il une fonction, qui saurait me donner aisément la position de ma cellule active dans zOrigine ?
J'ai essayé ADDRESS, mais sans succès, et n'ai rien trouvé dans les newsgroups qui répondrait à ce problême.
Merci à ceux qui ont de bonnes idées.
mouspi
Bonsoir...
Sub KelCellule()
Dim i As Long
Dim j As Integer
i = ActiveCell.Row - Range("Source").Range("A1").Row
j = ActiveCell.Column - Range("Source").Range("A1").Column
Range("Desti").Select
ActiveCell.Offset(i, j).Activate
End Sub
Bien cordialement,
Joël GARBE
www.joelgarbe.fr
"mouspi" <mouspi@kichette.com> a écrit dans le message de news:
%23LwS$XbzEHA.3880@TK2MSFTNGP10.phx.gbl...
Bonsoir à tous,
J'ai 2 zônes zOrigine et zCible, de taille identique (même nb de lignes,
et une seule colonne), situées dans des feuilles différentes d'un même
classeur.
La cellule active est située dans zOrigine.
Je souhaite me positionner sur la cellule "homologue", située au m^me
endroit, mais dans zCible.
Existe-t-il une fonction, qui saurait me donner aisément la position de ma
cellule active dans zOrigine ?
J'ai essayé ADDRESS, mais sans succès, et n'ai rien trouvé dans les
newsgroups qui répondrait à ce problême.
Sub KelCellule() Dim i As Long Dim j As Integer i = ActiveCell.Row - Range("Source").Range("A1").Row j = ActiveCell.Column - Range("Source").Range("A1").Column Range("Desti").Select ActiveCell.Offset(i, j).Activate End Sub
Bien cordialement,
Joël GARBE www.joelgarbe.fr "mouspi" a écrit dans le message de news: %23LwS$
Bonsoir à tous,
J'ai 2 zônes zOrigine et zCible, de taille identique (même nb de lignes, et une seule colonne), situées dans des feuilles différentes d'un même classeur.
La cellule active est située dans zOrigine.
Je souhaite me positionner sur la cellule "homologue", située au m^me endroit, mais dans zCible.
Existe-t-il une fonction, qui saurait me donner aisément la position de ma cellule active dans zOrigine ?
J'ai essayé ADDRESS, mais sans succès, et n'ai rien trouvé dans les newsgroups qui répondrait à ce problême.
Merci à ceux qui ont de bonnes idées.
mouspi
AV
Sous réserves que les plages soient nommées et que la cellule active (comme dit dans la question) soit dans la plage "zOrigine":
Sub zzz() Application.Goto Reference:=[zCible].Item(Application.Match(ActiveCell, [zOrigine], 0)) End Sub
AV
Sous réserves que les plages soient nommées et que la cellule active (comme dit
dans la question) soit dans la plage "zOrigine":
Sub zzz()
Application.Goto Reference:=[zCible].Item(Application.Match(ActiveCell,
[zOrigine], 0))
End Sub