Discussion :

[KillChief]

Bonjour!

J'aimerais savoir si il est possible de faire un truc de ce genre :

Code :

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

1
2
3
4
5
6
7
Sub test_coordinates_string()
 
    Dim cell_coordinates As String
    cell_coordinates = "2, 5"
    Cells(cell_coordinates).Select
 
End Sub

En fait, j'aimerais stocker les coordonnées d'une cellule dans une seule variable. Là quand je fais ça, cela me sélectionne la cellule 1, 2.
Est-ce possible ?

[Algoplus]

Bonjour,

Je ne comprends pas le besoin, mais, des essais qui répondent (ou pas):

Code :

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

1
2
3
4
Dim c(0 To 1) as Integer
 c(0) = 2
 c(1) = 5
 Cells(c(0), c(1)).Select

ou

Code :

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

1
2
3
Dim d As String
    d = "2,5"
    Cells(CInt(Split(d, ",")(0)), CInt(Split(d, ",")(1))).Select

ou

Code :

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

1
2
3
Dim d As String
 d = "E2" ' on perd la notation ligne,colonne
 Range(d).Select

[eriiic]

Bonjour,

Pourquoi ne pas utiliser une variable range qui lui est dédiée ?

Code :

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

1
2
3
4
Dim cell_coordinates As Range
set cell_coordinates = range(2, 5) ' de préférence spécifier aussi la feuille
' coordonnées :
' cell_coordinates.row ou .column ou .address

eric

[KillChief]

Merci pour vos réponses !

Au final le plus pratique pour moi cela va être ta 1ère solution, Algoplus. C'est celle que je vais utiliser !
eriiic, ton code ne marche pas je crois, enfin en tous cas j'ai un bug à la ligne "set cell_coordinates = range(2, 5)"

[eriiic]

heu oui. C'est

Code :

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

=cells(2, 5)

Répondu un peu vite, sorry :-)
eric