Sélectionner simultanément une ligne et une colonne dans excel
Résolu
bertholdt
Messages postés
22
Date d'inscription
lundi 20 novembre 2000
Statut
Membre
Dernière intervention
17 mai 2010
-
25 août 2005 à 08:48
BasicInstinct Messages postés 1470 Date d'inscription mardi 5 février 2002 Statut Membre Dernière intervention 20 octobre 2014 - 25 août 2005 à 14:34
BasicInstinct Messages postés 1470 Date d'inscription mardi 5 février 2002 Statut Membre Dernière intervention 20 octobre 2014 - 25 août 2005 à 14:34
A voir également:
- Sélectionner simultanément une ligne et une colonne dans excel
- Sql ajouter une colonne dans un select - Forum SQL
- Vba dernière ligne d'une colonne ✓ - Forum Visual Basic 6
- Renommer une colonne sql server ✓ - Forum SQL
- Copier automatiquement une cellule excel dans une autre feuille (vba) ✓ - Forum Visual Basic
- Copier cellule dans autre feuille (vba) - Forum Visual Basic
4 réponses
BasicInstinct
Messages postés
1470
Date d'inscription
mardi 5 février 2002
Statut
Membre
Dernière intervention
20 octobre 2014
12
25 août 2005 à 08:59
25 août 2005 à 08:59
'lut
Range("11:11,D:D").Select
selectionne ligne 11 & colonne D
++
BasicInstinct
Range("11:11,D:D").Select
selectionne ligne 11 & colonne D
++
BasicInstinct
BasicInstinct
Messages postés
1470
Date d'inscription
mardi 5 février 2002
Statut
Membre
Dernière intervention
20 octobre 2014
12
25 août 2005 à 14:33
25 août 2005 à 14:33
reconstitue la chaine qui est dans le range :
y'a certainement plus propre que ca, mais ca a au moins le merite de fonctionner
Dim Ligne As Long
Dim Col As Long
Dim Colonne As String
Dim L1 As String, L2 As String
Ligne = InputBox("ligne") 'entier
Col = InputBox("colonne") 'entier
'transforme N° Col en Lettre
L1 = Col \ 26
L2 = Col Mod 26
If L1 > 0 Then
Colonne = Chr(64 + L1) & Chr(64 + L2)
Else
Colonne = Chr(64 + L1) & Chr(64 + L2)
End If
Range(Ligne & ":" & Ligne & "," & Colonne & ":" & Colonne).Select
BasicInstinct
y'a certainement plus propre que ca, mais ca a au moins le merite de fonctionner
Dim Ligne As Long
Dim Col As Long
Dim Colonne As String
Dim L1 As String, L2 As String
Ligne = InputBox("ligne") 'entier
Col = InputBox("colonne") 'entier
'transforme N° Col en Lettre
L1 = Col \ 26
L2 = Col Mod 26
If L1 > 0 Then
Colonne = Chr(64 + L1) & Chr(64 + L2)
Else
Colonne = Chr(64 + L1) & Chr(64 + L2)
End If
Range(Ligne & ":" & Ligne & "," & Colonne & ":" & Colonne).Select
BasicInstinct
BasicInstinct
Messages postés
1470
Date d'inscription
mardi 5 février 2002
Statut
Membre
Dernière intervention
20 octobre 2014
12
25 août 2005 à 14:34
25 août 2005 à 14:34
petite erreur, dsl ;)
'transforme N° Col en Lettre
L1 = Col \ 26
L2 = Col Mod 26
If L1 > 0 Then
Colonne = Chr(64 + L1) & Chr(64 + L2)
Else
Colonne = Chr(64 + L2)
End If
BasicInstinct
'transforme N° Col en Lettre
L1 = Col \ 26
L2 = Col Mod 26
If L1 > 0 Then
Colonne = Chr(64 + L1) & Chr(64 + L2)
Else
Colonne = Chr(64 + L2)
End If
BasicInstinct
bertholdt
Messages postés
22
Date d'inscription
lundi 20 novembre 2000
Statut
Membre
Dernière intervention
17 mai 2010
25 août 2005 à 13:17
25 août 2005 à 13:17
Salut,
j'ai pris bonne note de ta réponse qui fonctionne effectivement très bien. Cependant, je souhaite sélectionner la ligne et la colonne correspondant à une cellule dont l'adresse est variable.
Pour simplifier, disons que je réalise une recherche dans une feuille du classeur. Je veux pouvoir sélectionner la ligne et la colonne de la cellule correspondant au résultat de ma recherche.
Merci encore pour ta précédente réponse
Pierrick
j'ai pris bonne note de ta réponse qui fonctionne effectivement très bien. Cependant, je souhaite sélectionner la ligne et la colonne correspondant à une cellule dont l'adresse est variable.
Pour simplifier, disons que je réalise une recherche dans une feuille du classeur. Je veux pouvoir sélectionner la ligne et la colonne de la cellule correspondant au résultat de ma recherche.
Merci encore pour ta précédente réponse
Pierrick