Bonjour le forum,
pourriez-vous m'indiquer comment sélectionner sur la même ligne et dans une ou plusieurs autres colonnes les cellules correspondantes en complétant le code suivant qui me permet de sélectionner la 1 ère cellule dans la colonne "G" ?
Ainsi, par exemple, je voudrais sélectionner, sur cette même ligne en plus de la cellule de la colonne "G", les cellules des colonnes "H, K, L,M et N".
Voici le code que j'utilise :
Remerciements.
Cordialement.
Nonno 94.
pourriez-vous m'indiquer comment sélectionner sur la même ligne et dans une ou plusieurs autres colonnes les cellules correspondantes en complétant le code suivant qui me permet de sélectionner la 1 ère cellule dans la colonne "G" ?
Ainsi, par exemple, je voudrais sélectionner, sur cette même ligne en plus de la cellule de la colonne "G", les cellules des colonnes "H, K, L,M et N".
Voici le code que j'utilise :
Code:
Private Sub CommandButton3_Click()
Dim nom$, a As Range
nom = InputBox("Saisissez le Nom du Locataire", "Sélection du Locataire", xpos:=300, ypos:=300)
Set a = [G6:G57].Find(nom & " *", LookIn:=xlValues, LookAt:=xlWhole)
If a Is Nothing Then MsgBox "Ce Nom n'existe pas dans la Liste des Locataires ! Resaisissez un Nom.": Exit Sub
a.Select
End Sub
Remerciements.
Cordialement.
Nonno 94.