Selectionner une plage de cellules

Bonsoir!!!
je lance un SOS pour la réalisation d'un programme VBA me permettant de selectionner une plage de cellules.
Il s'agit de la plage A1: A10.
Voici ce que j'avais fais
Workbooks("Tap.xlsx").Worksheets("cum").range( cells(1,1), cells(1,10)).select
mais ca marche pas.
A quoi cela peut etre du?

En plus j'ai créer une variable qui capte le numero d'une colonne que j'utilse dans ce programme:
sub a()
dim trouve1 as range
dim val
Set trouve1 = Workbooks("Tap.xlsx").Worksheets("cum").Rows(1).Cells.Find(bte1, LookIn:=xlValues, LookAt:=xlWhole)
val = trouve1.Column
Workbooks("Tap.xlsx").Worksheets("cum").Cells(4, val).Select
end sub

Mais ca marche pas!

Vrament, j'ai des problemes pour selectionner une plage de cellules dont les references de la ligne ou colonne sont inclues dans une variable

Aidez moi, s'il vous plait

2 réponses

  • Votes
  • Date
  • Date décroissante
  1. Bonjour,

    Workbooks("Tap.xlsx").Worksheets("cum").range( cells(1,1), cells(1,10)).select

    'selection A1:A10
    Workbooks("Tap.xlsx").Worksheets("cum").Range("A1:A10").Select

    'bte1 ?? vient d'ou ????
    Set trouve1 = Workbooks("Tap.xlsx").Worksheets("cum").Rows(1).Cells.Find(bte1, LookIn:=xlValues, LookAt:=xlWhole)
    1. Merci
      J'ai apporté une petite modification au programme et j'ai obtenu ce que je voulais.
      Voici ce que j'ai finalement fais
      Set num=..................................
      Set lig=................................
      With Workbooks("Tap.xlsx").Worksheets("cum")
      .Activate
      Set ma_plage = .Range(.Cells(1, num), .Cells(lig, num))
      End With
      Ma_palge.select