À l'aide de la “Cellules” de la fonction en vba excel

Je suis en train de sélectionner une cellule dans excel en utilisant vba grâce à l'utilisation de la fonction range.

Je l'ai fait de nombreuses fois avant, même avec l'aide de variables pour spécifier la plage au lieu de seulement des chiffres.

Cependant, je n'arrive pas à sélectionner une plage à l'aide de la fonction de cellules.

Je sais que c'est possible que j'ai fait beaucoup de recherche et qui en ont vu d'autres personnes de code qui sera exécuté avec succès à l'aide de cette fonction.

Ci-dessous est la syntaxe que j'utilise pour essayer et choisir la plage (qui est à seulement 1 cellule).

En outre, lorsque j'exécute le code, j'obtiens le message suivant:

"Erreur d'exécution '1004': la Méthode 'Range' de l'objet'_Global" a échoué".

Merci pour toute aide.

Dim item As String
Dim itempaste As Boolean
Dim itemcnt As Integer

itemcnt = 1
itempaste = False
Range("X3").Select
Do
    item = ActiveCell.Value
    If item <> "" Then
        Range("A18").Select
        Do
            If ActiveCell.Value = "" Then
                ActiveCell.Value = item
                itempaste = True
            Else
                ActiveCell.Offset(1, 0).Select
            End If
        Loop Until itempaste = True
    End If
    itemcnt = itemcnt + 2
    Range(Cells(1, (21 + itemcnt))).Select
Loop Until itemcnt = 11

OriginalL'auteur user2572734 | 2013-07-11

5

Vous utilisez le type de Plage comme une fonction; la Cells appel est en fait vous retourner un Range objet déjà. Au lieu de
```
Range(Cells(1, (21 + itemcnt))).Select
```
..essayer:
```
Cells(1, (21 + itemcnt)).Select
```
Si vous voulez être plus explicite:
```
Dim target As Range
Set target = Cells(1, (21 + itemcnt))
target.Select
```
OriginalL'auteur Geoff

Vous devez vous connecter pour publier un commentaire.