Discussion :

[jmcemoa]

Bonjour,
J'ai un gros souci , je n'arrive pas à sélectionner la ligne comportant le cellule active.
J'ai regardé dans les cours et essayé plusieurs formules (dont vraisemblablement des idiotes), mais cela ne fonctionne pas comme je le souhaite.

Voici mes essais avec le message d'erreur:
Range("B6").EntireRow.Select ..................... fonctionne
Range(Cells(6, 1)).EntireRow.Select ..................... la méthode 'Range' de l'objet '_Global' a échoué
Range(Cells(ActiveCell)).EntireRow.Select ............. incompatibilité de type
Range(ActiveCell).EntireRow.Select ...................... la méthode 'Range' de l'objet '_Global' a échoué
Range(Rows(6)).Select ...................................... erreur de compilation - erreur de syntaxe
Range(Rows(ActiveCell)).Select .......................... incompatibilité de type
Range(Row).EntireRow.Select ............................. la méthode 'Range' de l'objet '_Global' a échoué
Range(Row(ActiveCell)).EntireRow.Select .............. erreur de compilation - sub ou fonction non définie
Rows(6).EntireRow.Select .......................... fonctionne
Rows(ActiveCell).EntireRow.Select ...................... incompatibilité de type
Rows().EntireRow.Select ............................ fonctionne mais sélectionne toutes les lignes
Rows.EntireRow.Select .............................. fonctionne mais sélectionne toutes les lignes
Row.EntireRow.Select ....................................... objet requis

J'avoue être bien embarrassé pour une formulation qui doit surement être simple
Merci d'avance de l'aide que vous voudrez bien m'apporter.
Cordialement
Jean-Marie

[tomy7]

teste chez moi:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Sub test()
ActiveCell.EntireRow.Select
 
End Sub

[jmcemoa]

Merci tomy7,
Je me doutais bien que ce serait simple, mais pas à ce point ; j'en suis confus
Cela a parfaitement fonctionné.
Merci encore pour ta célérité

Bonne journée à toutes et à tous
Cordialement,
Jean-Marie