Wie kann ich eine integer-null in Excel-VBA?

Ich versuche zu erkennen, ob eine ganze Zahl festgelegt wurde, und wenn nicht, überspringen Sie die meisten der code in der Schleife (mit Hilfe einer if-Anweisung). Hier ist, was ich so für.

Do While hws.Cells(r, 9).Value <> ""
    On Error Resume Next
    ar = Null
    ar = aws.Range("A:A").Find(hws.Cells(r, 2).Value).Row
    If Not IsNull(ar) Then
  'work with ar'
    End If
    r = r + 1
Loop

Jedoch, wenn ich es laufen, ar = Null Probleme hat. Es sagt "Ungültige Verwendung von null".

InformationsquelleAutor Arlen Beiler | 2010-10-26

  1. 0

    Finden gibt eine Reihe:

    Dim rf As Range
With aws.Range("A:A")
    Set rf = .Find(hws.Cells(r, 2).Value)
    If Not rf Is Nothing Then
        Debug.Print "Found : " & rf.Address
    End If
End With

    -- http://msdn.microsoft.com/en-us/library/aa195730(Büro.11).aspx

    InformationsquelleAutor Fionnuala

  2. 7

    Definierten Variablen als Integer nicht Null in VBA. Sie müssen einen anderen Weg finden, das zu tun, was Sie wollen. zB verwenden Sie einen anderen Datentyp oder verwenden Sie eine Magische Zahl, um anzuzeigen, null (z.B. -1).

    In deinem Beispiel-code, entweder ar zugeordnet wird, ein Long-Wert (Range.Zeile ist Lang) oder es wird ein Fehler ausgelöst.

    InformationsquelleAutor Foole

  3. 1

    verwenden Sie einfach eine Variante ein und isempty:

    Dim i

If IsEmpty(i) Then MsgBox "IsEmpty"
i = 10

If IsEmpty(i) Then
   MsgBox "IsEmpty"
Else
   MsgBox "not Empty"
End If
i = Empty
If IsEmpty(i) Then MsgBox "IsEmpty"
'a kind of Nullable behaviour you only can get with a variant
'do you have integer?
Dim j as Integer
j = 0
If j = 0 Then MsgBox "j is 0"
    Nein danke, ich mag die Definition alles. Kann ich einstellen, dass es wieder leer.
    also, welche Art ist die variable "ar" in Ihrem code dann?
    Es ist eine ganze Zahl.
    zu der Variante: egal, was Sie schreiben: "Dim i as Variant" ist das gleiche wie "Dim i" die beiden Zeiten, die Sie definiert haben, eine Variante (N)
    Ich weiß.........

    InformationsquelleAutor OlimilOops

Schreibe einen Kommentar