Remplacer par une variable

Utilisateur anonyme -  
tompols Messages postés 1273 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

Je cherche à remplacer une valeur par une variable

Pour obtenir ceci (ca marche pas, mais dans l'idée)

colonne = TextBox1.Value
For Each cel1 In Range(colonne & "1:" & colonne & [ & colonne & 65000].End(xlUp).Row)

Merci

2 réponses

  1. Utilisateur anonyme
     
    Non, personne n'a d'idée, ou cela n'est pas faisable peut être ?
    Merci
    0
  2. tompols Messages postés 1273 Date d'inscription   Statut Contributeur Dernière intervention   460
     
    Re,
    colonne = TextBox1.Value
    derlig = Range(colonne &"65000").End(xlup).Row
    For Each cel1 In Range(colonne & "1:" & colonne & derlig)
    à tester....
    0