Recherche ligne
Résolu/Fermé
A voir également:
- Recherche ligne
- Aller à la ligne excel - Guide
- Recherche automatique des chaînes ne fonctionne pas - Guide
- Site de vente en ligne particulier - Guide
- Partager photos en ligne - Guide
- Apparaitre hors ligne instagram - Guide
4 réponses
yclik
Messages postés
3691
Date d'inscription
vendredi 25 juillet 2014
Statut
Membre
Dernière intervention
2 novembre 2024
1 512
8 déc. 2018 à 11:29
8 déc. 2018 à 11:29
bonjour
en tapant 10 et valider dans la petite fenêtre de la barre d'outil formule.
en tapant 10 et valider dans la petite fenêtre de la barre d'outil formule.
Merci beaucoup pour votre réponse rapide.
Le problème c'est que je suis en pleine page, donc pas de fenêtre possible. Je voudrais créer une fenêtre et y taper une ligne
Merci d'avance
Gustav
Le problème c'est que je suis en pleine page, donc pas de fenêtre possible. Je voudrais créer une fenêtre et y taper une ligne
Merci d'avance
Gustav
Vaucluse
Messages postés
26496
Date d'inscription
lundi 23 juillet 2007
Statut
Contributeur
Dernière intervention
1 avril 2022
6 412
8 déc. 2018 à 11:37
8 déc. 2018 à 11:37
Bonjour
dans votre feuille, clic droit sur onglet, "visualiser le code"
et coller ça à adapter
Private Sub Worksheet_Change(ByVal Target As Range)
Dim Rw As Long
Rw = Range("A1").Value
If Target.Cells = Range("A1") Then
Rows(Rw).Select
End If
End Sub
pour adapter, il suffit:
1°) de remplacer A1 par l'adresse de la cellule où vous entrez le N° de ligne
2°) de complèter l'adresse d'affichage si vous voulez sélectionner une cellule plutôt que la ligne complète
et donc:
Rows(Rw)
deviendrait pour aller chercher la colonne A sur la ligne
Range("A"&Rw).select
crdlmnt
dans votre feuille, clic droit sur onglet, "visualiser le code"
et coller ça à adapter
Private Sub Worksheet_Change(ByVal Target As Range)
Dim Rw As Long
Rw = Range("A1").Value
If Target.Cells = Range("A1") Then
Rows(Rw).Select
End If
End Sub
pour adapter, il suffit:
1°) de remplacer A1 par l'adresse de la cellule où vous entrez le N° de ligne
2°) de complèter l'adresse d'affichage si vous voulez sélectionner une cellule plutôt que la ligne complète
et donc:
Rows(Rw)
deviendrait pour aller chercher la colonne A sur la ligne
Range("A"&Rw).select
crdlmnt
