Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Selection de la 1ère cellule

Selection de la 1ère cellule

5 réponses
Avatar
GilSe
Bonjour à tous
J'ai utilisé l'enregistreur de macro et, en appuyant sur la touche "début",
j'ai comme résultat:
Sub macro1()
ActiveCell.Offset(0, -4).Range("A1").Select
End sub
Or je souhaite sélectionner la première cellule de la ligne indépendamment
de la position de la cellule active.
Quelle ligne de commande dois-je saisir dans une macro pour sélectionner la
1ère cellule de la ligne ?
Et quelle ligne de commande dois-je saisir dans une macro pour sélectionner
la 1ère cellule de la colonne ?
Merci à tous
Gilles
Signaler un problème avec ce contenu

5 réponses

Supprimer
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
Avatar
sabatier
bonjour gilles
pendant qu'ils sirotent leur dijo, histoire de faire un peu de training pour
demain, essaie cela :

Sub macro1()
Dim Topcell As Range
Set Topcell = Cells(1, ActiveCell.Column)
Topcell.Select
End Sub
Sub macro2()
Dim Leftcell As Range
Set Leftcell = Cells(ActiveCell.Row, 1)
Leftcell.Select
End Sub

HTH
jps

GilSe wrote:

Bonjour à tous
J'ai utilisé l'enregistreur de macro et, en appuyant sur la touche "début",
j'ai comme résultat:
Sub macro1()
ActiveCell.Offset(0, -4).Range("A1").Select
End sub
Or je souhaite sélectionner la première cellule de la ligne indépendamment
de la position de la cellule active.
Quelle ligne de commande dois-je saisir dans une macro pour sélectionner la
1ère cellule de la ligne ?
Et quelle ligne de commande dois-je saisir dans une macro pour sélectionner
la 1ère cellule de la colonne ?
Merci à tous
Gilles


Avatar
GilSe
Et bien on dirait que ca marche à la perfection...
Mais ne peut-on réduire cette fonction en une seule ligne?
Merci
Gilles

"sabatier" a écrit dans le message de
news:
bonjour gilles
pendant qu'ils sirotent leur dijo, histoire de faire un peu de training
pour

demain, essaie cela :

Sub macro1()
Dim Topcell As Range
Set Topcell = Cells(1, ActiveCell.Column)
Topcell.Select
End Sub
Sub macro2()
Dim Leftcell As Range
Set Leftcell = Cells(ActiveCell.Row, 1)
Leftcell.Select
End Sub

HTH
jps

GilSe wrote:

Bonjour à tous
J'ai utilisé l'enregistreur de macro et, en appuyant sur la touche
"début",


j'ai comme résultat:
Sub macro1()
ActiveCell.Offset(0, -4).Range("A1").Select
End sub
Or je souhaite sélectionner la première cellule de la ligne
indépendamment


de la position de la cellule active.
Quelle ligne de commande dois-je saisir dans une macro pour sélectionner
la


1ère cellule de la ligne ?
Et quelle ligne de commande dois-je saisir dans une macro pour
sélectionner


la 1ère cellule de la colonne ?
Merci à tous
Gilles





Avatar
garnote
Bonjour,

Comme ceci :

Sub Moi_Je_Sélectionne_La_Première_Cellule_De_La_Colonne()
Cells(1, ActiveCell.Column).Select
End Sub

Sub Moi_Je_Sélectionne_La_Première_Cellule_De_La_Ligne()
Cells(ActiveCell.Row, 1).Select
End Sub

Serge




"GilSe" a écrit dans le message de news:
bsrtkc$q3q$
Et bien on dirait que ca marche à la perfection...
Mais ne peut-on réduire cette fonction en une seule ligne?
Merci
Gilles

"sabatier" a écrit dans le message de
news:
bonjour gilles
pendant qu'ils sirotent leur dijo, histoire de faire un peu de training
pour

demain, essaie cela :

Sub macro1()
Dim Topcell As Range
Set Topcell = Cells(1, ActiveCell.Column)
Topcell.Select
End Sub
Sub macro2()
Dim Leftcell As Range
Set Leftcell = Cells(ActiveCell.Row, 1)
Leftcell.Select
End Sub

HTH
jps

GilSe wrote:

Bonjour à tous
J'ai utilisé l'enregistreur de macro et, en appuyant sur la touche
"début",


j'ai comme résultat:
Sub macro1()
ActiveCell.Offset(0, -4).Range("A1").Select
End sub
Or je souhaite sélectionner la première cellule de la ligne
indépendamment


de la position de la cellule active.
Quelle ligne de commande dois-je saisir dans une macro pour
sélectionner



la
1ère cellule de la ligne ?
Et quelle ligne de commande dois-je saisir dans une macro pour
sélectionner


la 1ère cellule de la colonne ?
Merci à tous
Gilles









Avatar
sabatier
ben, oui, gilles...beati pauperes spirito
par exemple :

Sub macro2()
Cells(ActiveCell.Row, 1).Select
End Sub

et je te laisse le soin de transformer la macro1
jps


GilSe wrote:

Et bien on dirait que ca marche à la perfection...
Mais ne peut-on réduire cette fonction en une seule ligne?
Merci
Gilles

"sabatier" a écrit dans le message de
news:
bonjour gilles
pendant qu'ils sirotent leur dijo, histoire de faire un peu de training
pour

demain, essaie cela :

Sub macro1()
Dim Topcell As Range
Set Topcell = Cells(1, ActiveCell.Column)
Topcell.Select
End Sub
Sub macro2()
Dim Leftcell As Range
Set Leftcell = Cells(ActiveCell.Row, 1)
Leftcell.Select
End Sub

HTH
jps

GilSe wrote:

Bonjour à tous
J'ai utilisé l'enregistreur de macro et, en appuyant sur la touche
"début",


j'ai comme résultat:
Sub macro1()
ActiveCell.Offset(0, -4).Range("A1").Select
End sub
Or je souhaite sélectionner la première cellule de la ligne
indépendamment


de la position de la cellule active.
Quelle ligne de commande dois-je saisir dans une macro pour sélectionner
la


1ère cellule de la ligne ?
Et quelle ligne de commande dois-je saisir dans une macro pour
sélectionner


la 1ère cellule de la colonne ?
Merci à tous
Gilles







Avatar
GilSe
Merci à tous
Gilles

"garnote" a écrit dans le message de
news:9kfIb.23777$
Bonjour,

Comme ceci :

Sub Moi_Je_Sélectionne_La_Première_Cellule_De_La_Colonne()
Cells(1, ActiveCell.Column).Select
End Sub

Sub Moi_Je_Sélectionne_La_Première_Cellule_De_La_Ligne()
Cells(ActiveCell.Row, 1).Select
End Sub

Serge




"GilSe" a écrit dans le message de news:
bsrtkc$q3q$
Et bien on dirait que ca marche à la perfection...
Mais ne peut-on réduire cette fonction en une seule ligne?
Merci
Gilles

"sabatier" a écrit dans le message de
news:
bonjour gilles
pendant qu'ils sirotent leur dijo, histoire de faire un peu de
training



pour
demain, essaie cela :

Sub macro1()
Dim Topcell As Range
Set Topcell = Cells(1, ActiveCell.Column)
Topcell.Select
End Sub
Sub macro2()
Dim Leftcell As Range
Set Leftcell = Cells(ActiveCell.Row, 1)
Leftcell.Select
End Sub

HTH
jps

GilSe wrote:

Bonjour à tous
J'ai utilisé l'enregistreur de macro et, en appuyant sur la touche
"début",


j'ai comme résultat:
Sub macro1()
ActiveCell.Offset(0, -4).Range("A1").Select
End sub
Or je souhaite sélectionner la première cellule de la ligne
indépendamment


de la position de la cellule active.
Quelle ligne de commande dois-je saisir dans une macro pour
sélectionner



la
1ère cellule de la ligne ?
Et quelle ligne de commande dois-je saisir dans une macro pour
sélectionner


la 1ère cellule de la colonne ?
Merci à tous
Gilles