die „Zellen“ Funktion in Excel mit VBA

Question

ich eine Zelle in Excel wählen versuche.

Ich habe das viele Male getan, bevor auch Variablen mit der Verwendung des Bereich anstatt nur Zahlen angeben.

Aber ich kann nicht scheinen, einen Bereich unter Verwendung der Zellen-Funktion zu wählen.

Ich weiß, dass dies möglich ist, wie ich viel Forschung und haben andere Leute Code zu sehen, die erfolgreich mit dieser Funktion ausgeführt werden soll getan haben.

Im Folgenden ist die Syntax Ich verwende den Bereich, um zu versuchen, und wählen Sie (die nur 1 Zelle).

Außerdem, wenn ich den Code i folgende Meldung aus:

"Laufzeitfehler '1004': Die Methode des 'Range' von object'_Global‘ nicht bestanden".

Vielen Dank für jede und alle Hilfe.

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 

Answer 1

Sie verwenden den Bereichstyp wie eine Funktion; Der Cells Aufruf gibt Ihnen tatsächlich ein Range Objekt zurück. Statt

Range(Cells(1, (21 + itemcnt))).Select 

..try:

Cells(1, (21 + itemcnt)).Select 

Wenn Sie mehr explizit sein:

Dim target As Range 
Set target = Cells(1, (21 + itemcnt)) 
target.Select