Cellules avec variable

Bonjour,

je voudrais faire un range("A1") où 1 est une variable.

j'ai essayé ça :

Dim i, ligne2 As Integer

i = 3

ligne2 = Range("c" & i)

MsgBox ligne2

Mais cela ne fonctionne pas quelqu'un pourrait il m'aider?

Bonjour

Ton code renvoie la valeur de C3 ("C"&i).

Quel rapport avec A1 ?

Cordialement

Bonjour,

Aucun rapport effectivement je me suis trompé c'est bien range("C3") avec :

Dim i, ligne2 As Integer

i = 3

ligne2 = Range("c" & i)

MsgBox ligne2

Mais le probleme reste le meme avec Range("c" & i) je n'arrive pas a C3 ..

Bonjour

Je ne comprends toujours pas?

Cordialement

Ce que j'essaye de faire c'est : j'ai un prompt qui demande un chiffre, je voudrais que ce chiffre soit mis derriere le nom de ma colonne pour pouvoir selectionner plusieurs colonnes sur une meme ligne.

Si le chiffre entré est 17 je veux que ma macro aille me chercher : B17 E17 N17 etc...

Bonsoir,

Si je comprends ce que tu as exprimé, voici ton code modifié. Adapte, teste et dis-nous.

Sub test()
    Dim i As Integer, j As Integer
    Dim ligne2 As Variant
    Dim col As Variant
    col = Array(3, 5, 7, 9, 10, 12, 15, 25) 'numero des colonnes à visiter
    i = 3 'numero de la ligne à visiter
    For j = 0 To WorksheetFunction.Count(col) - 1
        ligne2 = ActiveSheet.Cells(i, col(j))
        MsgBox ligne2
    Next j
End Sub

Alors merci pour ton code mais quand je veux selectionner telle ou telle colonne en rentrant la ligne et la colonne je n'arrive a rien ...

J'ai reussi a faire Range("C" & ligne1).Select où ligne1 = 3 . Mais je n'arrive pas à selectionner plusieurs colonnes en utilisant ce procédé.

Ce que je voudrais faire c'est :

Range("N3,Q3").Select et remplacé le 3 par une variable mais Range("N & ligne1, Q & ligne1").Select me renvoie une erreur.

Si quelqu'un aurait une astuce ..

Re,

Quel est ton objectif après sélection de tes cellules ?

RE,

Le but est de les copier dans une feuille.

Bonjour

Essaies

Range("N" & ligne1 & ",Q" & ligne1).Select